커뮤니티

수식 문의

프로필 이미지
개포빠가사리
2010-01-23 17:19:00
757
글번호 27647
답변완료
안녕하세요 아래 전략식을 대입해보았는데 괄호 부분이(If EntriesToday(date) < 1 Then {) 오류가 나오는 군요 정정 부탁드립니다. 전략내용 : 볼린져밴드가 확대될때 N봉 최고가 + X point 도달시 매수, N봉 최저가 - X point 도달시 매도 Input: Length(28),StdVal(2), xpoint(0.1); Vars: NewMarketParadigm(0), NmpC(0),NmpE(0),NmpT(0),Trigger(0); value1 = BollBandUp(Length,StdVal); //볼린져밴드 상단선 value2 = BollBandDown(Length,StdVal); //볼린져밴드 하단선 Condition1 = value1 < value1[1] and value2 > value2[1]; //밴드폭이 축소(상단선은 하락 하단선은 상승)되는 경우 true 이외의 경우 false를 저장 Condition2 = value1 > value1[1] and value2 < value2[1]; //밴드폭이 확대(상단선은 상승 하단선은 하락)되는 경우 true 이외의 경우 false를 저장 Condition3 = Condition1 == False and Condition2 == False; //같은 방향으로 움직이면 true 반대방향(확대되거나 축소되면)으로 움직이면 false IF Condition1 then NewMarketParadigm = 1; //A조건이 참이면 NewMarketParadigm에 1저장 IF Condition2 then NewMarketParadigm = 2; //B조건이 참이면 NewMarketParadigm에 2저장 IF Condition3 then NewMarketParadigm = 3; //C조건이 참이면 NewMarketParadigm에 3저장 #1 If NewMarketParadigm == 1 then NmpC = NmpC + 1; Else NmpC = 0; If NewMarketParadigm == 2 then //밴드폭이 확대(상단선은 상승 하단선은 하락)되면 NmpE = NmpE + 1 ; //NmpE에 1씩 증가 Else NmpE = 0; If NewMarketParadigm == 3 then NmpT = 1; Else NmpT = 0; #2 Condition4 = NmpE > 1; If Condition4 then begin //밴드가 연속 2봉 이상 확대되면 Trigger = 1; //Trigger에 1저장 End; #3 If EntriesToday(date) < 1 Then { If Trigger == 1 then begin //밴드가 연속 2봉 이상 확대되고 Buy("B1", atstop, Highest(High,10) + xpoint); //N봉고가 + X point도달시 매수 Sell("S1", atstop, Lowest(Low,10) - xpoint); //N봉저가 - X point 도달시 매도 End; } 감사합니다
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2010-06-24 15:20:19

안녕하세요 예스스탁입니다. EntriesToday는 기본으로 제공되는 함수가 아닙니다. 함수를 첨부파일로 올려드립니다. 즐거운 하루되세요 > 개포빠가사리 님이 쓴 글입니다. > 제목 : 수식 문의 > 안녕하세요 아래 전략식을 대입해보았는데 괄호 부분이(If EntriesToday(date) < 1 Then {) 오류가 나오는 군요 정정 부탁드립니다. 전략내용 : 볼린져밴드가 확대될때 N봉 최고가 + X point 도달시 매수, N봉 최저가 - X point 도달시 매도 Input: Length(28),StdVal(2), xpoint(0.1); Vars: NewMarketParadigm(0), NmpC(0),NmpE(0),NmpT(0),Trigger(0); value1 = BollBandUp(Length,StdVal); //볼린져밴드 상단선 value2 = BollBandDown(Length,StdVal); //볼린져밴드 하단선 Condition1 = value1 < value1[1] and value2 > value2[1]; //밴드폭이 축소(상단선은 하락 하단선은 상승)되는 경우 true 이외의 경우 false를 저장 Condition2 = value1 > value1[1] and value2 < value2[1]; //밴드폭이 확대(상단선은 상승 하단선은 하락)되는 경우 true 이외의 경우 false를 저장 Condition3 = Condition1 == False and Condition2 == False; //같은 방향으로 움직이면 true 반대방향(확대되거나 축소되면)으로 움직이면 false IF Condition1 then NewMarketParadigm = 1; //A조건이 참이면 NewMarketParadigm에 1저장 IF Condition2 then NewMarketParadigm = 2; //B조건이 참이면 NewMarketParadigm에 2저장 IF Condition3 then NewMarketParadigm = 3; //C조건이 참이면 NewMarketParadigm에 3저장 #1 If NewMarketParadigm == 1 then NmpC = NmpC + 1; Else NmpC = 0; If NewMarketParadigm == 2 then //밴드폭이 확대(상단선은 상승 하단선은 하락)되면 NmpE = NmpE + 1 ; //NmpE에 1씩 증가 Else NmpE = 0; If NewMarketParadigm == 3 then NmpT = 1; Else NmpT = 0; #2 Condition4 = NmpE > 1; If Condition4 then begin //밴드가 연속 2봉 이상 확대되면 Trigger = 1; //Trigger에 1저장 End; #3 If EntriesToday(date) < 1 Then { If Trigger == 1 then begin //밴드가 연속 2봉 이상 확대되고 Buy("B1", atstop, Highest(High,10) + xpoint); //N봉고가 + X point도달시 매수 Sell("S1", atstop, Lowest(Low,10) - xpoint); //N봉저가 - X point 도달시 매도 End; } 감사합니다