#CALL_PLUS[999300,MIN,1,KD] AS VAR
K1:VAR.K;
D1:VAR.D;
CROSS(K1,D1)&&D1<20&&TIME>0940&&TIME<1458,bk;
CROSS(D1,K1),sp;
CROSS(D1,K1)&&D1>80&&TIME>0940&&TIME<1458,sK;
CROSS(K1,D1),bp;
TIME=1458,CLOSEOUT;
k1:=stkindi('','kdj.k',0,datatype);
d1:=stkindi('','kdj.d',0,datatype);
if cross(k1,d1) then sellshort(1,0,market);
if cross(k1,d1) and d1<20 and time>094000 and time<145800 then buy(holding=0,1,market);
if cross(d1,k1) then sell(1,0,market);
if cross(d1,k1) and d1>80 and time>094000 and time<145800 then buyshort(holding=0,1,market);
if time>=145800 then begin
sell(1,0,market);
sellshort(1,0,market);
end