主题：请问多头排列的写法

 您好，公式不做空，麻烦您帮我看下，谢谢：

INPUT:ZS(20,5,30,5);
INPUT:ZY(20,5,100,5);
INPUT:HT(20,5,50,5);

INPUT:KXSL(20,0,100,5);//K线数量

INPUT:SS(1,1,10000,1);////手数

MA20:=eMA(C,20);
MA60:=EMA(C,60);
ma120:=ema(c,120);

DIFF := EMA(CLOSE,14) - EMA(CLOSE,26);
DEA  := EMA(DIFF,9);
MACD1:=2*(DIFF-DEA);

///周期共振

MA20D:=STKINDI('','JLLHDAY.MA3',0,6,-1),COLORWHITE;

MA60D:=STKINDI('','JLLHDAY.MA4',0,6,-1);

MA120D:=STKINDI('','JLLHDAY.MA5',0,6,-1);

DTPL:= MA20D>MA60D AND MA60D>MA120D;;//多头排列
KTPL:= MA20D<MA60D AND MA60D<MA120D;//空头排列

dtpl1:=ma20>ma60 and ma60>ma120;
ktpl2:=ma20<ma60 and ma60<ma120;

DRAWICON(DTPL,RCC,031);
DRAWICON(KTPL,RCC,02);

入场价:=REF(CLOSE，ENTERBARS+1);

BKHIGH:=HHV(HIGH,ENTERBARS+1);
SKLOW:=LLV(LOW,ENTERBARS+1);

BBB:= c>DTPL1 and  DTPL and cross(diff,dea) and diff>0 and dea>0;
SSS:= c<ktpl2 and  KTPL and cross(dea,diff) and diff<0 and dea<0;

//开多条件
IF BBB AND HOLDING=0   THEN
BEGIN
SELLSHORT(1,SS,MARKET);
BUY(HOLDING=0,SS,MARKET); ////开仓             
END

IF L<入场价-OPEN*ZS/1000    AND HOLDING>0 AND ENTERBARS>0   THEN  多止损:SELL(1,SS,MARKET);
IF h>入场价+OPEN*ZY/1000    AND HOLDING>0 AND ENTERBARS>0   THEN  多止盈:SELL(1,SS,MARKET);
IF C<BKHIGH-OPEN*HT/1000    AND HOLDING>0 AND ENTERBARS>0  THEN  多回头1:SELL(1,SS,MARKET);

//开空条件
IF  SSS  AND HOLDING=0   THEN
BEGIN
SELL(1,SS,MARKET);
BUYSHORT(HOLDING=0,SS,MARKET); ////开仓             
END

IF h>入场价+OPEN*ZS/1000     AND HOLDING<0 AND ENTERBARS>0  THEN   空止损:SELLSHORT(1,SS,MARKET);
IF l<入场价-OPEN*ZY/1000     AND HOLDING<0 AND ENTERBARS>0  THEN   空止盈:SELLSHORT(1,SS,MARKET);
IF C>SKLOW+OPEN*HT/1000     AND HOLDING<0 AND ENTERBARS>0   THEN   空回头1:SELLSHORT(1,SS,MARKET);

ENB:ENTERBARS,COLORWHITE,NODRAW;

IF ENB>=KXSL && BBB=0 && HOLDING>0 AND ENTERBARS>0    /////平仓条件
THEN 时间： SELL(1,SS,MARKET); /////平仓

SNB:ENTERBARS,COLORWHITE,NODRAW;

IF SNB>=KXSL && SSS=0 && HOLDING<0 AND ENTERBARS>0    /////平仓条件
THEN 时间1：sellshort(1,SS,MARKET); /////平仓