通达信短线速利指标公式源码副图

通达信短线速利指标公式源码副图

海面:20;界线:50;天际:80;DSRSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*60;{(收盘价-27天内最底价)/(27天内最高价-27天内最底价)*60}DSK1:=SMA(DSRSV1,5,1);{RS1的5日移动平均}DSD1:=SMA(DSK1,5,1);{K1的5日移动平均}DSJ1:=3*DSK1-2*DSD1;DSAA1:=EMA(DSJ1,5);{J1的5日指数平滑均价}DSAA2:=REF(DSAA1,1);{前一天的DSAA1}STICKLINE(DSAA1>DSAA2,DSAA1,DSAA2,20/3,0),COLOR000045;STICKLINE(DSAA1>DSAA2,DSAA1,DSAA2,16/3,0),COLOR000085;STICKLINE(DSAA1>DSAA2,DSAA1,DSAA2,12/3,0),COLOR0000C5;STICKLINE(DSAA1>DSAA2,DSAA1,DSAA2,10/3,0),COLOR0000E5;STICKLINE(DSAA1<DSAA2,DSAA1,DSAA2,20/3,0),COLOR353500;STICKLINE(DSAA1<DSAA2,DSAA1,DSAA2,16/3,0),COLOR555500;STICKLINE(DSAA1<DSAA2,DSAA1,DSAA2,12/3,0),COLOR757500;STICKLINE(DSAA1<DSAA2,DSAA1,DSAA2,10/3,0),COLOR858500;DRAWICON( FILTER(REF(DSAA1,0)<=REF(DSAA2,0)AND REF(DSAA1,1)<=REF(DSAA2,1)AND DSAA1>=50 AND DSAA2>=50,10),DSAA1+0.4,2);{短线速利指标}{二阶甄察}上线:=天际;设值:=(HIGH+LOW+CLOSE)/3;日均线:=(设值-MA(设值,70))/(0.015*AVEDEV(设值,70))*0.5;即变线:=100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60));下探:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*30;反探1:=SMA(下探,3,1);反探2:=SMA(反探1,3,1);反阶:=-3*反探1-2*反探2;反引:=EMA(反阶,2);STICKLINE(即变线>上线,即变线,上线,10/3,0),COLORFFCC00;STICKLINE(-80>日均线,50,46,10/3,0),COLORFF0400;{二阶甄察};{切割}XX_1:=EMA(CLOSE,12)-EMA(CLOSE,26);XX_2:=EMA(XX_1,9);XX_3:=2*(XX_1-XX_2);XX_4:=1.25*XX_1-0.25*XX_2;XX_5:=(XX_4*13*27-27*11*EMA(CLOSE,12)+13*25*EMA(CLOSE,26))/28;XX_6:=(XX_1*13*27-27*11*EMA(CLOSE,12)+13*25*EMA(CLOSE,26))/28;XX_7:=(XX_2*13*27-27*11*EMA(CLOSE,12)+13*25*EMA(CLOSE,26))/28;XX_8:=(XX_5+XX_7)/2;XX_9:=ATAN((XX_6-REF(XX_6,1))/REF(XX_6,1)*100)*180/3.14159;XX_10:=XX_5;XX_11:=XX_6;XX_12:=XX_8;XX_13:=XX_7;XX_14:=EMA(XX_12,1);切割:=XX_14>XX_13;{切割};{控盘}AX_1:=EMA(CLOSE,12)-EMA(CLOSE,26);AX_2:=EMA(AX_1,9);AX_3:=AX_1>AX_2;AX_4:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;AX_5:=SMA(AX_4,3,1);AX_6:=SMA(AX_5,3,1);AX_7:=AX_5>AX_6;AX_8:=REF(CLOSE,1);AX_9:=SMA(MAX(CLOSE-AX_8,0),9,1)/SMA(Abs(CLOSE-AX_8),9,1)*100;AX_10:=SMA(MAX(CLOSE-AX_8,0),26,1)/SMA(ABS(CLOSE-AX_8),26,1)*100;AX_11:=AX_9>AX_10;AX_12:=SMA(AX_4,3,1);AX_13:=SMA(AX_12,3,1);AX_14:=AX_12>AX_13;AX_15:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;AX_16:=CLOSE>AX_15;AX_17:=CLOSE-REF(CLOSE,1);AX_18:=100*EMA(EMA(AX_17,9),9)/EMA(EMA(ABS(AX_17),9),3);AX_19:=100*EMA(EMA(AX_17,26),12)/EMA(EMA(ABS(AX_17),26),12);AX_20:=AX_18>AX_19;AX_21:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);AX_22:=REF(EMA(AX_21,3),1);AX_23:=vol/((HIGH-LOW)*2-ABS(CLOSE-OPEN));AX_24:=IF(CLOSE>OPEN,AX_23*(HIGH-LOW),IF(CLOSE< OPEN,AX_23*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,0-AX_23*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE< OPEN,0-AX_23*(HIGH-LOW),0-VOL/2));AX_25:=AX_24/20/1.15;AX_26:=AX_25*0.55+REF(AX_25,1)*0.33+REF(AX_25,2)*0.22;AX_27:=EMA(AX_26,8);AX_28:=EMA(AX_26,3);AX_29:=AX_28;AX_30:=VOL;AX_31:=MA(AX_30,5);AX_32:=MA(AX_30,10);AX_33:=AX_31>=AX_32;AX_34:=AX_29>=0;AX_35:=AX_34 AND AX_33;AX_36:=MA("kdj.K"(54,9,12)#WEEK,5);AX_37:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2);AX_38:=EMA(AX_37,9/2);AX_39:=AX_36>=REF(AX_36,1) AND AX_37>=AX_38;DRAWICON(AX_39,50,13);AX_40:=AX_39 OR AX_35;AX_41:=AX_3 AND AX_7 AND AX_11 AND AX_14 AND AX_16 AND AX_20;AX_42:=COST(50)*COST(50)/COST(80);AX_43:=COST(40)*COST(40)/COST(60);AX_44:=AX_43-AX_42;AX_45:=AX_44>0 AND CLOSE>AX_43;AX_46:=AX_44< 0 AND CLOSE>AX_42;AX_47:=AX_45 OR AX_46 OR (AX_45 AND AX_46);AX_48:=AX_47=0 OR (AX_44>0 AND CLOSE>AX_43 AND CLOSE< MA(CLOSE,10)) OR (AX_44< 0 AND CLOSE>AX_42 AND CLOSE< MA(CLOSE,5));AX_49:=AX_47 AND REF(AX_48,1);AX_50:=AX_48 AND REF(AX_47,1);DRAWICON(AX_47 OR AX_41 AND REF(AX_47 OR AX_41,1)=0 AND AX_40,1,7);AX_51:=(HIGH+LOW+CLOSE*2)/4;AX_52:=EMA(AX_51,17);AX_53:=STD(AX_51,17);AX_54:=((AX_51-AX_52)/AX_53*100+200)/4;AX_55:=(EMA(AX_54,5)-25)*1.56;AX_56:=EMA(AX_55,2)*1.22;AX_57:=EMA(AX_56,2);STICKLINE(AX_56-AX_57>0,-17,-22,9/3,0),COLORRED;STICKLINE(AX_56-AX_57< 0,-17,-22,9/3,0),COLOR858500;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1) AND AX_39 AND AX_47 OR AX_41 AND REF(AX_47 OR AX_41,1)=0 AND AX_40 ,-17,-22,9/3,0),COLORDD2084;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1),-17,-22,9/3,0),COLOR000099;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1),-17,-22,8/3,0),COLOR0000CC;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1),-17,-22,7.5/3,0),COLORRED;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1),-17,-22,5.5/3,0),COLOR00FFFF;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1) AND DSAA1>DSAA2,-17,-22,5.5/3,0),COLOR00FFFF;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1) AND C>MA(C,13),-17,-22,5.5/3,0),COLOR00FFFF;STICKLINE(AX_56-AX_57>0 AND REF(AX_56-AX_57< 0,1) AND FILTER(REF(DSAA1,0)<=REF(DSAA2,0)AND REF(DSAA1,1)<=REF(DSAA2,1)AND DSAA1>=50 AND DSAA2>=50,10),-17,-22,5.5/3,0),COLOR00FFFF;STICKLINE(AX_56-AX_57>0 AND AX_56-AX_57< REF(AX_56-AX_57,1) AND AX_57>110,-17,-22,9/3,0),COLORE786C6;{控盘}RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D ;DRAWICON(K>80 AND D>80 ANDcrOSS(D,K) AND FILTER(REF(DSAA1,0)<=REF(DSAA2,0)AND REF(DSAA1,1)<=REF(DSAA2,1)AND DSAA1>=50 AND DSAA2>=50,10) ,D,15);切割X:IF(切割 AND AX_39 ,80,DRAWNULL),;