相關標簽:

?

?

原理解析：
N賦值:5 M賦值:13 AA賦值:成交量(手)/((最高價-最低價)*2-收盤價-開盤價的絕對值) 買量賦值:如果收陽線,返回AA*(最高價-最低價),否則返回如果收陰線,返回AA*((最高價-開盤價)+(收盤價-最低價)),否則返回成交量(手)/2,線寬為0,畫紅色 賣量賦值:如果收陽線,返回0-AA*((最高價-收盤價)+(開盤價-最低價)),否則返回如果收陰線,返回0-AA*(最高價-最低價),否則返回0-成交量(手)/2,線寬為0,畫青色 進出量賦值:買量+賣量,COLOR00FFFF 當滿足條件進出量<0時,在0和進出量位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF6600 當滿足條件進出量<0時,在0和進出量位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF9900 當滿足條件進出量<0時,在0和進出量位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFFCC00 當滿足條件進出量<0時,在0和進出量位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫青色 當滿足條件進出量>0時,在0和進出量位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR000099 當滿足條件進出量>0時,在0和進出量位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000CC 當滿足條件進出量>0時,在0和進出量位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件進出量>0時,在0和進出量位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORCC66FF 輸出N日內凈流入:進出量的N日累和,線寬為2,畫綠色 輸出流入:如果N日內凈流入>1日前的N日內凈流入,返回N日內凈流入,否則返回無效數,畫紅色,線寬為2 輸出連紅天:條件連續成立次數 輸出M日內翻紅天:統計M日中滿足進出量>0的天數,畫紅色 輸出走熊天:條件連續成立次數,畫青色 輸出走牛天:條件連續成立次數,畫紅色 輸出強勢天:條件連續成立次數 輸出弱勢天:條件連續成立次數 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

N:=5;M:=13;
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
買量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0,COLORRED;
賣量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN;
進出量:=買量+賣量,COLOR00FFFF;
STICKLINE(進出量<0,0,進出量,4,0),COLORFF6600;
STICKLINE(進出量<0,0,進出量,3,0),COLORFF9900;
STICKLINE(進出量<0,0,進出量,1.5,0),COLORFFCC00;
STICKLINE(進出量<0,0,進出量,0.5,0),COLORCYAN;
STICKLINE(進出量>0,0,進出量,4,0),COLOR000099;
STICKLINE(進出量>0,0,進出量,3,0),COLOR0000CC;
STICKLINE(進出量>0,0,進出量,1.5,0),COLOR0000FF;
STICKLINE(進出量>0,0,進出量,0.5,0),COLORCC66FF;
N日內凈流入:SUM(進出量,N),LINETHICK2,COLORGREEN;
流入:IF(N日內凈流入>REF(N日內凈流入,1),N日內凈流入,DRAWNULL),COLORRED,LINETHICK2;
連紅天:BARSLASTCOUNT(進出量>0);
M日內翻紅天:COUNT(進出量>0,M),COLORRED;
走熊天:BARSLASTCOUNT(N日內凈流入<0),COLORCYAN;
走牛天:BARSLASTCOUNT(N日內凈流入>0),COLORRED;
強勢天:BARSLASTCOUNT((N日內凈流入>REF(N日內凈流入,1))>0 AND N日內凈流入>0);
弱勢天:BARSLASTCOUNT((N日內凈流入<REF(N日內凈流入,1))>0 AND N日內凈流入<0);
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?