variable:n1=0,n2=0;
VARIABLE:HIGHPRICE=0,LOWPRICE=0;
B:=REF(MA(C,20),1),PRECISION1,LINETHICK0;
KD1:=CROSS(MA(CLOSE,5),MA(CLOSE,30));
Kk1:=CROSS(MA(CLOSE,30),MA(CLOSE,5));
KD2:=CROSS(MA(CLOSE,10),MA(CLOSE,30));
Kk2:=CROSS(MA(CLOSE,30),MA(CLOSE,10));
KD:=(KD1 and n1=0 )OR( KD2 and n1=0 );
KK:=(KK1 and n2=0) OR( KK2 and n2=0);
t1:=currenttime>=t0totime(timetot0(closetime(0))-2*60);//
IF HOLDING<0 THEN BEGIN
IF (t1 AND CLOSE>B and n2=0 and islastbar )or (not(islastbar) and CLOSE>B and n2=0) THEN BEGIN
SELLSHORT(1,1,marketr);
n2:=1;
END
IF H>=ENTERPRICE*(1+0.02) and n2=0 THEN BEGIN
SELLSHORT(1,1,marketr);
n2:=1;
END
IF L<LOWPRICE THEN LOWPRICE:=L;
IF ENTERPRICE-LOWPRICE>=30 THEN BEGIN
IF H >=LOWPRICE*(1+5/1000)and n2=0 THEN BEGIN
SELLSHORT(1,1,MARKET);
n2:=1;
END
END
END
IF HOLDING=0 THEN BEGIN
IF ( t1 AND KK and islastbar )or (not(islastbar) and kk)THEN BEGIN
BUYSHORT(1=1,1,marketr);
LOWPRICE:=ENTERPRICE;
END
END
if dynainfo(207) =closetime(0) then begin//currenttime
n1:=0;
n2:=0;
end
dynainfo(207) 取的是最新行情时间,没有历史值
改成time把