巨資打造一款悍馬公式源碼[通達信公式]

相關標簽:

?

原理解析：
DIF1賦值:收盤價的12日指數移動平均-收盤價的26日指數移動平均,COLOR00FF00,線寬為1 DEA1賦值:DIF1的9日指數移動平均,COLOR00FF00,線寬為1 DI賦值:收盤價的4日指數移動平均-收盤價的13日指數移動平均,畫洋紅色,線寬為2 D1賦值:DI的5日指數移動平均,畫深灰色 D2賦值:DI的10日指數移動平均,畫深灰色 D3賦值:DI的20日指數移動平均,畫深灰色 D4賦值:DI的30日指數移動平均,畫深灰色 D5賦值:DI的60日指數移動平均,畫深灰色 D6賦值:DI的90日指數移動平均,畫深灰色 D7賦值:DI的120日指數移動平均,畫深灰色 D8賦值:DI的250日指數移動平均,畫深灰色 AA賦值:當滿足條件DI>=1日前的DIANDD1>=1日前的D1ANDD2>=1日前的D2ANDD3>=1日前的D3ANDD4>=1日前的D4ANDD5>=1日前的D5ANDD6>=1日前的D6ANDD7>=1日前的D7ANDD8>=1日前的D8ANDC>收盤價的11日指數移動平均ANDD時,在>-0.8和DI位置之間畫柱狀線,寬度為0,2不為0則畫空心柱.,畫紅色 MACD1賦值:(DIF1-DEA1)*2 當滿足條件MACD1>1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000FF 當滿足條件MACD1>1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.8,0不為0則畫空心柱.,,COLOR0000FF 當滿足條件MACD1>1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.6,0不為0則畫空心柱.,COLOR0000FF 當滿足條件MACD1>1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.4,0不為0則畫空心柱.,COLOR0000FF 當滿足條件MACD1>1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.2,0不為0則畫空心柱.,COLOR0000FF 當滿足條件MACD1>1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為0.8,0不為0則畫空心柱.,COLORCC66FF 當滿足條件MACD1<1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF9900 當滿足條件MACD1<1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.8,0不為0則畫空心柱.,COLORFF9900 當滿足條件MACD1<1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.6,0不為0則畫空心柱.,COLORFF9900 當滿足條件MACD1<1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.4,0不為0則畫空心柱.,COLORFF9900 當滿足條件MACD1<1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為1.2,0不為0則畫空心柱.,COLORFF9900 當滿足條件MACD1<1日前的MACD1時,在0和MACD1位置之間畫柱狀線,寬度為0.8,0不為0則畫空心柱.,COLORFFCC00 當滿足條件MACD1>=0ORMACD1<=0時,在0和0位置之間畫柱狀線,寬度為50,1不為0則畫空心柱.,畫白色 WY1001賦值:(2*收盤價+最高價+最低價)/4 WY1002賦值:WY1001的4日指數移動平均 WY1003賦值:WY1002的4日指數移動平均 WY1004賦值:WY1003的4日指數移動平均 X賦值:(WY1004-1日前的WY1004)/1日前的WY1004*100 X1賦值:如果X<1日前的X,返回X,否則返回無效數,畫白色,線寬為2 XO賦值:X的2日簡單移動平均,COLOR9932CD SI賦值:1日前的X 當滿足條件X>SI時,在X和SI位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0080EF 當滿足條件X<SI時,在X和SI位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF00CC 輸出DIF:DIF1,線寬為1,畫綠色 輸出DEA:DEA1,線寬為1,畫綠色 輸出DIF2:如果平滑異同平均>1日前的平滑異同平均,返回DIF1,否則返回無效數,畫紅色,線寬為1 輸出DEA2:如果DEA1<DIF1,返回DEA1,否則返回無效數,COLORFF00FF,線寬為1 VAR1賦值:41日內DEA的最高值 VAR2賦值:43日內DEA的最低值 VAR3賦值:DEA-(DIF-DEA) VAR4賦值:DEA-(DIF-DEA) 輸出SX:如果DIF>VAR1ANDDEA=VAR1,返回10日內VAR1的最低值和VAR3的較大值,否則返回VAR1,畫青色,線寬為2 輸出XX:如果DIF<VAR2ANDDEA=VAR2,返回10日內VAR2的最高值和VAR4的較小值,否則返回VAR2,畫黃色,線寬為2 VARR1賦值:收盤價>1日前的收盤價 AND 收盤價>2日前的收盤價 VARR2賦值:1日前的VARR1 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR3賦值:1日前的VARR2 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR4賦值:1日前的VARR3 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR5賦值:1日前的VARR4 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR6賦值:1日前的VARR5 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR7賦值:1日前的VARR6 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR8賦值:1日前的VARR7 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR9賦值:1日前的VARR8 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARRA賦值:1日前的VARR9 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARRB賦值:1日前的VARRA AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARRC賦值:1日前的VARRB AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARRD賦值:收盤價<1日前的收盤價 AND 收盤價<2日前的收盤價 VARRE賦值:1日前的VARRD AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARRF賦值:1日前的VARRE AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR10賦值:1日前的VARRF AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR11賦值:1日前的VARR10 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR12賦值:1日前的VARR11 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR13賦值:1日前的VARR12 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR14賦值:1日前的VARR13 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR15賦值:1日前的VARR14 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR16賦值:1日前的VARR15 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR17賦值:1日前的VARR16 AND 收盤價<=1日前的收盤價 AND 收盤價>2日前的收盤價 VARR18賦值:1日前的VARR17 AND 收盤價>1日前的收盤價 AND 收盤價<=2日前的收盤價 VARR19賦值:1日前的VARRDORVARREORVARRFORVARR10ORVARR11ORVARR12ORVARR13ORVARR14ORVARR15ORVARR16ORVARR17ORVARR18 AND VARR1 當滿足條件VARR19=1時,在SI-0.08位置畫1號圖標 VARR1A賦值:1日前的VARR1ORVARR2ORVARR3ORVARR4ORVARR5ORVARR6ORVARR7ORVARR8ORVARR9ORVARRAORVARRBORVARRC AND VARRD 當滿足條件VARR1A=1時,在X+0.08位置畫2號圖標 輸出選股:VARR19,畫紅色,NODRAW 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

DIF1:=EMA(CLOSE,12)-EMA(CLOSE,26),COLOR00FF00,LINETHICK1;
DEA1:=EMA(DIF1,9),COLOR00FF00,LINETHICK1;
DI:=EMA(CLOSE,4)-EMA(CLOSE,13),COLORMAGENTA,LINETHICK2;
D1:=EMA(DI,5),COLORGRAY;
D2:=EMA(DI,10),COLORGRAY;
D3:=EMA(DI,20),COLORGRAY;
D4:=EMA(DI,30),COLORGRAY;
D5:=EMA(DI,60),COLORGRAY;
D6:=EMA(DI,90),COLORGRAY;
D7:=EMA(DI,120),COLORGRAY;
D8:=EMA(DI,250),COLORGRAY;
AA:=STICKLINE(DI>=REF(DI,1) AND D1>=REF(D1,1) AND D2>=REF(D2,1) AND D3>=REF(D3,1) AND
D4>=REF(D4,1) AND D5>=REF(D5,1) AND D6>=REF(D6,1) AND D7>=REF(D7,1) AND
D8>=REF(D8,1) AND C>EMA(C,11) AND DI>-0.8,DI,0,2,0),COLORRED;
MACD1:=(DIF1-DEA1)*2;
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,2,0),COLOR0000FF;
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,1.8,0),,COLOR0000FF;
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,1.6,0),COLOR0000FF;
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,1.4,0),COLOR0000FF;
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,1.2,0),COLOR0000FF;
STICKLINE(MACD1>REF(MACD1,1),0,MACD1,0.8,0),COLORCC66FF;
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,2,0),COLORFF9900;
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,1.8,0),COLORFF9900;
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,1.6,0),COLORFF9900;
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,1.4,0),COLORFF9900;
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,1.2,0),COLORFF9900;
STICKLINE(MACD1<REF(MACD1,1),0,MACD1,0.8,0),COLORFFCC00;
STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;
WY1001:=(2*CLOSE+HIGH+LOW)/4;
WY1002:=EMA(WY1001,4);
WY1003:=EMA(WY1002,4);
WY1004:=EMA(WY1003,4);
X:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*100;
X1:=IF(X<REF(X,1),X,DRAWNULL),COLORWHITE,LINETHICK2;
XO:=MA(X,2),COLOR9932CD;
SI:=REF(X,1);
STICKLINE(X>SI,X,SI,1,0),COLOR0080EF;
STICKLINE(X<SI,X,SI,1,0),COLORFF00CC;
DIF:DIF1,LINETHICK1,COLORGREEN;
DEA:DEA1,LINETHICK1,COLORGREEN;
DIF2:IF(MACD>REF(MACD,1),DIF1,DRAWNULL),COLORRED,LINETHICK1;
DEA2:IF(DEA1<DIF1,DEA1,DRAWNULL),COLORFF00FF,LINETHICK1;
VAR1:=HHV(DEA,41);
VAR2:=LLV(DEA,43);
VAR3:=DEA-(DIF-DEA);
VAR4:=DEA-(DIF-DEA);
SX:IF(DIF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1),COLORCYAN,LINETHICK2;
XX:IF(DIF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR4),VAR2),COLORYELLOW,LINETHICK2;
VARR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR2:=REF(VARR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR3:=REF(VARR2,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR4:=REF(VARR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR5:=REF(VARR4,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR6:=REF(VARR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR7:=REF(VARR6,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR8:=REF(VARR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR9:=REF(VARR8,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARRA:=REF(VARR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARRB:=REF(VARRA,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARRC:=REF(VARRB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARRD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARRE:=REF(VARRD,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARRF:=REF(VARRE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR10:=REF(VARRF,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR11:=REF(VARR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR12:=REF(VARR11,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR13:=REF(VARR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR14:=REF(VARR13,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR15:=REF(VARR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR16:=REF(VARR15,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR17:=REF(VARR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VARR18:=REF(VARR17,1) AND CLOSE>REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARR19:=REF(VARRD OR VARRE OR VARRF OR VARR10 OR VARR11 OR VARR12 OR VARR13 OR VARR14 OR VARR15 OR VARR16 OR VARR17 OR VARR18,1) AND VARR1;
DRAWICON(VARR19=1,SI-0.08,1);
VARR1A:=REF(VARR1 OR VARR2 OR VARR3 OR VARR4 OR VARR5 OR VARR6 OR VARR7 OR
VARR8 OR VARR9 OR VARRA OR VARRB OR VARRC,1) AND VARRD;
DRAWICON(VARR1A=1,X+0.08,2);
選股:VARR19,COLORRED,NODRAW;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.tumamayizhan.com '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?