|
以下是通达信涨停战法源码副图（无源码的请下载附件导入）
AMOUNT/10000,NODRAW,COLORMAGENTA;
STICKLINE(CLOSE>0,(-7),10,10,0),COLORBLACK;
X_1:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
流入万:IF(CLOSE>OPEN,X_1*(HIGH-LOW),IF(CLOSE<OPEN,X_1*(HIGH-OPEN+(CLOSE-LOW)),AMOUNT/2))/10000,NODRAW,COLORRED;
流出万:IF(CLOSE>OPEN,0-X_1*(HIGH-CLOSE+(OPEN-LOW)),IF(CLOSE<OPEN,0-X_1*(HIGH-LOW),0-AMOUNT/2))/10000,NODRAW,COLORGREEN;
额万:流入万+流出万,NODRAW,COLORCYAN;
X_2:=MA(CLOSE,1)-MA(CLOSE,6);
分界:0;
STICKLINE(X_2>0 AND X_2>REF(X_2,1),0,X_2,4,0),COLOR0D0C6A;
STICKLINE(X_2>0 AND X_2>REF(X_2,1),0,X_2,3,0),COLOR0D06AA;
STICKLINE(X_2>0 AND X_2>REF(X_2,1),0,X_2,1.5,0),COLOR2108C1;
STICKLINE(X_2>0 AND X_2>REF(X_2,1),0,X_2,0.5,0),COLOR9F5DFF;
STICKLINE(X_2>0 AND X_2<REF(X_2,1),0,X_2,4,0),COLOR22736F;
STICKLINE(X_2>0 AND X_2<REF(X_2,1),0,X_2,3,0),COLOR22AAD5;
STICKLINE(X_2>0 AND X_2<REF(X_2,1),0,X_2,1.5,0),COLOR10C7BF;
STICKLINE(X_2>0 AND X_2<REF(X_2,1),0,X_2,0.5,0),COLOR80FFFF;
STICKLINE(X_2<0 AND X_2<REF(X_2,1),0,X_2,4,0),COLOR1B7411;
STICKLINE(X_2<0 AND X_2<REF(X_2,1),0,X_2,3,0),COLOR17A715;
STICKLINE(X_2<0 AND X_2<REF(X_2,1),0,X_2,1.5,0),COLOR08D306;
STICKLINE(X_2<0 AND X_2<REF(X_2,1),0,X_2,0.5,0),COLOR40FF00;
STICKLINE(X_2<0 AND X_2>REF(X_2,1),0,X_2,4,0),COLOR080E71;
STICKLINE(X_2<0 AND X_2>REF(X_2,1),0,X_2,3,0),COLOR0B0E8C;
STICKLINE(X_2<0 AND X_2>REF(X_2,1),0,X_2,1.52,0),COLOR0905B0;
STICKLINE(X_2<0 AND X_2>REF(X_2,1),0,X_2,0.5,0),COLOR0204F2;
X_3:=5;
X_4:=4*SMA((CLOSE-LLV(LOW,X_3))/(HHV(HIGH,X_3)-LLV(LOW,X_3))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,X_3))/(HHV(HIGH,X_3)-LLV(LOW,X_3))*100,5,1),3.2,1);
X_5:=8;
X_6:=LLV(HIGH,240);
X_7:=100*(CLOSE-X_6)/X_6;
X_8:=REF(LLV(CLOSE,480),1);
X_9:=REF(HHV(CLOSE,480),1);
X_10:=100*(CLOSE-X_8)/(X_9-X_8);
X_11:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100;
X_12:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100;
X_13:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100;
X_14:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100;
X_15:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4;
X_16:=IF(DATE<1031231,IF(X_15>23.16,X_15,0),0);
X_17:=X_15<1;
X_18:=X_16;
X_19:=X_7<0 AND X_10<0;
X_20:=1;
X_21:=(HIGH+LOW+CLOSE*2)/4*X_20;
X_22:=EMA(X_21,21);
X_23:=STD(X_21,21);
X_24:=((X_21-X_22)/X_23*100+200)/4*X_20;
X_25:=(EMA(X_24,89)-25)*1.56*X_20;
X_26:=EMA(X_25,5)*1.22*X_20;
X_27:=EMA(X_26,3)*X_20;
X_28:=3*X_26-2*X_27*X_20;
X_29:=IF(CROSS(X_28,X_26) AND CROSS(X_28,X_27) AND CROSS(X_26,X_27),1,0);
X_30:=IF(CROSS(X_26,X_28) AND CROSS(X_27,X_28) AND CROSS(X_27,X_26),1,0);
X_31:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4;
X_32:=EMA(CLOSE,2)-EMA(CLOSE,89);
X_33:=EMA(X_32,30);
X_34:=2*(X_32-X_33)*10;
X_35:=POW(X_34,3)*0.1+POW(X_34,2);
X_36:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
X_37:=EMA(X_36*0.97,3);
X_38:=(HIGH+LOW+CLOSE)/3;
X_39:=(X_38-MA(X_38,14))/(0.015*AVEDEV(X_38,14));
X_40:=IF(YEAR<2008 AND X_34>0.015,X_35,0)/45;
X_41:=EMA(CLOSE,2)-EMA(CLOSE,150);
X_42:=EMA(X_41,100);
X_43:=2*(X_41-X_42);
X_44:=VOL*100/CAPITAL;
X_45:=MA(X_44,180);
X_46:=(EMA(DCLOSE,12)-EMA(DCLOSE,26))*100;
X_47:=EMA(X_46,9);
X_48:=2*(X_46-X_47);
X_49:=X_48>REF(X_48,1)*2.5 AND X_48>15;
涨停战法:IF(X_49,2,0),COLORWHITE,LINETHICK2;
【旺铺】:DRAWNULL,COLORYELLOW;
【富人帝国】:DRAWNULL,COLORYELLOW;
657500043.jpg
|
