• 커뮤니티
  • 질의응답
  • 예스랭귀지 Q&A

커뮤니티

검색

프로필 이미지
자라도
2016-02-22 14:54:30
105
글번호 95648
답변완료
아래식은 아론입력변수주기 60, 5 일때 두조건을 만족하는 종목을 검색하는 식입니다. 수정좀 부탁드립니다. input : Period(60),period2(5); var : Counter(0), Lowval(0), Highval(0), DownVel(0),UpVel(0), DnAroon(0),UpAroon(0),UpAroon2(0) ; Lowval= Lowest(Low, Period+1); Highval = Highest(High, Period+1); For counter= 0 To Period { If Low[counter] == Lowval Then DownVel = counter; If High[counter] == highval Then UpVel = counter; } DnAroon = 100*(Period-DownVel)/Period; UpAroon = 100*(Period-UpVel)/Period; UpAroon2 = 100*(Period2-UpVel)/Period2; if uparoon >= 100 and uparoon2[1] <= 0 Then find(1); ############################################################################ 2번문의 일봉 90일내 1번이상 상한가 발생 인종목 검색도 부탁드립니다.
검색
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2016-02-22 15:26:19

안녕하세요 예스스탁입니다. 1. input : Period1(60),Period2(5); var : cnt(0); var :Lowval1(0), Highval1(0), DownVel1(0),UpVel1(0), DnAroon1(0),UpAroon1(0); var :Lowval2(0), Highval2(0), DownVel2(0),UpVel2(0), DnAroon2(0),UpAroon2(0); Lowval1 = Lowest(Low, Period1+1); Highval1 = Highest(High, Period1+1); For cnt = 0 To Period1{ If Low[cnt] == Lowval1 Then DownVel1 = cnt; If High[cnt] == highval1 Then UpVel1 = cnt; } DnAroon1 = 100*(Period1-DownVel1)/Period1; UpAroon1 = 100*(Period1-UpVel1)/Period1; Lowval2 = Lowest(Low, Period2+1); Highval2 = Highest(High, Period2+1); For cnt = 0 To Period2{ If Low[cnt] == Lowval2 Then DownVel2 = cnt; If High[cnt] == highval2 Then UpVel2 = cnt; } DnAroon2 = 100*(Period2-DownVel2)/Period2; UpAroon2 = 100*(Period2-UpVel2)/Period2; if uparoon1 >= 100 and uparoon2[1] <= 0 Then find(1); 2. var : 상한가(0), UpLimit(0); var : up1(0), up2(0), up3(0), up4(0), up5(0),up6(0),Up7(0); if date >= 19981207 then { if date < 20050328 && CodeCategory() == 2 then UpLimit = (BP[0] * 1.12); Else if date >= 20050328 and date < 20150615 Then UpLimit = (BP[0] * 1.15); Else UpLimit = (BP[0] * 1.30); if CodeCategory() == 2 then { if date >= 20030721 then { up1 = int(UpLimit/100+0.00001)*100; up2 = int(UpLimit/100+0.00001)*100; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/5+0.00001)*5; up7 = int(UpLimit/1+0.00001)*1; } else { up1 = int(UpLimit/1000+0.00001)*1000; up2 = int(UpLimit/500+0.00001)*500; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/10+0.00001)*10; up7 = int(UpLimit/1+0.00001)*1; } } Else { up1 = int(UpLimit/1000+0.00001)*1000; up2 = int(UpLimit/500+0.00001)*500; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/5+0.00001)*5; up7 = int(UpLimit/1+0.00001)*1; } if CodeCategory() == 1 || CodeCategory() == 2 then { if sdate < 20101004 Then{ If BP >= 500000 Then 상한가 = up1; Else If BP >= 100000 Then 상한가 = iff(up2>=500000, up1, up2); Else If BP >= 50000 Then 상한가 = iff(up3>=100000, up2, up3); Else If BP >= 10000 Then 상한가 = iff(up4>=50000, up3, up4); Else If BP >= 5000 Then 상한가 = iff(up5>=10000, up4, up5); Else If BP >= 1000 Then 상한가 = iff(up5>=5000, up5, up6); Else 상한가 = iff(up6>=1000, up6, up6); } Else{ If BP >= 500000 Then 상한가 = up1; Else If BP >= 100000 Then 상한가 = iff(up2>=500000, up1, up2); Else If BP >= 50000 Then 상한가 = iff(up3>=100000, up2, up3); Else If BP >= 10000 Then 상한가 = iff(up4>=50000, up3, up4); Else If BP >= 5000 Then 상한가 = iff(up5>=10000, up4, up5); Else If BP >= 1000 Then 상한가 = iff(up5>=5000, up5, up6); Else 상한가 = iff(up6>=1000, up6, up7); } } else if CodeCategory() == 8 || CodeCategory() == 9 then { // ETF 상한가 = up6; } } if countif(h >= 상한가,60) >= 1 Then find(1); 즐거운 하루되세요 > 자라도 님이 쓴 글입니다. > 제목 : 검색 > 아래식은 아론입력변수주기 60, 5 일때 두조건을 만족하는 종목을 검색하는 식입니다. 수정좀 부탁드립니다. input : Period(60),period2(5); var : Counter(0), Lowval(0), Highval(0), DownVel(0),UpVel(0), DnAroon(0),UpAroon(0),UpAroon2(0) ; Lowval= Lowest(Low, Period+1); Highval = Highest(High, Period+1); For counter= 0 To Period { If Low[counter] == Lowval Then DownVel = counter; If High[counter] == highval Then UpVel = counter; } DnAroon = 100*(Period-DownVel)/Period; UpAroon = 100*(Period-UpVel)/Period; UpAroon2 = 100*(Period2-UpVel)/Period2; if uparoon >= 100 and uparoon2[1] <= 0 Then find(1); ############################################################################ 2번문의 일봉 90일내 1번이상 상한가 발생 인종목 검색도 부탁드립니다.
등록