커뮤니티
이동평균선 시스탬 수정부탁합니다
2011-06-11 18:07:03
666
글번호 39645
1)매수진입
a)9개봉의 단기 이동평균선선 18개 장기 이동평균선을 상향돌파교차 하면 이전12개봉의 최고가를 찾고 여기에 1.03을 곱한다 이값에 매수진입가격이다
b)이동평균선 상향교차가 나타나면 진입가에 buy stop주문을 넣는다 이주문은 교차 이후 12개봉이 완성될때짜지 유효하다
c)만약 매수 포지션을 가지고 있다면 매수 청산규칙에 의해 청산을 하였다면 최근 10개봉의 최고가에 buy stop 주문을 걸고 청산이후 15개봉 까지 주문이 유효도록 한다
2)매도진입
조건1에 반대
3)청산 이전8개봉의 최저가에 도달하면 매수 포지션을 청산한다
이전8개봉의 최고가에 도달하면 매도 표지션 청산
첨부파일 수정 부탁함니다
- 1. 39946_1. Moving Average Crossover System.txt (0.00 MB)
답변 1
예스스탁 예스스탁 답변
2011-06-13 10:19:09
안녕하세요
예스스탁입니다.
Input: FastLen(9), SlowLen(18), ChLen(12), TrailBar(8), Initial(300), ReBars(15), Reentry(100);
Vars: FastMA(0), SlowMA(0), LEntryPrice(0), SEntryPrice(0), LCount(-999), SCount(-999), ReEntryCount(0), CurrentPosition(0);
FastMA = ma(Close,FastLen);
SlowMA = ma(Close,SlowLen);
#{ Order Placement for Long Positions }
If crossup(FastMA,SlowMA) and index > 1 then Begin
LEntryPrice = Highest( High , TrailBar )[1] * 1.02;
LCount = barindex;
End;
If MarketPosition <> 1 AND index < LCount + ChLen then
Buy("Cross Over Buy",AtStop,LEntryPrice);
#{ Order Placement for Short Positions }
If CrossDown(FastMA, SlowMA) and index > 1 then Begin
SEntryPrice = Lowest( Low , TrailBar )[1] *.98;
SCount = index;
End;
If MarketPosition <> -1 AND index < SCount + ChLen then
Sell("Cross Under Buy",AtStop, SEntryPrice);
#{ Trailing Stop while in Position }
If MarketPosition == 1 then begin
LCount = -999;
ExitLong("LongTStop",AtStop,Lowest( Low , TrailBar ));
End;
If MarketPosition == -1 then Begin
SCount = -999;
ExitShort("ShortTStop",AtStop,Highest( High , TrailBar ));
End;
#{ Reentry Technique }
CurrentPosition = MarketPosition;
If CurrentPosition == 0 AND CurrentPosition[1] == -1 then
ReEntryCount = 1;
If CurrentPosition == 0 AND CurrentPosition[1] == 1 then
ReEntryCount = 1;
If MarketPosition == 0 AND MarketPosition(1) == 1 AND ReEntryCount < ReBars then Begin
ReEntryCount = ReEntryCount + 1;
Buy("Long ReEntry",AtStop,Highest( High , 10 ));
End;
If MarketPosition == 0 AND MarketPosition(1) == -1 AND ReEntryCount < ReBars then Begin
ReEntryCount = ReEntryCount + 1;
Sell("Short ReEntry",AtStop,Lowest( Low , 10 ));
End;
즐거운 하루되세요
> 대두 님이 쓴 글입니다.
> 제목 : 이동평균선 시스탬 수정부탁합니다
> 1)매수진입
a)9개봉의 단기 이동평균선선 18개 장기 이동평균선을 상향돌파교차 하면 이전12개봉의 최고가를 찾고 여기에 1.03을 곱한다 이값에 매수진입가격이다
b)이동평균선 상향교차가 나타나면 진입가에 buy stop주문을 넣는다 이주문은 교차 이후 12개봉이 완성될때짜지 유효하다
c)만약 매수 포지션을 가지고 있다면 매수 청산규칙에 의해 청산을 하였다면 최근 10개봉의 최고가에 buy stop 주문을 걸고 청산이후 15개봉 까지 주문이 유효도록 한다
2)매도진입
조건1에 반대
3)청산 이전8개봉의 최저가에 도달하면 매수 포지션을 청산한다
이전8개봉의 최고가에 도달하면 매도 표지션 청산
첨부파일 수정 부탁함니다
다음글
이전글