以下是通达信缠三买升级源码(无源码的请下载附件导入)
HJ_1:=5;
HJ_2:=31;
HJ_3:=55;
HJ_4:=LLV(LOW,HJ_1);
HJ_5:=REF(HHV(HIGH,HJ_2),HJ_1);
HJ_6:=REF(HHV(HIGH,HJ_3),HJ_1+HJ_2);
HJ_7:=HJ_5=HHV(HIGH,HJ_2+HJ_1) AND HJ_4>=HJ_6;
HJ_8:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
HJ_9:=INTPART(SUM(HJ_8>9.9,120));
HJ_10:=INTPART(SUM(HJ_8>9.9,60));
HJ_11:=INTPART(SUM(HJ_8>9.9,30));
HJ_12:=INTPART(SUM(HJ_8>9.9,16));
HJ_13:=5;
HJ_14:=EMA(CLOSE,HJ_13);
HJ_15:=REF(HJ_14,1);
HJ_16:=(HJ_14-HJ_15)/HJ_15*100>=1;
HJ_17:=SUM(VOL,10)/CAPITAL*100>=30;
HJ_18:=DYNAINFO(23)!=DYNAINFO(22) AND DYNAINFO(7)>DYNAINFO(3);
HJ_19:=CAPITAL/100;
HJ_20:=VOL/HJ_19;
HJ_21:=BETWEEN(HJ_20,2.4,40);
HJ_22:=DYNAINFO(17)>0.86;
HJ_23:=CAPITAL/1000000<=6.6;
HJ_24:=CLOSE>=4.6 AND CLOSE<14.99;
HJ_25:=IF(CODELIKE(1),0,1);
HJ_26:=DYNAINFO(17)>0;
HJ_27:=IF(NAMELIKE(2),0,1);
HJ_28:=IF(NAMELIKE(3),0,1);
HJ_29:=HJ_27 AND HJ_28 AND HJ_23 AND HJ_24 AND HJ_18 AND HJ_25 AND HJ_26 AND HJ_22 AND HJ_21;
HJ_7 OR HJ_12 OR HJ_16 OR HJ_17 AND CLOSE/REF(CLOSE,1)>=1.02 AND CLOSE/REF(CLOSE,1)<=1.04 AND HJ_29;
{-----------------------------------} |