天機道決策主圖指標公式源碼

相關標簽:

?

?

原理解析：
輸出MA5:收盤價的5日簡單移動平均 MA6賦值:收盤價的6日簡單移動平均 輸出MA10:收盤價的10日簡單移動平均 輸出MA20:收盤價的20日簡單移動平均 A2賦值:1日前的MA20 J1賦值:(MA20-A2)/A2*100 MJ1賦值:J1的3日簡單移動平均 輸出MA30:收盤價的30日簡單移動平均 輸出MA55:收盤價的60日簡單移動平均 輸出MA120:收盤價的120日簡單移動平均 乖離2賦值:(MA20-MA30)/MA30*100 VAR1賦值:如果乖離2位于-2和5之間,返回2,否則返回0 MAX1賦值:MA20和MA30的較大值 MAX2賦值:MAX1和MA55的較大值 MIN11賦值:MA20和MA30的較小值 MIN2賦值:MIN11和MA55的較小值 K1賦值:(MAX2/MIN2-1)*100 VAR2賦值:如果K1<=8,返回1,否則返回0 上火車軌賦值:MA20>MA30 AND MA20>1日前的MA20 AND MA30>1日前的MA30 AND MA20-MA30>1日前的(MA20-MA30) 當滿足條件上火車軌時,在MA20和MA30位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫紅色 神槍手賦值:當滿足條件上火車軌AND"平滑異同平均的DIF"<0.15AND"平滑異同平均的DIF">1日前的"平滑異同平均的DIF"ANDMA(成交量(手),60)>1日前的成交量(手)的60日簡單移動平均ANDMA(成交量(手),5)>成交量(手)的10日簡單移動平均ANDJ1>1日前的J1AND(最低價<=MA20ANDC>MA20OR(MA5上穿M的?日過濾時,在20))),5)位置書寫文字 神槍手選股賦值:上火車軌AND"平滑異同平均的DIF"<0.15AND"平滑異同平均的DIF">1日前的"平滑異同平均的DIF"ANDMA(成交量(手),60)>1日前的成交量(手)的60日簡單移動平均ANDMA(成交量(手),5)>成交量(手)的10日簡單移動平均ANDJ1>1日前的J1AND(最低價<=MA20ANDC>MA20OR(MA5上穿MA20))的5日過濾 輸出短線暴漲:當滿足條件(VAR1ORVAR2)ANDMA10>1日前的MA10ANDCOUNT(MA30>1日前的MA30,3)=3ANDMA30>MA55ANDCOUNT(MA5上穿MA30,3)ANDJ1>MJ1ANDMA(成交量(手),5)>成交量(手)的60日簡單移動平均ANDMA(成交量(手),60)>?日前的成交量(手)的60日簡單移動平均的?日過濾時,在1),5)位置書寫文字,畫紅色 當滿足條件"KDJ的K"(5,2,3)上穿"KDJ的D"(5,2,3)AND"KDJ的D"(5,2,3)<30ANDJ1>MJ1ANDMA55>1日前的MA55ANDCOUNT(J1<1,3)>=1時,在最低價*0.995位置書寫文字,畫黃色 當滿足條件"KDJ的D"(5,2,3)上穿"KDJ的K"(5,2,3)AND"KDJ的D"(5,2,3)>65ANDJ1<MJ1ANDCOUNT(J1>1,3)>=1時,在最高價*1.005位置書寫文字,畫綠色 當滿足條件"KDJ的D"(18,9,6)上穿"KDJ的K"(18,9,6)AND"KDJ的D"(18,9,6)>60AND"KDJ的J"(45,15,15)>90時,在最高價*1.03位置書寫文字,畫紅色 當滿足條件MA5上穿MA6AND"KDJ的K"(5,3,3)>=50AND"KDJ的J"(5,3,3)<31時,在最低價*0.92位置書寫文字,畫洋紅色 XL1賦值:((3日內最低價的最低值 = 60日內最低價的最低值) AND ((收盤價 / 1日前的收盤價) >= 1.04)) XL2賦值:(((收盤價 - 收盤價的21日指數移動平均) / 收盤價的21日指數移動平均) * 100) XL3賦值:XL2上穿(0-20) 當滿足條件((XL1>0)ANDLOW)的5日過濾時,在(最低價-0.4)位置書寫文字 當滿足條件(XL3>0)時,在(最低價-0.2)位置書寫文字 X6賦值:1日前的收盤價 X7賦值:(((收盤價-X6)和0的較大值的7日[1日權重]移動平均 / (收盤價-X6)的絕對值的7日[1日權重]移動平均) * 100) X8賦值:79上穿X7 X9賦值:X8的4日過濾 當滿足條件X9時,在(最高價*1.02)位置書寫文字,COLOR9000F5 當滿足條件收盤價>1.098*1日前的收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫黃色 VVAR1賦值:成交額(元)/成交量(手)/7 VVAR2賦值:(3*最高價+最低價+開盤價+2*收盤價)/7 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

MA5:MA(C,5);
MA6:=MA(C,6);
MA10:MA(C,10);
MA20:MA(C,20);
A2:=REF(MA20,1);J1:=(MA20-A2)/A2*100;MJ1:=MA(J1,3);
MA30:MA(C,30);
MA55:MA(C,60);
MA120:MA(C,120);
乖離2:=(MA20-MA30)/MA30*100;
VAR1:=IF(BETWEEN(乖離2,-2,5),2,0);
MAX1:=MAX(MA20,MA30);
MAX2:=MAX(MAX1,MA55);
MIN11:=MIN(MA20,MA30);
MIN2:=MIN(MIN11,MA55);
K1:=(MAX2/MIN2-1)*100;
VAR2:=IF(K1<=8,1,0);
上火車軌:=MA20>MA30 AND MA20>REF(MA20,1) AND MA30>REF(MA30,1) AND MA20-MA30>REF((MA20-MA30),1) ;
STICKLINE(上火車軌,MA20,MA30,0,0),COLORRED;
神槍手:=DRAWTEXT(FILTER(上火車軌 AND "MACD.DIF"<0.15 AND
"MACD.DIF">REF("MACD.DIF",1) AND MA(V,60)>REF(MA(V,60),1) AND
MA(V,5)>MA(V,10) AND J1>REF(J1,1) AND
( L<=MA20 AND C>MA20 OR (CROSS(MA5,MA20)) ),5),L*0.98,'←神槍手');
神槍手選股:=FILTER(上火車軌 AND "MACD.DIF"<0.15 AND
"MACD.DIF">REF("MACD.DIF",1) AND MA(V,60)>REF(MA(V,60),1) AND
MA(V,5)>MA(V,10) AND J1>REF(J1,1) AND
( L<=MA20 AND C>MA20 OR (CROSS(MA5,MA20)) ),5);{44.40%15240}
短線暴漲:DRAWTEXT(FILTER( (VAR1 OR VAR2) AND MA10>REF(MA10,1) AND
COUNT(MA30>REF(MA30,1),3)=3 AND MA30>MA55 AND
COUNT(CROSS(MA5,MA30),3) AND J1>MJ1 AND MA(V,5)>MA(V,60)
AND MA(V,60)>REF(MA(V,60),1),5),MA55*0.99,'短線暴漲'),COLORRED;
DRAWTEXT(CROSS("KDJ.K"(5,2,3),"KDJ.D"(5,2,3)) AND "KDJ.D"(5,2,3)<30
AND J1>MJ1 AND MA55>REF(MA55,1) AND COUNT(J1<1,3)>=1
,L*0.995,'←買入'),COLORYELLOW;
DRAWTEXT(CROSS("KDJ.D"(5,2,3),"KDJ.K"(5,2,3)) AND "KDJ.D"(5,2,3)>65
AND J1<MJ1 AND COUNT(J1>1,3)>=1,H*1.005,'←賣出'),COLORGREEN;
DRAWTEXT(CROSS("KDJ.D"(18,9,6),"KDJ.K"(18,9,6)) AND "KDJ.D"(18,9,6)>60 AND "KDJ.J"(45,15,15)>90,H*1.03,'←頂'),COLORRED;
DRAWTEXT(CROSS(MA5,MA6) AND "KDJ.K"(5,3,3)>=50 AND "KDJ.J"(5,3,3)<31 ,L*0.92,'←再買'),COLORMAGENTA;
XL1:=((LLV(LOW,3) = LLV(LOW,60)) AND ((CLOSE / REF(CLOSE,1)) >= 1.04));
XL2:=(((CLOSE - EMA(CLOSE,21)) / EMA(CLOSE,21)) * 100);
XL3:=CROSS(XL2,(0 - 20));
DRAWTEXT(FILTER(((XL1 > 0) AND LOW),5),(LOW - 0.4),'買點');
DRAWTEXT((XL3 > 0),(LOW - 0.2),'絕對底部');
X6:=REF(CLOSE,1);
X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100);
X8:=CROSS(79,X7);
X9:=FILTER(X8,4);
DRAWTEXT(X9,(HIGH * 1.02),'出貨'),COLOR9000F5;
STICKLINE(C>1.098*REF(C,1),C,O,0,0),COLORYELLOW;
VVAR1:=AMOUNT/VOL/7;
VVAR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.tumamayizhan.com '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?