MA5:=MA(C,5);
MA10:=MA(C,10);
VARJ1:=(C+L+H)/3;
VARJ2:=EMA(VARJ1,6);
VARJ3:=EMA(VARJ2,5);
HH:=IF(MA(H,3)>HHV(MA5,3),MA(H,3),IF(HHV(MA5,3)>MA10,HHV(MA5,3),MA10))*1.0005;
LL:=IF(MA(L,3)<LLV(MA5,3),MA(L,3),IF(LLV(MA5,3)<MA10,LLV(MA5,3),MA10))*0.9995;
DRAWBMP(VARJ2>=VARJ3,ma(MA5,3),'B'),PXDN10;
DRAWBMP(VARJ2<VARJ3,ma(MA5,3),'S'),PXUP10;
if VARJ2>=VARJ3 then begin
sell(holding>0,holding,market);
buyshort(holding=0,1,market);
end
if VARJ2<VARJ3 then begin
sellshort(holding<0,holding,market);
buy(holding=0,1,market);
end