커뮤니티

실패연속시 중복진입 식은 어떻게 하나요?

프로필 이미지
calypso
2005-08-04 16:58:38
1051
글번호 7940
답변완료
안녕하세요. 시스템식을 좀 더 보완하려고 수정 중입니다. 정상적인 진입, 청산식에 더하여 실패가 과거 5회중 3회이상일 경우는 중복진입식을 만들려고 하는데 아래와 같이 했더니 신호가 안 나오네요. 검토 바랍니다.(중간에 추가식이라 앞 뒤 선언문과 매수신호식은 생략합니다) // MartinGail 전략 win = 0 ; Fail = 0 ; For count = 1 to 5 begin If MarketPosition(count) == 1 and (ExitPrice(count) - EntryPrice(count)) <= 0 then Begin fail = fail + 1; end If MarketPosition(count) == -1 and (ExitPrice(count) - EntryPrice(count)) >= 0 then Begin fail = fail + 1; end end // 매수매도 진입 ========================================== If buysig == 1 Then begin Buy("O1", OnClose, DEF, 1); Exitshort("O2", OnClose, DEF,"O3", 1); end If sellsig == 1 Then begin Sell("O3", OnClose, DEF, 1); Exitlong("O4", OnClose, DEF,"O1", 1); end //MartinGail 중복진입 If buysig == 1 and fail >= 2 Then begin Buy("O5", OnClose, DEF, 2); Exitshort("O6", OnClose, DEF,"O7", 2); end If sellsig == 1 and fail >= 2 Then begin Sell("O7", OnClose, DEF, 2); Exitlong("O8", OnClose, DEF,"O5", 2); end
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2005-08-05 17:49:43

안녕하세요 예스스탁입니다. 정확한 내용을 알수 없습니다. 다만 손실횟수를 카운트를 추가매수부분에 함께 써주셔야 매봉에서 카운트가 올라가지 않습니다. 작성한식에서는 매봉에서 채크를 하므로 카운트가 지속적으로 올라갑니다. 즐거운 하루되세요 > calypso 님이 쓴 글입니다. > 제목 : 실패연속시 중복진입 식은 어떻게 하나요? > 안녕하세요. 시스템식을 좀 더 보완하려고 수정 중입니다. 정상적인 진입, 청산식에 더하여 실패가 과거 5회중 3회이상일 경우는 중복진입식을 만들려고 하는데 아래와 같이 했더니 신호가 안 나오네요. 검토 바랍니다.(중간에 추가식이라 앞 뒤 선언문과 매수신호식은 생략합니다) // MartinGail 전략 win = 0 ; Fail = 0 ; For count = 1 to 5 begin If MarketPosition(count) == 1 and (ExitPrice(count) - EntryPrice(count)) <= 0 then Begin fail = fail + 1; end If MarketPosition(count) == -1 and (ExitPrice(count) - EntryPrice(count)) >= 0 then Begin fail = fail + 1; end end // 매수매도 진입 ========================================== If buysig == 1 Then begin Buy("O1", OnClose, DEF, 1); Exitshort("O2", OnClose, DEF,"O3", 1); end If sellsig == 1 Then begin Sell("O3", OnClose, DEF, 1); Exitlong("O4", OnClose, DEF,"O1", 1); end //MartinGail 중복진입 If buysig == 1 and fail >= 2 Then begin Buy("O5", OnClose, DEF, 2); Exitshort("O6", OnClose, DEF,"O7", 2); end If sellsig == 1 and fail >= 2 Then begin Sell("O7", OnClose, DEF, 2); Exitlong("O8", OnClose, DEF,"O5", 2); end