你这个基准价更新方式有点问题[PEL] 复制代码 INPUT:N(89,1,100,10);
INPUT:P1(3,2,40,4);
INPUT:P2(3,2,40,4);
INPUT:QTY(2,1,100,1);
INPUT:B(60,1,100,5);
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,P1,1);
D:=SMA(K,P2,1);
J:=3*K-2*D;
BU:=J>B;
SE:=J<(100-B);
TBUY((BU AND TBUYHOLDING(1)=0),QTY,MKT);
TSELL((SE AND TBUYHOLDING(1)>0),0,MKT);
GLOBALVARIABLE:基准价=0;
平多 := TBUYHOLDING(1)>0 AND CLOSE > 基准价 * 1.007 AND 基准价<>0;
开多 := TBUYHOLDING(1)>0 AND CLOSE < 基准价 * 0.995 AND 基准价<>0;
TSELL(平多, 1, MKT);
IF TEXITVOL>=1 and TTYPE(1)=3 THEN 基准价 := TEXITPRICE;
TBUY(开多, 1, MKT);
IF TENTERVOL>=1 and TTYPE(1)=1 THEN 基准价 := TENTERPRICE; 。
|