커뮤니티
실패연속시 중복진입 식은 어떻게 하나요?
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
이전글