相關標簽: 成功率100%的短線指標 、 選股神器成功率100% 、 成功率100 的指標超短線 、 成功率100的選股公式 、 通達信100%成功率公式 、 第二天必漲選股法 、 無未來成功率100%的指標 、 無未來函數100%的指標 、 選股神器成功率100 、

?

參數，m1，m2,m3,m4;最小2，最大1000，缺省5，10，20，60

?

?

原理解析：
輸出MA1:收盤價的M1日簡單移動平均 輸出均線:收盤價的M2日簡單移動平均 輸出MA3:收盤價的M3日簡單移動平均 輸出MA4:收盤價的M4日簡單移動平均 VAR3賦值:(收盤價-收盤價的6日簡單移動平均)/收盤價的6日簡單移動平均*100 VAR4賦值:(收盤價-收盤價的24日簡單移動平均)/收盤價的24日簡單移動平均*100 VAR5賦值:(收盤價-收盤價的32日簡單移動平均)/收盤價的32日簡單移動平均*100 VAR6賦值:(VAR3+VAR4+VAR5)/3 VAR7賦值:VAR6的5日指數移動平均 ZB賦值:VAR3的5日指數移動平均的5日指數移動平均*3, COLORSTICK VAR8賦值:如果VAR6<=-20,返回10,否則返回0 VAR9賦值:10日內VAR8的最高值 VARA賦值:如果VAR9ANDCROSS(收盤價的3日簡單移動平均,收盤價的5日簡單移動平均),返回20,否則返回0 K賦值:VAR7的5日指數移動平均*2, , COLORFF00FF D賦值:K的5日指數移動平均, , 畫白色 J賦值:K*3-D*2, ,畫黃色 VARB賦值:收盤價位于收盤價的3日簡單移動平均和收盤價的5日簡單移動平均之間 AND J>10 HS賦值:成交量(手)/當前流通股本(手)*100, , 畫綠色 當滿足條件VAR8=10ANDFILTER(VAR8=10,5)時,在最低價*0.93位置書寫文字 畫洋紅色 當滿足條件VARA=20時,在最低價*0.95位置書寫文字 畫黃色 VARE賦值:100*(收盤價-34日內收盤價的最低值)/(34日內最高價的最高值-34日內最低價的最低值)的5日簡單移動平均-20 VARF賦值:100-3*(收盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均+2*(收盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均的15日[1日權重]移動平均 VAR10賦值:100-3*(開盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均+2*(開盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均的15日[1日權重]移動平均 VAR11賦值:VARF<1日前的VAR10 AND 成交量(手)>1日前的成交量(手) AND 收盤價>1日前的收盤價 當滿足條件VAR11ANDCOUNT(VAR11,30)=1時,在最低價*0.95位置書寫文字,線寬為1,COLORFF00FF VAR12賦值:(最高價+最低價+收盤價)/3 VAR13賦值:(VAR12-VAR12的14日簡單移動平均)/(0.015*VAR12的14日平均絕對偏差) VAR14賦值:(VAR12-VAR12的70日簡單移動平均)/(0.015*VAR12的70日平均絕對偏差) VAR15賦值:如果VAR13>=150ANDVAR13<200ANDVAR14>=150ANDVAR14<200,返回10,否則返回0 VAR16賦值:如果VAR13<=-150ANDVAR13>-200ANDVAR14<=-150ANDVAR14>-200,返回-10,否則返回VAR15 VAR17賦值:(收盤價-收盤價的13日簡單移動平均)/收盤價的13日簡單移動平均*100 VAR18賦值:100-VAR17的絕對值 VAR19賦值:如果VAR18<90,返回VAR18,否則返回100 VAR1A賦值:如果VARE>0,返回VARE,否則返回0 VAR1B賦值:如果VAR14>=200ANDVAR13>=150,返回15,否則返回如果VAR14<=-200ANDVAR13<=-150,返回-15,否則返回VAR16+60 VAR1C賦值:VAR1A>48 AND VAR1B>60 AND VAR19<100 當滿足條件VAR1CANDCOUNT(VAR1C,30)=1時,在最低價*0.95位置書寫文字 畫白色 LC賦值:1日前的收盤價 RSI賦值:收盤價-LC和0的較大值的6日[1日權重]移動平均/收盤價-LC的絕對值的6日[1日權重]移動平均*100 當滿足條件84上穿RSI時,在最高價位置書寫文字,畫綠色 VAR3AA賦值:如果(收盤價>1日前的收盤價),返回88,否則返回0 VAR4AA賦值:如果((收盤價)/(1日前的收盤價)>1.05)AND((最高價)/(收盤價)<1.01)AND(VAR3AA>0),返回91,否則返回0 VAR51賦值:3 VAR52賦值:(3)*(((收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值))*(100)的5日[1日權重]移動平均) - (2)*(((收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值))*(100)的5日[1日權重]移動平均的3日[1日權重]移動平均) 當滿足條件VAR52上穿VAR51時,在最低價位置書寫文字畫洋紅色 當滿足條件收盤價/1日前的收盤價>1.095時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 當滿足條件是否最后一個周期時,在橫軸0.06縱軸0.01位置書寫文字,畫黃色 當滿足條件是否最后一個周期時,在橫軸0.065縱軸0.01位置書寫文字,畫黃色 DIFF賦值:收盤價的12日指數移動平均-收盤價的26日指數移動平均 DEA賦值:DIFF的9日指數移動平均 A1賦值:上次1日前的DEA上穿DIFF距今天數 A2賦值:上次1日前的DIFF上穿DEA距今天數 VAR1賦值:100*(收盤價-34日內收盤價的最低值)/(34日內最高價的最高值-34日內最低價的最低值)的5日簡單移動平均-20 HONGJU賦值:如果VAR1>0,返回VAR1,否則返回0 GAOPAO賦值:DIFF上穿DEA AND HONGJU>=40 當滿足條件GAOPAO時,在最高價*1.01位置畫6號圖標 當滿足條件GAOPAO時,在最高價*1.02位置書寫文字,畫綠色 LLVV賦值:5日內最低價的最低值 DIXI賦值:DEA上穿DIFF AND A1+1日前的DEA>0 AND DEA<0 工作線賦值:收盤價的17日指數移動平均,畫黃色 生命線賦值:收盤價的56日簡單移動平均,畫紅色 M0賦值:收盤價的5日簡單移動平均 M10賦值:收盤價的12日簡單移動平均 M1賦值:收盤價的20日簡單移動平均 M30賦值:收盤價的30日簡單移動平均 M2賦值:收盤價的60日簡單移動平均 M3賦值:收盤價的240日簡單移動平均 M4賦值:收盤價的120日簡單移動平均 M41賦值:收盤價的41日簡單移動平均 TJ2賦值:收盤價的3日簡單移動平均<M2 VAR2賦值:(收盤價*2+最高價+最低價)/4 SK賦值:VAR2的13日指數移動平均-VAR2的73日指數移動平均 SD賦值:SK的2日指數移動平均 短線賦值:SK上穿SD AND SK<0.05 AND (成交量(手)/成交量(手)的5日簡單移動平均>2 OR 收盤價/1日前的收盤價>0.035 AND 收盤價>收盤價的17日指數移動平均) CY賦值:上次短線距今天數 MACD雙底賦值:A2+1日前的最低價<收盤價 AND DIFF上穿DEA 介入賦值:統計4日中滿足短線的天數=1 AND 統計1日中滿足MACD雙底的天數=1 AND 收盤價/收盤價的56日簡單移動平均*1000>980 AND 收陽線ANDSE 成交量(手)>=成交量(手)的5日簡單移動平均 AND DIFF>=-0.1 當滿足條件介入時,在最低價*0.92位置書寫文字,畫紅色 當滿足條件介入時,在最低價*0.92位置畫1號圖標 反向頂背賦值:A2+1日前的收盤價>收盤價 AND A2+1日前的DIFF>DIFF AND DEA上穿DIFF 逃頂賦值:SD上穿SK AND SK>0.2 AND 成交量(手)/成交量(手)的5日簡單移動平均<2 逃頂成立賦值:統計4日中滿足逃頂的天數=1 AND 統計1日中滿足反向頂背的天數=1 當滿足條件逃頂成立時,在最高價*1.01位置畫15號圖標 當滿足條件逃頂成立時,在最高價*1.01位置書寫文字,畫綠色 N1G賦值:收盤價/1日前的收盤價>=1.097 AND 最高價=收盤價 AND 取反 A1G賦值:上次N1G距今天數 A2G賦值:A1G-1日內最低價的最低值>A1G日前的最低價 AND 收盤價/A1G日前的開盤價>1 AND 收盤價/A1G日前的開盤價<=1.04 XGGG賦值:A2G的3日過濾 AND A1G>=4 AND A1G<=20 當滿足條件XGGG時,在最低價*0.96位置畫41號圖標 當滿足條件XGGG時,在最低價*0.96位置書寫文字,畫紅色

?

?來源:程序化99（ www.tumamayizhan.com ）

源碼：

?

MA1:MA(CLOSE,M1);
MA2:MA(CLOSE,M2);
MA3:MA(CLOSE,M3);
MA4:MA(CLOSE,M4);
VAR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR6:=(VAR3+VAR4+VAR5)/3;
VAR7:=EMA(VAR6,5);
ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;
VAR8:=IF(VAR6<=-20,10,0);
VAR9:=HHV(VAR8,10);VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
K:=EMA(VAR7,5)*2, , COLORFF00FF;
D:=EMA(K,5), , COLORWHITE;
J:=K*3-D*2, ,COLORYELLOW;
VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;
HS:=VOL/CAPITAL*100, , COLORGREEN;
DRAWTEXT(VAR8=10 AND FILTER(VAR8=10,5),LOW*0.93,8) COLORMAGENTA;DRAWTEXT(VARA=20,LOW*0.95,9) COLORYELLOW;
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,10),LINETHICK1,COLORFF00FF;VAR12:=(HIGH+LOW+CLOSE)/3;
VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));
VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));
VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);
VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);
VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18:=100-ABS(VAR17);
VAR19:=IF(VAR18<90,VAR18,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*0.95,11) COLORWHITE;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(84,RSI) , HIGH,12),COLORGREEN;
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);VAR51:=3;
VAR52:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1)) - (2)*(SMA(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1));
DRAWTEXT(CROSS(VAR52,VAR51), LOW,13)COLORMAGENTA;{漲停標注}
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;
{財務數據}
DRAWTEXT_FIX(ISLASTBAR ,0.06,0.01,1,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR ,0.065,0.01,0,HYBLOCK),COLORYELLOW;
{DRAWTEXT_FIX(ISLASTBAR,0.16,0.01,1,14),COLOR00FF00;
DRAWNUMBER_FIX(ISLASTBAR,0.16,0.01,0,FINANCE(42)),COLOR00FF00;
DRAWTEXT_FIX(ISLASTBAR,0.06,0.04,1,15),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.062,0.04,0,FINANCE(20)),COLORFFAAFF;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.04,1,16),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.22,0.04,0,FINANCE(21)),COLORFFAAFF;
DRAWTEXT_FIX(ISLASTBAR,0.06,0.07,1,17),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.062,0.07,0,FINANCE(34)),COLORFFAAFF;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.07,1,18),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.22,0.07,0,FINANCE(18)),COLORFFAAFF;
DRAWTEXT_FIX(ISLASTBAR,0.06,0.1,1,19),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.062,0.1,0,FINANCE(33)),COLORFFAAFF;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.1,1,20),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.22,0.1,0,FINANCE(32)),COLORFFAAFF;
DRAWTEXT_FIX(ISLASTBAR,0.06,0.13,1,21),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.062,0.13,0,FINANCE(25)),COLORFFAAFF;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.13,1,22),COLORFFAAFF;
DRAWNUMBER_FIX(ISLASTBAR,0.22,0.13,0,FINANCE(22)),COLORFFAAFF;};
{漲停秘籍}
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
A1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
A2:=BARSLAST(REF(CROSS(DIFF,DEA),1));
VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
HONGJU:=IF(VAR1>0,VAR1,0);
GAOPAO:=CROSS(DIFF,DEA) AND HONGJU>=40;
DRAWICON(GAOPAO,HIGH*1.01,6);
DRAWTEXT(GAOPAO,HIGH*1.02,23),COLORGREEN;
LLVV:=LLV(LOW,5);
DIXI:=CROSS(DEA,DIFF) AND REF(DEA,A1+1)>0 AND DEA<0;工作線:=EMA(CLOSE,17),COLORYELLOW;
生命線:=MA(CLOSE,56),COLORRED;
M0:=MA(CLOSE,5);
M10:=MA(CLOSE,12);
M1:=MA(CLOSE,20);
M30:=MA(CLOSE,30);
M2:=MA(CLOSE,60);
M3:=MA(CLOSE,240);
M4:=MA(CLOSE,120);
M41:=MA(CLOSE,41);
TJ2:=MA(CLOSE,3)<M2;
VAR2:=(CLOSE*2+HIGH+LOW)/4;
SK:=EMA(VAR2,13)-EMA(VAR2,73);
SD:=EMA(SK,2);
短線:=CROSS(SK,SD) AND SK<0.05 AND (VOL/MA(VOL,5)>2 OR CLOSE/REF(CLOSE,1)>0.035 AND CLOSE>EMA(CLOSE,17));
{STICKLINE(短線,HIGH,LOW,0.5,0),COLORFFFF00;
STICKLINE(短線,OPEN,CLOSE,10,1),LINETHICK2,COLORFFFF00;}
CY:=BARSLAST(短線);
MACD雙底:=REF(LOW,A2+1)<CLOSE AND CROSS(DIFF,DEA);
介入:=COUNT(短線,4)=1 AND COUNT(MACD雙底,1)=1 AND CLOSE/MA(CLOSE,56)*1000>980 AND CLOSE>OPEN AND VOL>=MA(VOL,5) AND DIFF>=-0.1;
DRAWTEXT(介入,LOW*0.92,24),COLORRED;
DRAWICON(介入,LOW*0.92,1);
反向頂背:=REF(CLOSE,A2+1)>CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
逃頂:=CROSS(SD,SK) AND SK>0.2 AND VOL/MA(VOL,5)<2;
逃頂成立:=COUNT(逃頂,4)=1 AND COUNT(反向頂背,1)=1;
DRAWICON(逃頂成立,HIGH*1.01,15);
DRAWTEXT(逃頂成立,HIGH*1.01,25),COLORGREEN;
N1G:=CLOSE/REF(CLOSE,1)>=1.097 AND HIGH=CLOSE AND NOT(OPEN=HIGH);
A1G:=BARSLAST(N1G);
A2G:=LLV(LOW,A1G-1)>REF(LOW,A1G) AND CLOSE/REF(OPEN,A1G)>1 AND CLOSE/REF(OPEN,A1G)<=1.04;
XGGG:=FILTER(A2G,3) AND A1G>=4 AND A1G<=20;
DRAWICON(XGGG,LOW*0.96,41);
DRAWTEXT(XGGG,LOW*0.96,26),COLORRED;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?