안녕하세요 예스스탁입니다. input : SLpoint(1),PTpoint(1); var :SP(0),Year(0); Year = Floor(sDate / 10000); SP = MarketPosition; Value2 = 15 - dayofweek((10000 * Year) + (100 * 3) + 1); // 3월 두번째 일요일 날짜 value4 = 8 - dayofweek((10000 * Year) + (100 * 11) + 1); // 11월 첫번째 일요일 날짜 If date > (10000 * Year) + (100 * 3) + value2 And date < (10000 * Year) + (100 * 11) + value4 Then SetStopEndofday(033000); Else SetStopEndofday(043000); if stime == 223100 Then Begin if C > O Then Buy("Buy",Atmarket); Else if C < O Then Sell("Sell",Atmarket); End; if stime == 223600 Then Begin if C > O Then Begin if SP == 1 Then Buy("Buy2", Atmarket); Else if SP = -1 Then ExitShort("ES",Atmarket); End Else if C < O Then Begin if SP == -1 Then Sell("Sell2", Atmarket); Else if SP = 1 Then ExitLong("EL",Atmarket); End; End; SetStopLoss(SLpoint ,pointstop); SetStopProfittarget(PTpoint,pointstop); 즐거운 하루되세요 > 흰둥이아빠 님이 쓴 글입니다. > 제목 : 함수요청 > 안녕하세요? 아래는 하나금융투자에서 사용했던 전략입니다. 한국투자증권에서도 사용할 수 있도록 함수변환 요청드립니다. Param : SLpoint(1),PTpoint(1); var :SP(0); SP = SignalPosition; Value2 = 15 - dayofweek((10000 * Year(D)) + (100 * 3) + 1); // 3월 두번째 일요일 날짜 value4 = 8 - dayofweek((10000 * Year(D)) + (100 * 11) + 1); // 11월 첫번째 일요일 날짜 If date > (10000 * Year(D)) + (100 * 3) + value2 And date < (10000 * Year(D)) + (100 * 11) + value4 Then SetStopEndofday(033000) Else SetStopEndofday(043000); if time = 223100 Then Begin if C > O Then Buy("Buy",Atmarket) Else if C < O Then Sell("Sell",Atmarket); End; if time = 223600 Then Begin if C > O Then Begin if SP = 1 Then Buy("Buy2", Atmarket) Else if SP = -1 Then ExitShort("ES",Atmarket); End Else if C < O Then Begin if SP = -1 Then Sell("Sell2", Atmarket) Else if SP = 1 Then ExitLong("EL",Atmarket); End; End; SetStopLoss(SLpoint ,pointstop); SetStopProfittarget(PTpoint,pointstop);