相關(guān)標(biāo)簽:

?

?

原理解析：
K賦值:(日期<1341230) XD1賦值:大盤的開盤價(jià) XD2賦值:大盤的最高價(jià) XD3賦值:大盤的最低價(jià) XD4賦值:大盤的收盤價(jià) 輸出對應(yīng)指數(shù)開:大盤的開盤價(jià),COLOR0000FF,NODRAW 輸出盤中最高:大盤的最高價(jià),NODRAW 輸出盤中最低:大盤的最低價(jià),NODRAW 輸出收盤點(diǎn):大盤的收盤價(jià),NODRAW 輸出大盤資金增減:(100*((大盤的成交量/1日前的大盤的成交量)-1)),COLORFFFF00,NODRAW JJ賦值:(XD4+XD2+XD3)/3 A賦值:JJ的10日指數(shù)移動平均 B賦值:1日前的A 輸出決策點(diǎn)位:B,COLORFFFFFD,NODRAW 輸出當(dāng)日換:100*成交量(手)/當(dāng)前流通股本(手)的1日累和,NODRAW 輸出五日換:100*成交量(手)/當(dāng)前流通股本(手)的5日累和,NODRAW VAR1賦值:收盤價(jià)的12日指數(shù)移動平均-收盤價(jià)的26日指數(shù)移動平均 VAR2賦值:VAR1的50日指數(shù)移動平均 VAR3賦值:2*(VAR1-VAR2) FD賦值:2*(VAR2-VAR1) 輸出MACD漸弱:如果VAR3<1日前的VAR3并且VAR3>0,返回VAR3,否則返回0,畫黃色,線寬為4,STICK 輸出MACD強(qiáng)勢:如果VAR3>=1日前的VAR3ANDVAR3>0,返回VAR3,否則返回0,畫紅色,線寬為4,STICK 輸出MACD走強(qiáng):如果VAR3>1日前的VAR3ANDVAR3<0,返回VAR3,否則返回0,COLORFFC8FF,線寬為4,STICK 輸出MACD走弱:如果VAR3<=1日前的VAR3ANDVAR3<0,返回VAR3,否則返回0,COLORFFCC66,線寬為4,STICK 輸出短趨:收盤價(jià)的12日指數(shù)移動平均-收盤價(jià)的26日指數(shù)移動平均,畫綠色 輸出長趨:短趨的50日指數(shù)移動平均,COLORFF00FF 流通盤大小賦值:流通股本(股)/1000000*100,NODRAW 吸籌賦值:上次"隨機(jī)指標(biāo)KD的K"上穿"隨機(jī)指標(biāo)KD的D"AND"隨機(jī)指標(biāo)KD的D"<30的13日過濾距今天數(shù) 主力吸籌區(qū)賦值:如果吸籌>0AND吸籌<61,返回吸籌,否則返回0 輸出介入時(shí)機(jī):如果VAR2<0.8并且0上穿FD,返回-0.3,否則返回?zé)o效數(shù),COLORFF00FF,線寬為3,CROSSDOT 當(dāng)滿足條件收陽線時(shí),在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當(dāng)滿足條件收陽線時(shí),在橫軸1縱軸1位置書寫文字,畫紅色

?

?來源:程序化99（ m.kzuj.com.cn ）

源碼：

?

?

?

K:=(DATE<1341230);
XD1:=INDEXO;
XD2:=INDEXH;
XD3:=INDEXL;
XD4:=INDEXC;
對應(yīng)指數(shù)開:INDEXO,COLOR0000FF,NODRAW;
{盤:INDEXO,COLOR0000FF,NODRAW;}
盤中最高:INDEXH,NODRAW;
盤中最低:INDEXL,NODRAW;
收盤點(diǎn):INDEXC,NODRAW;
{位:INDEXC,NODRAW;}
大盤資金增減:(100*((INDEXV/REF(INDEXV,1))-1)),COLORFFFF00,NODRAW;
JJ:=(XD4+XD2+XD3)/3;
A:=EMA(JJ,10);
B:=REF(A,1);
{買賣}
決策點(diǎn)位:B,COLORFFFFFD,NODRAW;
當(dāng)日換:SUM(100*V/CAPITAL,1),NODRAW;
五日換:SUM(100*V/CAPITAL,5),NODRAW;
{短線MACD}
VAR1:=EMA(CLOSE,12)-EMA(CLOSE,26);
VAR2:=EMA(VAR1,50);
VAR3:=2*(VAR1-VAR2);
FD:=2*(VAR2-VAR1);
MACD漸弱:IF(VAR3<REF(VAR3,1)&&VAR3>0,VAR3,0),COLORYELLOW,LINETHICK4,STICK;
MACD強(qiáng)勢:IF(VAR3>=REF(VAR3,1) ANDVAR3>0,VAR3,0),COLORRED,LINETHICK4,STICK;
MACD走強(qiáng):IF(VAR3>REF(VAR3,1) ANDVAR3<0,VAR3,0),COLORFFC8FF,LINETHICK4,STICK;
MACD走弱:IF(VAR3<=REF(VAR3,1) ANDVAR3<0,VAR3,0),COLORFFCC66,LINETHICK4,STICK;
{STICKLINE(VAR3<REF(VAR3,1) ANDVAR3>0,0,VAR3,2,1),COLORYELLOW;
STICKLINE(VAR3>=REF(VAR3,1) ANDVAR3>0,0,VAR3,2,1),COLORRED;
STICKLINE(VAR3>REF(VAR3,1) ANDVAR3<0,0,VAR3,2,1),COLORFFC8FF;
STICKLINE(VAR3<=REF(VAR3,1) ANDVAR3<0,0,VAR3,2,1),COLORFFCC66;}
短趨:EMA(CLOSE,12)-EMA(CLOSE,26),COLORGREEN;
長趨:EMA(短趨,50),COLORFF00FF;
{簡單基本面信息}
流通盤大小:=FINANCE(7)/1000000*100,NODRAW;{
銷售毛利率:=FINANCE2(12);
凈利潤同比增長:=FINANCE2(10);}
吸籌:=BARSLAST(FILTER(CROSS("KD.K","KD.D") AND"KD.D"<30,13));
主力吸籌區(qū):=IF(吸籌>0 AND 吸籌<61,吸籌,0);
介入時(shí)機(jī):IF(VAR2<0.8&&CROSS(0,FD),-0.3,DRAWNULL),COLORFF00FF,LINETHICK3,CROSSDOT;DRAWTEXT_FIX(C>O,0.01,0.9,0,' m.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?