Metastock Code für W4H4 System (Traders Magazin März 2003)
Hallo,
hier der MetaStock Code für einen Expert Advisor in MetaStock, da einige Punkte nicht klar definiert sind (2 Handelssignale hintereinander, Long Signal bei Short Trade, Short Signal bei Long Trade) habe ich von einen Systemtest abgesehen. Während der gefärbten Candles ist man bei grün long und bei rot short.
Enter Long:
RSI3M3:=Mov(RSI(C,3),3,E);
b:=Mov(C,10,E);
Alert(Cross(RSI3M3,30),4) AND Cross(C,b)
Exit Long:
RSI3M3:=Mov(RSI(C,3),3,E);
b:=Mov(C,10,E);
LSET:=Alert(Cross(RSI3M3,30),4) AND Cross(C,b);
LSTOP:=ValueWhen(1,BarsSince(lset=2),L);
BarsSince(lset=1)=4
Enter Short:
RSI3M3:=Mov(RSI(C,3),3,E);
b:=Mov(C,10,E);
Alert(Cross(70,RSI3M3),4) AND Cross(b,C)
Exit Short:
RSI3M3:=Mov(RSI(C,3),3,E);
b:=Mov(C,10,E);
RSET:=Alert(Cross(70,RSI3M3),4) AND Cross(b,C);
BarsSince(rset=1)=4
Stop Long:
RSI3M3:=Mov(RSI(C,3),3,E);
b:=Mov(C,10,E);
LSET:=Alert(Cross(RSI3M3,30),4) AND Cross(C,b);
LSTOP:=ValueWhen(1,Ref(lset,-3)=1,L);
(C < lstop) AND BarsSince(lset=3)
Stop Short:
RSI3M3:=Mov(RSI(C,3),3,E);
b:=Mov(C,10,E);
RSET:=Alert(Cross(70,RSI3M3),4) AND Cross(b,C);
RSTOP:=ValueWhen(1,Ref(rset,-3)=1,H);
(C < rstop) AND BarsSince(rset=3)
Die Performance kann deutlich verbessert werden, wenn man die Handelsbedingung etwas abändert: Statt den Cross des RMI3M3 zu betrachten, fragt man ab, ob einem Cross der Mov(C,9,E) ein überkaufter/überverkaufter RMI3M3 vorausging.
Ansonsten noch den Hinweis: Das Benutzen dieses Systems geschieht auf eigene Gefahr und leider weiß ich genau, ob ich den Artikel auch richtig verstanden habe ;)