안녕하세요 예스스탁입니다. input : 매수금(1000000); var : 상한가(0), UpLimit(0); var : up1(0), up2(0), up3(0), up4(0), up5(0),up6(0),Up7(0); var : ii(0),hh(0),count(0),ll(0),lo(0); var : dd(0),dm(0),cnt(0),sum1(0),sum2(0),mav1(0),mav2(0); var : vv(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 date >= 20230125 Then { 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; } Else { 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 date >= 20230125 Then { If BP >= 500000 Then 상한가 = up1; Else If BP >= 200000 Then 상한가 = iff(up2>=500000, up1, up2); Else If BP >= 50000 Then 상한가 = iff(up3>=200000, up2, up3); Else If BP >= 20000 Then 상한가 = iff(up4>=50000, up3, up4); Else If BP >= 5000 Then 상한가 = iff(up5>=20000, up4, up5); Else If BP >= 2000 Then 상한가 = iff(up5>=5000, up5, up6); Else 상한가 = iff(up6>=2000, up6, up7); } Else { 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 MarketPosition == 0 and C > O Then { vv = Floor(매수금/C); Buy("b",OnClose,Def,vv); ExitLong("bx1.",AtLimit,C*1.03,"",Floor(vv*0.3),1); ExitLong("bx2.",AtLimit,C*1.07,"",Floor(vv*0.3),1); ExitLong("bx3.",AtLimit,C*1.09); ExitLong("bx4.",AtLimit,상한가); } if MarketPosition == 1 Then { if highest(H,BarsSinceEntry) < EntryPrice*1.03 Then ExitLong("bx1",AtLimit,EntryPrice*1.03,"",Floor(MaxContracts*0.3),1); if highest(H,BarsSinceEntry) < EntryPrice*1.07 Then ExitLong("bx2",AtLimit,EntryPrice*1.07,"",Floor(MaxContracts*0.3),1); if highest(H,BarsSinceEntry) < EntryPrice*1.09 Then ExitLong("bx3",AtLimit,EntryPrice*1.09); if highest(H,BarsSinceEntry) < 상한가 Then ExitLong("bx4",AtLimit,상한가); } 즐거운 하루되세요 > 파인애플 님이 쓴 글입니다. > 제목 : 문의드립니다 > 시스템식 매수 매수청산 질문입니다 1분차트에서 삼성전자를 매수 양봉이면 100만원 매수 매수청산 3% 수익돌파시 수량1/3 청산 6% 수익돌파시 수량1/3 청산 9% 수익돌파시 수량나머지 청산 상한가 진입시 수량모두 청산 입니다