안녕하세요 예스스탁입니다. 진입+2일에 시초가 청산은 가능하지 않습니다. +2일 첫봉에 청산하게 작성되었습니다. input : p1(5); var : cnt(0),PreDayV(0),mav1(0),sumv1(0),dis(0),Didx(0),mav2(0),sumv2(0); Var : Pivot(0),R1(0),R2(0),S1(0),S2(0); 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 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; 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; } } Pivot = (DayHigh(1)+DayLow(1)+DayClose(1))/3; R1 = 2*Pivot-DayLow(1); R2 = Pivot+DayHigh(1)-DayLow(1); S1 = 2*Pivot-DayHigh(1); S2 = Pivot-DayHigh(1)+DayLow(1); for cnt = 1 to 2500 { if stime[cnt] <= stime and sdate != sdate[cnt] then{ PreDayV = DayVolume[cnt]; cnt = 1000000; } } sumV1 = 0; sumv2 = 0; for cnt = 0 to P1-1 { sumV1 = sumV1+DayClose(cnt); if cnt > 0 then sumV2 = sumV2+DayClose(cnt); } maV1 = sumV1 / P1; maV2 = (sumV2+상한가)/ P1; dis = C/mav1*100; if date != date[1] Then{ var1 = 0; var2 = 0; Condition1 = false; Didx = Didx+1; value1 = mav2; value2 = dis; } if C > dayopen Then var1 = var1+V; Else var2 = var2+V; if dis <= 102 Then Condition1 = true; if MarketPosition == 0 and ExitDate(1) != sdate and var1 <= DayVolume*0.3 And DayVolume <= preDayv*1.2 And Condition1 == false And stime >= 123000 and stime <= 144000 And dis >= 102.5 and dis < 104 Then buy(); if MarketPosition == 1 Then { if sdate == EntryDate then { ExitLong("bx11",atlimit,EntryPrice*1.05,"",Floor(CurrentContracts*0.5),1); ExitLong("bx12",atlimit,EntryPrice*1.15); if CrossDown(dis,100.3) Then ExitLong("bx13"); } if sdate > EntryDate and didx == Didx[BarsSinceEntry]+1 then { if dayopen > pivot and CrossDown(c,mav2-PriceScale*2) Then exitlong("bx21"); if dayopen > pivot and Crossup(c,R2) Then exitlong("bx22",OnClose,def,"",Floor(CurrentContracts*0.5),1); if dayindex == 0 and dayopen >= pivot and dayopen > value1 Then exitlong("bx23",OnClose,def,"",Floor(CurrentContracts*0.5),1); if dayopen >= pivot and dayopen > value1 and crossup(c,R1) Then exitlong("bx24"); if dayopen >= pivot and dayopen > value1 and CrossDown(c,mav2-PriceScale*4) Then exitlong("bx25"); if dayindex == 0 and value2 >= 99 and dayopen < value1 Then exitlong("bx26"); if value2 < 99 and CrossDown(c,mav1-PriceScale*2) Then exitlong("bx27"); if stime == 144800 or (stime > 144800 and stime[1] < 144800) and C < 상한가 Then exitlong("bx28"); } if sdate > EntryDate and didx == Didx[BarsSinceEntry]+2 then { if dayindex == 0 Then exitlong("bx31"); } } 즐거운 하루되세요 > 쌀사비팔 님이 쓴 글입니다. > 제목 : 부탁드립니다. > 현물 틱 매매입니다. <진입> -일일 진입 1회로 제한 -당일 거래량 중 시초가 보다 높은 가격에서 매매된 거래량이 30%미만이고, -전일 동일시간 거래량 대비 당일 거래량은 120% 미만이고, -당일 주가는 5일선(일봉) 이격도 102이하로 내려간 적이 없어야 하고, -진입시간 : 12:30부터 14:40까지이고 -5일선(일봉) 이격도 102.5이상 104이하면, 진입 <진입 당일 청산> -진입가 대비 +5%이상 이면, 다음 첫봉에 잔고의 50% 청산 -진입가 대비 +15%이상이면, 다음 첫봉에 잔고 모두 청산 -5일선(일봉) 이격도 100.3이하면, 잔고 모두 청산 <진입 +1일 청산> *참조, "상한간주 5일선(일봉)" : 당일 상한가라고 가정할때, 일봉상의 5일선. -시초가가.. 피봇기준선 이상이면, "상한간주 5일선(일봉)-3틱"이하로 하락시 모두 청산 -시초가가.. 피봇기준선 이상이면, 피봇 2차저항선을 상향 돌파시, 잔고의 50%를 청산 -시초가가.. "상한간주 5일선(일봉)" 이상이고, 피봇기준선 이하이면, 시초가(첫봉)에 잔고의 50%청산 -시초가가.. "상한간주 5일선(일봉)" 이상이고, 피봇기준선 이하이면, 피봇 1차 저항선 상향돌파시 잔고 모두 청산 -시초가가.. "상한간주 5일선(일봉)" 이상이고, 피봇기준선 이하이면, "상한간주 5일선(일봉) -4틱" 이하로 하락시 잔고 모두 청산 -시초가가.. 5일선(일봉) 이격도 99이상이고 "상한간주 5일선(일봉)"이하면, 시초가(첫봉)에 모두 청산 -시초가가.. 5일선(일봉) 이격도 99미만이면, "5일선(일봉) 이격도 100 -2틱"을 상향동파시, 모두 청산 -14:48시에 상한가가 아니면, 잔고 모두 청산 <진입 +2일 청산> -시초가(첫봉)에 조건없이 잔고 모두 청산