//將DTCC賦值為1,表示當(dāng)前有多頭持倉 IF TBUYHOLDINGEX( '803410','' ,1 )>0 AND EXTGBDATA('DTCC' )=0 THEN BEGIN EXTGBDATASET( 'DTCC',1 ); END
//將KTCC賦值為1,表示當(dāng)前有空頭持倉 IF TSELLHOLDINGEX('803410' ,'' ,1)>0 AND EXTGBDATA('KTCC' )=0 THEN BEGIN EXTGBDATASET( 'KTCC',1 ); END
CC:TAVGENTERPRICEEX2('803410' ,'' ,0);//買持均價(jià) DD:TAVGENTERPRICEEX2('803410' ,'' ,1);//賣持均價(jià) //使AA始終表示監(jiān)控開始后的最高價(jià) IF DYNAINFO( 7)>CC and EXTGBDATA('DTCC' )>0 THEN BEGIN EXTGBDATASET( 'AA',DYNAINFO( 5)); END
//使BB始終表示監(jiān)控開始后的最低價(jià) IF DYNAINFO( 7)<DD and EXTGBDATA('KTCC' )>0 THEN BEGIN EXTGBDATASET( 'BB',DYNAINFO( 6)); END //發(fā)現(xiàn)價(jià)格回落止損,并將A賦值為0表示移動止損動作完成 IF EXTGBDATA('DTCC' )>0 THEN BEGIN IF 條件 THEN BEGIN TSELL(條件,0,lmt,DYNAINFO( 7),0); EXTGBDATASET( 'DTCC',0); end END
//發(fā)現(xiàn)價(jià)格上漲止損,并將B賦值為0表示移動止損動作完成 IF EXTGBDATA('KTCC' )>0 THEN BEGIN IF 條件 THEN BEGIN TSELLSHORT(條件,0,lmt,DYNAINFO( 7),0); EXTGBDATASET( 'KTCC',0); end END