커뮤니티

59756 글에 대한 추가 질물에 대한 답변좀 부탁드릴께요~~

프로필 이미지
이형지
2018-10-25 19:05:54
144
글번호 123064
답변완료
59756 글에 대한 추가 질물에 대한 답변좀 부탁드릴께요~~ 요지는 청산 수식이 endtime으로 시간이 도달시 조건 없이 청산이였는데 조건을 하나 추가로 다는거였습니다. ( endtime이 된후 양봉일때는 청산X 첫 음봉일때 청산) 답변주신대로 수식을 적용해보면 첨부화일에보인것처럼 진입-청산이 의도와 완전 다르게 되어서 재 질문하게 된거였습니다. 해당 추가 질물에 답변 바람니다.
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2018-10-26 13:07:10

안녕하세요 예스스탁입니다. input : P1(-0.3),P2(0.8),P3(8),P4(-0.4),P5(0.4),p6(1000),starttime(223000),endtime(150000),P7(1.5),P8(0.8); input : N(1); var : cnt(0),sum(0),sum1(0),mav(0),mav1(0),T(0),mav2(0),mav3(0); var : sum3(0),Tcond(false); Condition1 = MarketPosition == 0 and ExitDate(1) == sdate and (IsExitName("StopLoss",1) or IsExitName("StopProfitTarget",1)) and TimeToMinutes(stime) <= TimeToMinutes(ExitTime(1))+p6; if (sdate != sdate[1] and stime >= starttime) or (sdate == sdate[1] and stime >= starttime and stime[1] < starttime) then { Tcond = true; } if (sdate != sdate[1] and stime >= endtime) or (sdate == sdate[1] and stime >= endtime and stime[1] < endtime) then { Tcond = false; } if DayClose(P3) > 0 Then { sum = 0; sum1 = 0; for cnt = 0 to P3-1 { sum = sum + DayClose(cnt); sum1 = sum1 + DayClose(cnt+1); } mav = sum/P3; mav1 = sum1/P3; T = 0; if mav > mav1 Then T = 1; if mav < mav1 Then T = -1; if T == 1 Then mav2=p2 ; if T == -1 Then mav2=p5; if T == 1 Then mav3=p1 ; if T == -1 Then mav3=p4 ; sum3 = 0; for cnt = 1 to 20 { sum3 = sum3 + (DayHigh(cnt)-DayLow(cnt)); } value1 = sum3/20 ; if Tcond == true then { If MarketPosition == 0 and C >= (dayopen+value1*mav3) and C<C[1] and Condition1 == false Then { Buy("매수"); } if MaxEntries == 1 and MarketPosition == 1 Then { buy("추가매수",atlimit,EntryPrice-P7); } If MarketPosition == 0 and C <= (dayopen-value1*mav2) and C>C[1] and Condition1 == false Then { sell("매도"); } if MaxEntries == 1 and MarketPosition == -1 Then { Sell("추가매도",atlimit,EntryPrice+P8); } } } if MarketPosition == 1 and Tcond == false and BarsSinceEntry >= N and countif(C<O,N) == 1 Then ExitLong("bx"); if MarketPosition == -1 and Tcond == false and BarsSinceEntry >= N and countif(C>O,N) == 1 Then ExitShort("sx"); 즐거운 하루되세요 > 이형지 님이 쓴 글입니다. > 제목 : 59756 글에 대한 추가 질물에 대한 답변좀 부탁드릴께요~~ > 59756 글에 대한 추가 질물에 대한 답변좀 부탁드릴께요~~ 요지는 청산 수식이 endtime으로 시간이 도달시 조건 없이 청산이였는데 조건을 하나 추가로 다는거였습니다. ( endtime이 된후 양봉일때는 청산X 첫 음봉일때 청산) 답변주신대로 수식을 적용해보면 첨부화일에보인것처럼 진입-청산이 의도와 완전 다르게 되어서 재 질문하게 된거였습니다. 해당 추가 질물에 답변 바람니다.