相關標簽:

?

{我們把從MACD指標金叉的那一周開始，
到你所計算的那一周為止，把所有各周的成交量加起來再除以流通盤，
可得出這段時間的換手率，然后再把這個換手率×13．3％得出的數字即為莊家的控盤度
，所以一個中線莊家的換手率應在300％～450％之間，只有足夠的換手，莊家才能吸足籌碼。
至于成本，可采用在所計算的那段時間內的最低價加上最高價，然后除以2，即為莊家的成本區，
雖然簡單，但相當實用，誤差不超過10％，我們把莊家的成本和持倉量計算出了以后，
莊家的第一目標為成本×（50％＋1），即若莊家成本為10元，則其最低目標即第一目標為15元，
這樣我們就可在操作上做到有的放矢。}

?

原理解析：
MACD賦值:"MACD.MACD[取周線數據]" 起點0賦值:上次MACD<0距今天數 起點賦值:如果MACD<0,返回上次MACD>0距今天數日前的起點0,否則返回起點0 VERTLINE(起點=1) 累計量賦值:如果MACD>0,返回成交量(手),否則返回0的起點+1日累和 輸出時段換手:累計量/當前流通股本(手)*100,線寬為0 輸出控盤度:時段換手*13.3/100,線寬為0 輸出成本區:(起點日內收盤價的最高值+起點日內收盤價的最低值)/2,線寬為0 輸出平均成本:(起點日內收盤價的最高值+起點日內收盤價的最低值)/2的起點[DATACOUNT]日簡單移動平均,線寬為0 輸出第一目標:平均成本*1.5,線寬為0 輸出第二目標:成本區*1.5,線寬為0 成本區[DATACOUNT] 平均成本[DATACOUNT] 第一目標[DATACOUNT] 第二目標[DATACOUNT] 輸出起點價:起點日前的收盤價 當滿足條件起點=1時,在收盤價位置書寫文字 當滿足條件起點=1時,在成本區[DATACOUNT]位置書寫文字 當滿足條件起點=1時,在平均成本[DATACOUNT]位置書寫文字 當滿足條件起點=1時,在第一目標[DATACOUNT]位置書寫文字 當滿足條件起點=1時,在第二目標[DATACOUNT]位置書寫文字

?

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

源碼：

?

MACD:="MACD.MACD#WEEK";
起點0:=BARSLAST(MACD<0);
起點:=if(macd<0,ref(起點0,BARSLAST(MACD>0)),起點0);
VERTLINE(起點=1);
累計量:=SUM(IF(MACD>0,V,0),起點+1);
時段換手:累計量/CAPITAL*100,LINETHICK;
控盤度:時段換手*13.3/100,LINETHICK;
成本區:(HHV(C,起點)+LLV(C,起點))/2,LINETHICK;
平均成本:MA((HHV(C,起點)+LLV(C,起點))/2,起點[DATACOUNT]),LINETHICK;
第一目標:平均成本*1.5,LINETHICK;第二目標:成本區*1.5,LINETHICK;
成本區[DATACOUNT];平均成本[DATACOUNT];第一目標[DATACOUNT];第二目標[DATACOUNT];
起點價:REF(C,起點);
DRAWTEXT(起點=1,C,'起點價');
DRAWTEXT(起點=1,成本區[DATACOUNT],'莊家成本區');
DRAWTEXT(起點=1,平均成本[DATACOUNT],'莊家平均成本');
DRAWTEXT(起點=1,第一目標[DATACOUNT],'莊家第一目標');
DRAWTEXT(起點=1,第二目標[DATACOUNT],'莊家第二目標');

KLINE(O,H,L,C,0);{用于副圖加這句}{分析家上網.com提示:跨周期引用數據}

?

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

?