主题：如何实现一根K线开一次不重复仓

KD:=HIGH>=MA2;
PD:=LOW<MA2;
KK:=LOW<=MA2;
PK:=HIGH>MA2;

     IF HOLDING=0 THEN BEGIN
        IF KK and kai=0  THEN BEGIN
           BUYSHORT(1,手数,LIMITR,MIN(OPEN,MA2));//开空
           kai:=1;
          
         
        END
     END

     IF HOLDING=0 and kai=0 THEN BEGIN
        IF KD THEN BEGIN
           BUY(1,手数,LIMITR,MAX(OPEN,MA2));//开多
          
           kai:=1;
          
        END
     END
 
 
     IF HOLDING>0 THEN BEGIN
        IF PD THEN BEGIN
           SELL(1,HOLDING,LIMITR,MIN(OPEN,MA2));//平多
           kai:=0;
        END
     END

      IF HOLDING<0 THEN BEGIN
         IF PK THEN  BEGIN
            SELLSHORT(1,HOLDING,LIMITR,MAX(OPEN,MA2));//平空
            kai:=0;
         END
      END