안녕하세요 예스스탁입니다. 식을 수정했습니다. 피라미딩은 다른진입신호만 허용으로 설정하고 적용하셔야 합니다. 1 각 추가진입이 가장 최근 진입가 기준으로 되어 있어 4차매수 후 청산되면 다시 4차가격이 아닌 5차가격으로 되었습니다. 각 추가매수를 첫진입가의 5%단위로 변경했습니다. 2 4차,5차,6차는 익절청산은 기존에 4차이후 평단이었는데 각 차의 진입가격에서 +4.5% 익절되게 수정했습니다. 3 3%~7%익절은 3차매수까지의 평단가를 기준으로 하고 bx청산은 현재 진입횟수가 3회이하인경우 3%~7%익절이 한번이상 발생한 이후에 3차매수 까지의 평단가 아래로 내려오면 청산하게 수정했습니다. 수식에 3-D%익절과 같은 청산명이 사용되었는데 청산식은 없어 제외했습니다. 4 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); var : sum1(0),sum2(0),sum3(0),avg4(0),avg5(0),avg6(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 MarketPosition == 1 and L > EntryPrice*0.95 and CurrentEntries == 1 Then Buy("2차매수",AtLimit,EntryPrice*0.95,Floor(금액*1.15/min(NextBarOpen,mav))); if MarketPosition == 1 and L > EntryPrice*0.90 and CurrentEntries == 2 Then Buy("3차매수",AtLimit,EntryPrice*0.90,Floor(금액*1.2/min(NextBarOpen,mav))); if MarketPosition == 1 and L > EntryPrice*0.85 and CurrentEntries == 3 Then Buy("4차매수",AtLimit,EntryPrice*0.85,Floor(금액*1.25/min(NextBarOpen,mav))); if MarketPosition == 1 and L > EntryPrice*0.80 and CurrentEntries == 4 Then Buy("5차매수",AtLimit,EntryPrice*0.80,Floor(금액*1.3/min(NextBarOpen,mav))); if MarketPosition == 1 and L > EntryPrice*0.75 and CurrentEntries == 5 Then Buy("6차매수",AtLimit,EntryPrice*0.75,Floor(금액*1.35/min(NextBarOpen,mav))); #----------------------------------- if MarketPosition == 1 Then { #전봉대비 수량 감소(일부 청산발생을 위미) if CurrentContracts < CurrentContracts[1] Then { #최근 청산가 저장 var1 = LatestExitPrice(0); if LatestExitName(0) == "3%익절" Then Condition1 = true; if LatestExitName(0) == "4%익절" Then Condition2 = true; if LatestExitName(0) == "5%익절" Then Condition3 = true; if LatestExitName(0) == "7%익절" Then Condition4 = true; } #전봉대비 수량 증가(진입발생) if CurrentContracts > CurrentContracts[1] Then { #Condition1~4는 False로 초기화 Condition1 = False; Condition2 = False; Condition3 = False; Condition4 = False; #진입횟수가 3회이하일때 #수량과 평단가 if CurrentEntries <= 3 Then { Var3 = CurrentContracts; Var4 = AvgEntryPrice; } #최근 진입시점까지의 수량과 평단가 #현재 수식에서는 사용되는 부분이 없습니다. 필요하실따봐 변수로 남겨드립니다. Var5 = CurrentContracts; Var6 = AvgEntryPrice; } #현재 진입횟수가 3회 이하이고(1,2,3차 매수만 남은 상태) #3,4,5,7% 청산중 하나가 발생했으면 #종가가 3차매수까지의 평단가 이하로 내려오면 청산 if CurrentEntries <= 3 and (Condition1 == true or Condition2 == true or Condition3 == true or Condition4 == true) and C < Var4*1.007 then ExitLong("bx"); if Condition1 == False AND CurrentEntries <= 3 Then ExitLong("3%익절",AtLimit,Var4*1.03,"",Floor(Var3*0.2),1); if Condition2 == False AND CurrentEntries <= 3 Then ExitLong("4%익절",AtLimit,Var4*1.04,"",Floor(Var3*0.3),1); if Condition3 == False AND CurrentEntries <= 3 Then ExitLong("5%익절",AtLimit,Var4*1.05,"",Floor(Var3*0.4),1); if Condition4 == False AND CurrentEntries <= 3 Then ExitLong("7%익절",AtLimit,Var4*1.07,"",Floor(Var3*0.1),1); ExitLong("10%익절",AtLimit,Var4*1.10); //4차 이상 진입 if CurrentEntries >= 4 Then { //4차 이후의 평균 if CurrentContracts > CurrentContracts[1] and LatestEntryName(0) == "4차매수" Then { avg4 = LatestEntryPrice(0); } if CurrentContracts > CurrentContracts[1] and LatestEntryName(0) == "5차매수" Then { avg5 = LatestEntryPrice(0); } if CurrentContracts > CurrentContracts[1] and LatestEntryName(0) == "6차매수" Then { avg6 = LatestEntryPrice(0); } if CurrentEntries >= 4 Then ExitLong("4차매수익절",AtLimit,avg4*1.045,"4차매수"); if CurrentEntries >= 5 Then ExitLong("5차매수익절",AtLimit,avg5*1.045,"5차매수"); if CurrentEntries >= 6 Then ExitLong("6차매수익절",AtLimit,avg6*1.045,"6차매수"); } Else { avg4 = 0; avg5 = 0; avg6 = 0; } } Else#매수진입중이 아니면 { #변수 0으로 초기화 var1 = 0; Var2 = 0; } 즐거운 하루되세요 > 맴맴잉 님이 쓴 글입니다. > 제목 : 시스템식 요청드립니다. > 아래의 글을 보시면 말씀하신데로 메세지로그 함수를 이용해서 디버깅 창에서 avgentryprice 값을 확인 해봤습니다. 확인 결과 1~3타점까지 매수 하고 4타점에서 매수후 4타점만 매도 했을경우 평단이 다시 올라가는걸 확인할수 있었습니다. 요청사항으로 1. 내부변수로 평단가를 저장하고 싶은데, 저장하는 시스템식 추가 부탁드립니다. 생각으로는 각 타점당 매수했을때 수량과 평단을 저장하여 ((평단 x 수량) + (마지막타점 x 마지막 타점 수량)) / 전체수량 이런식으로 평단을 저장하면 될것 같은데 하다가 잘 안되서 요청드립니다. 2. 그림 1을 보시면 4타점 매수, 4타점 매도익절 후 당일 다시 매수타점이 왔는데, 매수가 안되고 다음날 매수가 되었습니다. 매수식을 봐도 당일날 매수가 안되는 이유가 없는데, 왜 안되는지 확인 부탁드리겠습니다. ------------------------------------------------------------- 안녕하세요 예스스탁입니다. 평단가는 avgEntryPrice 함수가 진입가격 수량등으로 정확히 계산해 리턴합니다. 지금 현재봉 기준 전체 진입의 평단가는 avgEntryPrice값을 이용하시면 되고 진입횟수로 저장하고자 하시면 이전 답변받으신 내용과 같이 특정 진입횟수 이하일때 평단가를 저장해 사용하시면 됩니다. messagelog함수로 수식 안에서 계산된 값들을 디버깅창에 출력해서 확인해 보시기 바랍니다. 즐거운 하루되세요 > 맴맴잉 님이 쓴 글입니다. > 제목 : 시스템식 요청드립니다. > 방금 밑에 수식 요청드렸었는데 수정하셧던 식을 적용하였더니 그림 1과 같이 나오게 되었습니다. 그래서 일부 수정하여 그림 2와 같이 나오게 되었는데 궁금한점은 1~6차 까지 매수하면서 4~6차의 경우 매수매도가 반복 되면서 평단이 밑으로 많이 내려갔을것 같은데 정확히 평단이 얼마인지는 알수 없나요?? 그리고 아래의 시스템식으로 적용 하면 내려간 평단에서 3% 가 되었을때 익절이 되는게 맞는건지 궁금합니다. ----------------------------------------------------------- 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); var : sum1(0),sum2(0),sum3(0),avg4(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 MarketPosition == 1 and (LatestEntryName(0) == "1차매수") and L > LatestEntryPrice(0)*0.95 Then Buy("2차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.15/min(NextBarOpen,mav))); if MarketPosition == 1 and (LatestEntryName(0) == "2차매수") and L > LatestEntryPrice(0)*0.95 Then Buy("3차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.2/min(NextBarOpen,mav))); if MarketPosition == 1 and (LatestEntryName(0) == "3차매수" or LatestExitName(0) == "4차이후익절4" or LatestExitName(0) == "4차이후익절5") or LatestExitName(0) == "4차이후익절6" and L <= LatestEntryPrice(0)*0.95 Then Buy("4차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.25/min(NextBarOpen,mav))); if MarketPosition == 1 and (LatestEntryName(0) == "4차매수" or LatestExitName(0) == "4차이후익절5") or LatestExitName(0) == "4차이후익절6" and L <= LatestEntryPrice(0)*0.95 Then Buy("5차매수",AtLimit,LatestEntryPrice(0)*0.95,Floor(금액*1.3/min(NextBarOpen,mav))); if MarketPosition == 1 and (LatestEntryName(0) == "5차매수" or LatestExitName(0) == "4차이후익절6") and L <= LatestEntryPrice(0)*0.95 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 CurrentEntries <= 2 and var1 > 0 and C < Var4*1.007 then ExitLong("bx"); if Condition1 == False AND ((LatestEntryName(0) == "1차매수") OR (LatestEntryName(0) == "2차매수") or (LatestEntryName(0) == "3차매수") )Then ExitLong("3%익절",AtLimit,Var4*1.02,"",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); //4차 이상 진입 if CurrentEntries >= 4 Then { //4차 이후의 평듄 if CurrentContracts > CurrentContracts[1] Then { sum1 = sum1 + C*(CurrentContracts-CurrentContracts[1]); sum2 = sum2 + (CurrentContracts-CurrentContracts[1]); avg4 = sum1/sum2; } if CurrentEntries >= 4 Then ExitLong("4차이후익절4",AtLimit,avg4*1.045,"4차매수"); if CurrentEntries >= 5 Then ExitLong("4차이후익절5",AtLimit,avg4*1.045,"5차매수"); if CurrentEntries >= 6 Then ExitLong("4차이후익절6",AtLimit,avg4*1.045,"6차매수"); } Else { sum1 = 0; sum2 = 0; avg4 = 0; } } Else#매수진입중이 아니면 { #변수 0으로 초기화 var1 = 0; Var2 = 0; } #MessageLog("%.f",AvgEntryPrice);