안녕하세요 예스스탁입니다. input : Atime(10),P1(60),P2(120),P3(240); input : 투입금액1(2000000),투입금액2(4000000); var : cnt(0),count(0),sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0),vol50(0); Array : CC[2400](0); if CodeCategory == 1 Then{ #코스피 if BasePrice < 50000 Then{ Var5 = int(int(투입금액1/C)/10)*10; Var6 = int(int(투입금액2/C)/10)*10; } Else{ Var5 = int(투입금액1/C); Var6 = int(투입금액2/C); } } if CodeCategory == 2 Then{ Var5 = int(투입금액1/C); Var6 = int(투입금액2/C); } if CodeCategory == 6 Then{ Var5 = int(투입금액1/(C*BigPointValue)); Var6 = int(투입금액2/(C*BigPointValue)); } var1 = TimeToMinutes(stime)%Atime; if dayindex() == 0 or (var1 <= var1[1] and stime > stime[1]) Then{ value1 = value1+1; for cnt = 1 to 299{ CC[cnt] = CC[cnt-1][1]; } } CC[0] = C; sum1 = 0; sum2 = 0; sum3 = 0; for count = 0 to P3{ if count < P1 and value1 >= P1 Then sum1 = sum1+CC[count]; if count < P2 and value1 >= p2 Then sum2 = sum2+CC[count]; if count < P3 and value1 >= P3 Then sum3 = sum3+CC[count]; } mav1 = sum1/P1; mav2 = sum2/P2; mav3 = sum3/P3; if index >= 2400 and TotalTrades < 1 and MarketPosition == 0 and ((l < mav1*1.005)and(c < mav1*1.015) or ( c < mav1*1.006 )) Then buy("1차매수",atmarket,DEF,var5); if MarketPosition == 1 and CurrentEntries == 1 and Condition1 == false And ((l < mav2*1.01)and(c < mav2*1.02) or ( c < mav2*1.009 )) Then buy("2차매수",atmarket,DEF,var6); if MarketPosition == 1 and CurrentEntries == 2 and Condition2 == false And (((l < mav3*1.005)and(c < mav3*1.01) or ( c < mav3*1.006 )) and (C < AvgEntryPrice*0.97))Then buy("3차매수",atmarket,DEF,var6); if MarketPosition == 1 Then{ if CodeCategory == 1 Then{ if BasePrice < 50000 Then vol50 = int((CurrentContracts*0.5)/10)*10; Else vol50 = int(CurrentContracts*0.5); } if CodeCategory == 2 Then vol50 = int(CurrentContracts*0.5); if CodeCategory == 6 Then vol50 = int(CurrentContracts*0.5); if MaxEntries ==1 Then{ exitlong("1차수익실현1",atlimit,EntryPrice*1.05,"",Vol50,1); exitlong("1차수익실현2",atlimit,EntryPrice*1.10,"",Vol50,1); if H >= EntryPrice*1.1 Then Condition1 = true; } if MaxEntries == 2 Then{ exitlong("2차수익실현1",atlimit,AvgEntryPrice*1.03,"",Vol50,1); exitlong("2차수익실현2",atlimit,AvgEntryPrice*1.05,"",Vol50,1); if H >= EntryPrice*1.05 Then Condition2 = true; } if MaxEntries == 3 Then{ exitlong("3차수익실현1",atlimit,AvgEntryPrice*1.1); } } Else{ Condition1 = false; condition2 = false; } 즐거운 하루되세요 > 상위1프로되기 님이 쓴 글입니다. > 제목 : 수정좀 부탁드립니다... > 어제 질문드려서 식은 하나 완성하기는했는데 아직 완전하지가 않은거 같아서 몇가지 수정좀 부탁드립니다.. 1차매수후 분할매도 5프로에서 절반 10프로에서 나머지중에 절반매도 주가가 다시 떨어지면 5프로수익권에서 전체매도 1차매수후 매수가대비 주가가 10프로이상 상승하지 않으면 2차매수가 진행... 2차매수후 평단가대비 3프로에서 총수량에 절반매도 5프로에서 나머지절반매도 주가가 다시떨어지면 1프로에서 전체매도 2차매수후 평단가대비 5프로이상 상승하지 않으면 3차매수진행... 3차매수후 평단가대비 1프로에 전체매도.... 그리고 가장중요한거 1차매수가 처음으로 들어갈때 앞에봉갯수가 2400개 이상으로 고쳐주세요...자꾸 귀찮게해서 죄송합니다..^^* input : Atime(10),P1(60),P2(120),P3(240); var : cnt(0),count(0),sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0); Array : CC[2400](0); var1 = TimeToMinutes(stime)%Atime; if dayindex() == 0 or (var1 <= var1[1] and stime > stime[1]) Then{ value1 = value1+1; for cnt = 1 to 299{ CC[cnt] = CC[cnt-1][1]; } } CC[0] = C; sum1 = 0; sum2 = 0; sum3 = 0; for count = 0 to P3{ if count < P1 and value1 >= P1 Then sum1 = sum1+CC[count]; if count < P2 and value1 >= p2 Then sum2 = sum2+CC[count]; if count < P3 and value1 >= P3 Then sum3 = sum3+CC[count]; } inputs : 투입금액1(2000000),투입금액2(4000000); if CodeCategory == 1 Then{ #코스피 if BasePrice < 50000 Then{ Var5 = int(int(투입금액1/C)/10)*10; Var6 = int(int(투입금액2/C)/10)*10; } Else{ Var5 = int(투입금액1/C); Var6 = int(투입금액2/C); } } if CodeCategory == 2 Then{ Var5 = int(투입금액1/C); Var6 = int(투입금액2/C); } if CodeCategory == 6 Then{ Var5 = int(투입금액1/(C*BigPointValue)); Var6 = int(투입금액2/(C*BigPointValue)); } mav1 = sum1/P1; mav2 = sum2/P2; mav3 = sum3/P3; if TotalTrades < 1 and MarketPosition == 0 and ((l < mav1*1.005)and(c < mav1*1.015) or ( c < mav1*1.006 )) Then buy("1차매수",atmarket,DEF,var5); if MarketPosition == 1 and CurrentEntries ==1 Then{ exitlong("1차수익실현",atlimit,AvgEntryPrice*1.05); } if MarketPosition == 1 and CurrentEntries == 1 and ((l < mav2*1.01)and(c < mav2*1.02) or ( c < mav2*1.009 )) Then buy("2차매수",atmarket,DEF,var6); if MarketPosition == 1 and CurrentEntries == 2 Then{ exitlong("2차수익실현",atlimit,AvgEntryPrice*1.035); } if MarketPosition == 1 and CurrentEntries == 2 and (((l < mav3*1.005)and(c < mav3*1.01) or ( c < mav3*1.006 )) and (C < AvgEntryPrice*0.97))Then buy("3차매수",atmarket,DEF,var6); if MarketPosition == 1 and CurrentEntries == 3 Then{ exitlong("3차수익실현",atlimit,AvgEntryPrice*1.03); }