커뮤니티

시스템식 요청드립니다.

프로필 이미지
맴맴잉
2025-02-03 00:59:55
366
글번호 187593
답변완료

첨부 이미지

아래의 식에서 오류가 있는데 어떤식으로 수정해야 할지 몰라 요청드립니다. 아래의 시스템식은 주가가 14 이평선위에 있다가 해당 이평선을 하향돌파했을때 매수하는 시스템식으로 그림 파일1을 보시면 14일선 아래에 있다가 갭하락으로 시가가 시작했을때 매수가 되었습니다. 그런데, 매도는 매수평단에서 3% 4% 5% 분할매도가 되어야 하는데, 분할매도가 안됩니다. 그림파일 2를 보시면 평소엔 잘 되는것 같습니다. 1번의 경우가 갭하락으로 인해서 문제가 발생한것 처럼 보이는데 혹시 어떤 부분에 문제가 있는지 확인 부탁드리겠습니다. 그리고 수정하기위해서 어떤 부분을 어떻게 수정해야하는지 부탁드리겠습니다.ㅜ.ㅜ --------------------------------------------------------------- input : N(14),금액(2000000); input : 시작날짜 (20250109); Input : 기준선기간(120); Var : 기준선(0); var : cntt(0),H1(0),L1(0); var : cnt(0),sum(0),mav(0),DD(0); var : AP(0),TT(0),entry(False); var : LL(0),RR(0),rate(0); var : 저항(0), B1(0) ; Var : day(0),EntryDay(0),ddd(0),ED(0); #------------------------------------- if sDate >= 시작날짜 Then { if Bdate != Bdate[1] Then { entry = true; day = day+1; dd = dd+1; } } if TotalTrades > TotalTrades[1] Then entry = False; #------------------------------------- #------------------------------------- sum = 0; For cnt = 0 to N-1 { sum = sum + DayClose(cnt); } mav = (sum/N); #------------------------------------- #--------------------------------------- if (MarketPosition == 0) and (entry == true) and L > mav Then Buy("1차매수",AtLimit,mav,Floor(금액/min(NextBarOpen,mav))); if (LatestEntryName(0) == "1차매수") Then Buy("2차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.15/min(NextBarOpen,mav))); if (LatestEntryName(0) == "2차매수") Then Buy("3차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.2/min(NextBarOpen,mav))); if (LatestEntryName(0) == "3차매수") Then Buy("4차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.25/min(NextBarOpen,mav))); if (LatestEntryName(0) == "4차매수") Then Buy("5차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.3/min(NextBarOpen,mav))); if (LatestEntryName(0) == "5차매수") Then Buy("6차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.35/min(NextBarOpen,mav))); #----------------------------------- if MarketPosition == 1 Then { #전봉대비 수량 감소(일부 청산발생을 위미) if CurrentContracts < CurrentContracts[1] Then { #청산가 저장 var1 = LatestExitPrice(0); if LatestExitName(0) == "3%익절" or LatestExitName(0) == "3-D%익절" or LatestExitName(0) == "3-E%익절" Then Condition1 = true; if LatestExitName(0) == "4%익절" or LatestExitName(0) == "4-D%익절" or LatestExitName(0) == "4-E%익절" Then Condition2 = true; if LatestExitName(0) == "5%익절" or LatestExitName(0) == "5-D%익절" or LatestExitName(0) == "5-E%익절" Then Condition3 = true; if LatestExitName(0) == "7%익절" or LatestExitName(0) == "7-D%익절" Then Condition4 = true; } #전봉대비 수량 증가(추가 진입발생을 의미) if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "4차매수")) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if var1 > 0 and C < Var4 then ExitLong("bx"); if Condition1 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") )Then ExitLong("3%익절",AtLimit,Var4*1.03,"",Floor(Var3*0.2),1); if Condition2 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("4%익절",AtLimit,Var4*1.04,"",Floor(Var3*0.3),1); if Condition3 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("5%익절",AtLimit,Var4*1.05,"",Floor(Var3*0.4),1); if Condition4 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("7%익절",AtLimit,Var4*1.07,"",Floor(Var3*0.1),1); ExitLong("10%익절",AtLimit,Var4*1.10); if Condition1 == False AND ((LatestEntryName(0) == "4차매수"))Then ExitLong("3-D%익절",AtLimit,Var4*1.03,"",Floor(Var3*0.5),1); if Condition2 == False AND ((LatestEntryName(0) == "4차매수")) Then ExitLong("4-D%익절",AtLimit,Var4*1.04,"",Floor(Var3*0.45),1); if Condition3 == False AND ((LatestEntryName(0) == "4차매수")) Then ExitLong("5-D%익절",AtLimit,Var4*1.05,"",Floor(Var3*0.1),1); if Condition1 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수"))Then ExitLong("3-E%익절",AtLimit,Var4*1.03,"",Floor(Var3*0.5),1); if Condition2 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then ExitLong("4-E%익절",AtLimit,Var4*1.04,"",Floor(Var3*0.45),1); if Condition3 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then ExitLong("5-E%익절",AtLimit,Var4*1.05,"",Floor(Var3*0.1),1); } Else#매수진입중이 아니면 { #변수 0으로 초기화 var1 = 0; Var2 = 0; }
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2025-02-03 09:21:20

안녕하세요 예스스탁입니다. 1번 그림에 보시면 1차매수에 진입 수량이 1입니다. 청산식에서 현재수량의 20%에서 정수값만 취하면 0주이기 때문에 신호가 발생하지 않습니다. 수량이 1주가 안되면 1주로 처리되게 수정해 드립니다. input : N(14),금액(2000000); input : 시작날짜 (20250109); Input : 기준선기간(120); Var : 기준선(0); var : cntt(0),H1(0),L1(0); var : cnt(0),sum(0),mav(0),DD(0); var : AP(0),TT(0),entry(False); var : LL(0),RR(0),rate(0); var : 저항(0), B1(0) ; Var : day(0),EntryDay(0),ddd(0),ED(0); #------------------------------------- if sDate >= 시작날짜 Then { if Bdate != Bdate[1] Then { entry = true; day = day+1; dd = dd+1; } } if TotalTrades > TotalTrades[1] Then entry = False; #------------------------------------- #------------------------------------- sum = 0; For cnt = 0 to N-1 { sum = sum + DayClose(cnt); } mav = (sum/N); #------------------------------------- #--------------------------------------- if (MarketPosition == 0) and (entry == true) and L > mav Then Buy("1차매수",AtLimit,mav,Floor(금액/min(NextBarOpen,mav))); if (LatestEntryName(0) == "1차매수") Then Buy("2차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.15/min(NextBarOpen,mav))); if (LatestEntryName(0) == "2차매수") Then Buy("3차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.2/min(NextBarOpen,mav))); if (LatestEntryName(0) == "3차매수") Then Buy("4차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.25/min(NextBarOpen,mav))); if (LatestEntryName(0) == "4차매수") Then Buy("5차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.3/min(NextBarOpen,mav))); if (LatestEntryName(0) == "5차매수") Then Buy("6차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.35/min(NextBarOpen,mav))); #----------------------------------- if MarketPosition == 1 Then { #전봉대비 수량 감소(일부 청산발생을 위미) if CurrentContracts < CurrentContracts[1] Then { #청산가 저장 var1 = LatestExitPrice(0); if LatestExitName(0) == "3%익절" or LatestExitName(0) == "3-D%익절" or LatestExitName(0) == "3-E%익절" Then Condition1 = true; if LatestExitName(0) == "4%익절" or LatestExitName(0) == "4-D%익절" or LatestExitName(0) == "4-E%익절" Then Condition2 = true; if LatestExitName(0) == "5%익절" or LatestExitName(0) == "5-D%익절" or LatestExitName(0) == "5-E%익절" Then Condition3 = true; if LatestExitName(0) == "7%익절" or LatestExitName(0) == "7-D%익절" Then Condition4 = true; } #전봉대비 수량 증가(추가 진입발생을 의미) if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "4차매수")) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if var1 > 0 and C < Var4 then ExitLong("bx"); if Condition1 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") )Then ExitLong("3%익절",AtLimit,Var4*1.03,"",max(1,Floor(Var3*0.2)),1); if Condition2 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("4%익절",AtLimit,Var4*1.04,"",max(1,Floor(Var3*0.3)),1); if Condition3 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("5%익절",AtLimit,Var4*1.05,"",max(1,Floor(Var3*0.4)),1); if Condition4 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("7%익절",AtLimit,Var4*1.07,"",max(1,Floor(Var3*0.1)),1); ExitLong("10%익절",AtLimit,Var4*1.10); if Condition1 == False AND ((LatestEntryName(0) == "4차매수"))Then ExitLong("3-D%익절",AtLimit,Var4*1.03,"",max(1,Floor(Var3*0.5)),1); if Condition2 == False AND ((LatestEntryName(0) == "4차매수")) Then ExitLong("4-D%익절",AtLimit,Var4*1.04,"",max(1,Floor(Var3*0.45)),1); if Condition3 == False AND ((LatestEntryName(0) == "4차매수")) Then ExitLong("5-D%익절",AtLimit,Var4*1.05,"",max(1,Floor(Var3*0.1)),1); if Condition1 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수"))Then ExitLong("3-E%익절",AtLimit,Var4*1.03,"",max(1,Floor(Var3*0.5)),1); if Condition2 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then ExitLong("4-E%익절",AtLimit,Var4*1.04,"",max(1,Floor(Var3*0.45)),1); if Condition3 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then ExitLong("5-E%익절",AtLimit,Var4*1.05,"",max(1,Floor(Var3*0.1)),1); } Else#매수진입중이 아니면 { #변수 0으로 초기화 var1 = 0; Var2 = 0; } 즐거운 하루되세요 > 맴맴잉 님이 쓴 글입니다. > 제목 : 시스템식 요청드립니다. > 아래의 식에서 오류가 있는데 어떤식으로 수정해야 할지 몰라 요청드립니다. 아래의 시스템식은 주가가 14 이평선위에 있다가 해당 이평선을 하향돌파했을때 매수하는 시스템식으로 그림 파일1을 보시면 14일선 아래에 있다가 갭하락으로 시가가 시작했을때 매수가 되었습니다. 그런데, 매도는 매수평단에서 3% 4% 5% 분할매도가 되어야 하는데, 분할매도가 안됩니다. 그림파일 2를 보시면 평소엔 잘 되는것 같습니다. 1번의 경우가 갭하락으로 인해서 문제가 발생한것 처럼 보이는데 혹시 어떤 부분에 문제가 있는지 확인 부탁드리겠습니다. 그리고 수정하기위해서 어떤 부분을 어떻게 수정해야하는지 부탁드리겠습니다.ㅜ.ㅜ --------------------------------------------------------------- input : N(14),금액(2000000); input : 시작날짜 (20250109); Input : 기준선기간(120); Var : 기준선(0); var : cntt(0),H1(0),L1(0); var : cnt(0),sum(0),mav(0),DD(0); var : AP(0),TT(0),entry(False); var : LL(0),RR(0),rate(0); var : 저항(0), B1(0) ; Var : day(0),EntryDay(0),ddd(0),ED(0); #------------------------------------- if sDate >= 시작날짜 Then { if Bdate != Bdate[1] Then { entry = true; day = day+1; dd = dd+1; } } if TotalTrades > TotalTrades[1] Then entry = False; #------------------------------------- #------------------------------------- sum = 0; For cnt = 0 to N-1 { sum = sum + DayClose(cnt); } mav = (sum/N); #------------------------------------- #--------------------------------------- if (MarketPosition == 0) and (entry == true) and L > mav Then Buy("1차매수",AtLimit,mav,Floor(금액/min(NextBarOpen,mav))); if (LatestEntryName(0) == "1차매수") Then Buy("2차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.15/min(NextBarOpen,mav))); if (LatestEntryName(0) == "2차매수") Then Buy("3차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.2/min(NextBarOpen,mav))); if (LatestEntryName(0) == "3차매수") Then Buy("4차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.25/min(NextBarOpen,mav))); if (LatestEntryName(0) == "4차매수") Then Buy("5차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.3/min(NextBarOpen,mav))); if (LatestEntryName(0) == "5차매수") Then Buy("6차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.35/min(NextBarOpen,mav))); #----------------------------------- if MarketPosition == 1 Then { #전봉대비 수량 감소(일부 청산발생을 위미) if CurrentContracts < CurrentContracts[1] Then { #청산가 저장 var1 = LatestExitPrice(0); if LatestExitName(0) == "3%익절" or LatestExitName(0) == "3-D%익절" or LatestExitName(0) == "3-E%익절" Then Condition1 = true; if LatestExitName(0) == "4%익절" or LatestExitName(0) == "4-D%익절" or LatestExitName(0) == "4-E%익절" Then Condition2 = true; if LatestExitName(0) == "5%익절" or LatestExitName(0) == "5-D%익절" or LatestExitName(0) == "5-E%익절" Then Condition3 = true; if LatestExitName(0) == "7%익절" or LatestExitName(0) == "7-D%익절" Then Condition4 = true; } #전봉대비 수량 증가(추가 진입발생을 의미) if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "4차매수")) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if CurrentContracts > CurrentContracts[1] AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then { #현재수량 저장 Var3 = CurrentContracts; Var4 = AvgEntryPrice; Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; } if var1 > 0 and C < Var4 then ExitLong("bx"); if Condition1 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") )Then ExitLong("3%익절",AtLimit,Var4*1.03,"",Floor(Var3*0.2),1); if Condition2 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("4%익절",AtLimit,Var4*1.04,"",Floor(Var3*0.3),1); if Condition3 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("5%익절",AtLimit,Var4*1.05,"",Floor(Var3*0.4),1); if Condition4 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") ) Then ExitLong("7%익절",AtLimit,Var4*1.07,"",Floor(Var3*0.1),1); ExitLong("10%익절",AtLimit,Var4*1.10); if Condition1 == False AND ((LatestEntryName(0) == "4차매수"))Then ExitLong("3-D%익절",AtLimit,Var4*1.03,"",Floor(Var3*0.5),1); if Condition2 == False AND ((LatestEntryName(0) == "4차매수")) Then ExitLong("4-D%익절",AtLimit,Var4*1.04,"",Floor(Var3*0.45),1); if Condition3 == False AND ((LatestEntryName(0) == "4차매수")) Then ExitLong("5-D%익절",AtLimit,Var4*1.05,"",Floor(Var3*0.1),1); if Condition1 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수"))Then ExitLong("3-E%익절",AtLimit,Var4*1.03,"",Floor(Var3*0.5),1); if Condition2 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then ExitLong("4-E%익절",AtLimit,Var4*1.04,"",Floor(Var3*0.45),1); if Condition3 == False AND ((LatestEntryName(0) == "6차매수") or (LatestEntryName(0) == "5차매수")) Then ExitLong("5-E%익절",AtLimit,Var4*1.05,"",Floor(Var3*0.1),1); } Else#매수진입중이 아니면 { #변수 0으로 초기화 var1 = 0; Var2 = 0; }