variable:n=0,m=0;
diff:=stkindi('','macd.diff',0,24,4);
dea:=stkindi('','macd.dea',0,24,4);
k:=stkindi('','kdj.k',0,datatype);
d:=stkindi('','kdj.d',0,datatype);
金叉:cross(diff,dea);
死叉:cross(dea,diff);
if 金叉 or 死叉 then begin
n:=0;
m:=0;
end
if k<25 then n:=n+1;
if k>75 then m:=m+1;
if n=1 then begin
sellshort(1,0,marketr);
buy(holding=0,1,marketr);
end
if m=1 then begin
sell(1,0,marketr);
buyshort(holding=0,1,marketr);
end