안녕하세요 예스스탁입니다. 1. var1 = TimeHigh(90000,92959); var2 = timelow(90000,92959); var3 = ma(c,120); var4 = ma(c,240); if dayopen >= DayClose(1)*1.03 and dayopen <= DayClose(1)*1.08 and stime >= 93000 and var1 > var2 and var1 > var1[1] and var2 > var2[1] and H < var1 and var1 < var2*1.07 and var1 < DayClose(1)*1.10 Then buy("b",AtStop,var1+PriceScale); if MarketPosition == 1 Then{ if CurrentContracts == MaxContracts Then exitlong("bx1",atlimit,EntryPrice*1.03,"",int(CurrentContracts*0.5)); if CurrentContracts < MaxContracts Then ExitLong("bx2",AtStop,EntryPrice-PriceScale); if CrossDown(rsi(9),80) Then exitlong("bx3"); if CrossDown(C,var3-PriceScale) Then exitlong("bx4"); exitlong("bx5",AtStop,var2-PriceScale); exitlong("bx6",AtStop,highest(h,barssinceentry+1) - atr(20)* 5.5); } SetStopLoss(5,PercentStop); SetStopEndofday(144900); 2. var : 상한가(0), UpLimit(0); var : up1(0), up2(0), up3(0), up4(0), up5(0),up6(0); if date >= 19981207 then { if date < 20050328 && CodeCategory() == 2 then UpLimit = (BP[0] * 1.12); Else UpLimit = (BP[0] * 1.15); 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; } 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; } } 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; } if CodeCategory() == 1 || CodeCategory() == 2 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 상한가 = iff(up6>=5000, up5, up6); } else if CodeCategory() == 8 || CodeCategory() == 9 then { // ETF 상한가 = up6; } } if H[1] >= 상한가[1] Then{ var1 = L; var2 = (H[1]+L[1])/2; } if L < var1 Then var1 = L; if (countif(H >= 상한가,10) >= 1 and var1 >= var2) or (H >= 상한가) Then find(1); 즐거운 하루되세요 > 엠제이 님이 쓴 글입니다. > 제목 : 시스템 작성 부탁드립니다. > 1분봉 매매입니다. 매수조건 - 당일 매수는 1회로 제한함 - 시가갭이 3~8% 이상 발생해야 함 - 장시작후 30분간의 고가와 저가를 구함 - 장시작 30분후에 고가+PriceScale에 AtStop으로 매수함 * 1분봉 120일선과 240일선이 정배열 이어야 하며 120일선과 240일선이 모두 상승중이어야 함 * 9:30분에 매수가 될때 9:29분이 시초 30분 고가인 경우 9:30분에 매매를 하면 너무 고가이므로 기본적으로 매수는 시초30분 고가를 이탈하고 다시 9:30분 이후에 고가를 재돌파시에만 atstop으로 매수함 * 시초 30분 고가와 당일 저가의 차이가 7% 이상 발생했으면 그날은 매수를 하지 않음 * 시초 30분 고가가 전일 종가대비 10% 이상 크면 그날은 매수를 하지 않음 매수청산 - 3% 수익에 물량 50% 청산 - 3% 수익으로 50% 절반 청산한 경우에는 주가가 매수가 한호가 아래에 오면 전량 청산(AtLimit) - RSI 9가 80선 이탈시 전량 청산 - 종가가 120일선 한호가 아래 이탈시 전량 매수청산 - 시초30분 저가 한호가 아래 이탈시 전량 매수청산 - highest(h,barssinceentry+1) - atr(20)* 5,5 매수청산 - 장종료시에 매수청산(144900) - 5% StopLoss 검색식도 부탁드리겠습니다. - 최근 10일간에 상한가가 한번이라도 발생되었으며 상한가 발생일 다음일 부터 오늘까지의 봉의 저가가 상한가 발생당시 봉의 (고가+저가)/2 위에 있는 종목 검색식 부탁드리겠습니다. (당일 상한가인 종목도 검색 되어야 하며, 전일 상한가, 당일 저가 > (전일고가+전일저가)/2인 종목도 나와야 함) 늘 감사드립니다.