相關標簽:

?

莊家成本源碼（副圖）：

?

?

原理解析：
輸出V1:收盤價的5日指數移動平均,畫黃色 輸出V2:收盤價的29日指數移動平均*1.01的10日指數移動平均,COLORFFCC66 當滿足條件V1上穿V2時,在V2位置畫1號圖標 輸出V3:收盤價的10日指數移動平均,COLORFF00FF 輸出V4:收盤價的60日指數移動平均*0.99的10日指數移動平均,COLOR0099FF 當滿足條件V3上穿V4時,在V4位置畫1號圖標 VAR1賦值:成交額(元)/成交量(手)/100 輸出莊家運作成本: 收盤價的18日簡單移動平均,畫白色 輸出莊家平均成本: VAR1的2日指數移動平均的N日指數移動平均,COLOR00FF00 輸出莊家底倉成本: VAR1的13日指數移動平均的M日指數移動平均,畫藍色 輸出無窮成本均線: 以成交量(手)/當前流通股本(手)為權重收盤價的動態移動平均,畫藍色 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,畫紅色 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR7070FF 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 當滿足條件收盤價>=開盤價時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫黃色 當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF2020 當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF6600 當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFCC66 當滿足條件收盤價<=開盤價時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFCC66 VAR326賦值:如果收盤價>1日前的收盤價,返回88,否則返回0 VAR327賦值:如果收盤價/1日前的收盤價>1.050ANDHIGH/收盤價<1.010ANDVAR326>0,返回91,否則返回0 當滿足條件VAR327>90時,在最低價*0.99和最低價*0.95位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫黃色 當滿足條件VAR327>90時,在最低價*0.95位置書寫文字,畫黃色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色

?

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

源碼：

?

?

參數,(N:30,M:95)

v1:ema(close,5),coloryellow;
v2:ema(ema(close,29)*1.01,10),colorffcc66;
DRAWICON(cross(v1,v2),v2,1);
v3:ema(close,10),colorff00ff;
v4:ema(ema(close,60)*0.99,10),color0099ff;
DRAWICON(cross(v3,v4),v4,1);
Var1:=AMOUNT/VOL/100;
莊家運作成本: MA(CLOSE,18),colorwhite;
莊家平均成本: EMA(EMA(Var1,2),N),color00ff00;
莊家底倉成本: EMA(EMA(Var1,13),M),colorblue;
無窮成本均線: DMA(CLOSE,VOL/CAPITAL),colorblue;
STICKLINE(C>=O,C,O,7,0),COLORRED;
STICKLINE(C>=O,C,O,4,0),COLOR7070ff{B0B0FF};
STICKLINE(C>=O,C,O,2,0),COLORYELLOW;
STICKLINE(C>=O,H,L,0,0),COLORYELLOW;
STICKLINE(C<=O,C,O,7,0),COLORFF2020;
STICKLINE(C<=O,C,O,4,0),COLORFF6600;
STICKLINE(C<=O,C,O,2,0),{COLORCYAN;}colorffcc66;
STICKLINE(C<=O,H,L,0,0),{COLORCYAN}colorffcc66;
Var326:=IF(CLOSE>REF(CLOSE,1),88,0);
Var327:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND Var326>0, 91, 0);
STICKLINE(Var327>90,L*0.99,L*0.95,4,0),COLORYELLOW;
DRAWTEXT(Var327>90,LOW*0.95,'追漲'),COLORYELLOW;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?