相關標簽:

?

{盈籌主散 改編 BY SHUHONG}{主力吸籌}

?

?

原理解析：
VAR1B賦值:如果年份>=2038ANDMONTH>=1,返回0,否則返回1 VAR2B賦值:1日前的最低價*VAR1B VAR3B賦值:最低價-VAR2B的絕對值的3日[1日權重]移動平均/最低價-VAR2B和0的較大值的3日[1日權重]移動平均*100*VAR1B VAR4B賦值:如果收盤價*1.3,返回VAR3B*10,否則返回VAR3B/10的3日指數移動平均*VAR1B VAR5B賦值:30日內最低價的最低值*VAR1B VAR6B賦值:30日內VAR4B的最高值*VAR1B VAR7B賦值:如果收盤價的58日簡單移動平均,返回1,否則返回0*VAR1B VAR8B賦值:如果最低價<=VAR5B,返回(VAR4B+VAR6B*2)/2,否則返回0的3日指數移動平均/618*VAR7B*VAR1B 吸籌賦值:如果VAR8B>100,返回100,否則返回VAR8B*VAR1B,畫紅色 輸出莊家吸籌:當滿足條件吸籌>-150時,在0和吸籌位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫紅色 莊籌賦值:以收盤價計算的獲利盤比例*100,畫白色 輸出籌碼集中度:莊籌的20日指數移動平均,畫白色 輸出籌碼集中警戒線:籌碼集中度的5日指數移動平均,畫白色 輸出籌碼集中生命線:籌碼集中警戒線的5日指數移動平均,畫白色 畫帶狀線 畫帶狀線 輸出籌碼獲利比:以收盤價計算的獲利盤比例*100,COLOR8080FF 當滿足條件籌碼獲利比>0時,在籌碼獲利比和0位置之間畫柱狀線,寬度為0,-1不為0則畫空心柱.,COLOR8080FF RSV賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 K賦值:RSV的9日[3日權重]移動平均,NODRAW D賦值:K的9日[3日權重]移動平均,NODRAW J賦值:3*K-2*D,NODRAW VAR2賦值:1日前的最低價 VAR3賦值:最低價-VAR2的絕對值的3日[1日權重]移動平均/最低價-VAR2和0的較大值的3日[1日權重]移動平均*100 VAR4賦值:如果收盤價*1.3,返回VAR3*10,否則返回VAR3/10的3日指數移動平均 VAR5賦值:30日內最低價的最低值 VAR6賦值:30日內VAR4的最高值 VAR7賦值:如果收盤價的58日簡單移動平均,返回1,否則返回0 VAR8賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7 VAR9賦值:如果VAR8>100,返回100,否則返回VAR8 AA3賦值:(21日內最高價的最高值-收盤價)/(21日內最高價的最高值-21日內最低價的最低值)*100-10 AA4賦值:(收盤價-21日內最低價的最低值)/(21日內最高價的最高值-21日內最低價的最低值)*100 AA5賦值:AA4的13日[8日權重]移動平均 輸出趨勢線:AA5的13日[8日權重]移動平均的向上舍入,畫黃色,線寬為2 輸出散戶線: 100*(60日內最高價的最高值-收盤價)/(60日內最高價的最高值-60日內最低價的最低值),畫青色,線寬為2 輸出主力線:J的6日指數移動平均,畫淡洋紅色,線寬為2 當滿足條件是否最后一個周期時,在主力線位置書寫文字,畫淡洋紅色 當滿足條件是否最后一個周期時,在散戶線位置書寫文字,畫青色 當滿足條件是否最后一個周期時,在趨勢線位置書寫文字,畫黃色 當滿足條件收盤價>0時,在橫軸0.02縱軸0.01位置書寫文字,畫深灰色 當滿足條件收盤價>0時,在橫軸0.02縱軸0.08位置書寫文字,畫深灰色 當滿足條件收盤價>0時,在橫軸0.02縱軸0.15位置書寫文字,畫深灰色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

?

?

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

源碼：

VAR1B:=IF(YEAR>=2038 AND MONTH>=1,0,1);
VAR2B:=REF(LOW,1)*VAR1B;
VAR3B:=SMA(ABS(LOW-VAR2B),3,1)/SMA(MAX(LOW-VAR2B,0),3,1)*100*VAR1B;
VAR4B:=EMA(IF(CLOSE*1.3,VAR3B*10,VAR3B/10),3)*VAR1B;
VAR5B:=LLV(LOW,30)*VAR1B;
VAR6B:=HHV(VAR4B,30)*VAR1B;
VAR7B:=IF(MA(CLOSE,58),1,0)*VAR1B;
VAR8B:=EMA(IF(LOW<=VAR5B,(VAR4B+VAR6B*2)/2,0),3)/618*VAR7B*VAR1B;
吸籌:=IF(VAR8B>100,100,VAR8B)*VAR1B,COLORRED;
莊家吸籌:STICKLINE(吸籌>-150,0,吸籌,8,1),COLORRED;{莊家籌碼波段}
莊籌:=WINNER(CLOSE)*100,COLORWHITE;
籌碼集中度:EMA(莊籌,20),COLORWHITE;
籌碼集中警戒線:EMA(籌碼集中度,5),COLORWHITE;
籌碼集中生命線:EMA(籌碼集中警戒線,5),COLORWHITE;
DRAWBAND(籌碼集中警戒線,RGB(192,0,0),籌碼集中生命線,RGB(0,192,0));
DRAWBAND(籌碼集中度,RGB(255,0,0),籌碼集中警戒線,RGB(0,255,0));{籌碼獲利比例}
籌碼獲利比:WINNER(CLOSE)*100,COLOR8080FF;
STICKLINE(籌碼獲利比>0,籌碼獲利比,0,0,-1),COLOR8080FF;{主力線散戶線}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,9,3),NODRAW;D:=SMA(K,9,3),NODRAW;
J:=3*K-2*D,NODRAW;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
VAR5:=LLV(LOW,30);
VAR6:=HHV(VAR4,30);
VAR7:=IF(MA(CLOSE,58),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
VAR9:=IF(VAR8>100,100,VAR8);
AA3:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
AA4:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
AA5:=SMA(AA4,13,8);
趨勢線:CEILING(SMA(AA5,13,8)),COLORYELLOW,LINETHICK2;
散戶線: 100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),COLORCYAN,LINETHICK2;
主力線:EMA(J,6),COLORLIMAGENTA,LINETHICK2;
DRAWTEXT(ISLASTBAR,主力線,' ←主力線'),COLORLIMAGENTA;
DRAWTEXT(ISLASTBAR,散戶線,' ←散戶線'),COLORCYAN;
DRAWTEXT(ISLASTBAR,趨勢線,' ←趨勢線'),COLORYELLOW;{說明}
DRAWTEXT_FIX(C>0,0.02,0.01,0,'淺紅細柱線是籌碼獲利的百分比例；'),COLORGRAY;
DRAWTEXT_FIX(C>0,0.02,0.08,0,'紅色綠色彩條是莊家籌碼波段指標；'),COLORGRAY;
DRAWTEXT_FIX(C>0,0.02,0.15,0,'主力線上穿散戶線看多，下穿看空；'),COLORGRAY;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;


?

?

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

?