ATR資金管理模型源碼

//ATR資金管理模型
A:=10T/手;//合約單位
TR := MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:= DMA(TR,0.05);
SS:=INTPART(MONEY/(ATR*A));//模型中沒有四舍五入函數，以取整代替。
DIFF := EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA := EMA(DIFF,M);
CROSS(DIFF,DEA),BPK(SS);
CROSS(DEA,DIFF),SPK(SS);