通达信庄家控盘洗盘吸筹副图指标 高中低控盘 精品源码分享

{庄家控盘洗盘吸筹}



VAR1:=(3*CLOSE+OPEN+HIGH+LOW)/6;

MA12:=EMA(VAR1,12);

MA36:=EMA(VAR1,36);

MA108:=EMA(VAR1,108);

MA250:=EMA(VAR1,250);

控盘度:(EMA(VAR1,12)-REF(EMA(VAR1,36),1))/REF(EMA(VAR1,36),1)*100+50,NODRAW;

STICKLINE( 控盘度>50,0,控盘度-20,2.5,0),COLORFFFF00;

STICKLINE( 控盘度>=60,60,控盘度,2.5,0),COLORRED;

STICKLINE( 控盘度>=80,80,控盘度,2.5,0),COLORMAGENTA;

低控盘:IF(控盘度>=50,控盘度,0),COLORYELLOW,NODRAW;

中控盘:IF(控盘度>=60,控盘度,0),COLORRED,NODRAW;

高控盘:IF(控盘度>=80,控盘度,0),COLORMAGENTA,NODRAW;

10,COLORWHITE,DOTLINE;

CYC13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13);

强弱:50,COLORYELLOW,DOTLINE;

高度控盘:(CLOSE-CYC13)/CYC13*1000,NODRAW;

DRAWICON(高度控盘>0 AND 控盘度>=60 AND 高度控盘< 50,控盘度+20,23);

STICKLINE(高度控盘>0,0,高度控盘,3,0),COLORRED;

STICKLINE(高度控盘>0 AND 控盘度>=60,0,控盘度,3,0),COLOR00FFFF;

STICKLINE(高度控盘< 0,0,高度控盘,3,0),COLORGREEN;

庄洗盘吸筹: 控盘度>=60 AND 高度控盘< 0,COLORC08080,NODRAW;

STICKLINE( 控盘度>=60 AND 高度控盘< 0,0,控盘度,2.5,0),COLORC08080;

STICKLINE(高度控盘< -50,-50,高度控盘,3,0),COLORLIBLUE;

STICKLINE(高度控盘< -100,-100,高度控盘,3,0),COLORYELLOW;

STICKLINE(高度控盘>100,100,高度控盘,3,0),COLORLIRED;

STICKLINE(高度控盘>150,150,高度控盘,3,0),COLORMAGENTA;

量能:=VOL/CAPITAL*100;

VAR5:=IF(CODELIKE('688'),0,1);

VAR6:=COST(85);

VAR7:=COST(15);

VAR8:=VAR6-VAR7;

GSPTCOM:=(VAR6+VAR7)/2;

筹码:=VAR8/GSPTCOM*100< 30,LINETHICK0;

BU1:=HHV(HIGH,250);

BU2:=LLV(LOW,250);

BU3:=BU1-BU2;

BU4:=(GSPTCOM-BU2);

比例:=GSPTCOM< (BU3*04+BU2),LINETHICK0;

吸筹结束:=筹码 AND 比例;

BU5:=C/REF(C,1)>1.04;

主力持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);

主力持仓:=主力持仓%>=75 AND C>0 AND CLOSE>OPEN;

强庄:FILTER(主力持仓 AND 吸筹结束 AND BU4 AND WINNER(C)>=0.90 AND BU5 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND VAR5 AND 量能< 20 ,10),NODRAW;

STICKLINE(强庄,控盘度,-10,1,0),COLORFF0080;

原理解析：
{庄家控盘洗盘吸筹}

VAR1赋值:(3*收盘价+开盘价+最高价+最低价)/6
MA12赋值:VAR1的12日指数移动平均
MA36赋值:VAR1的36日指数移动平均
MA108赋值:VAR1的108日指数移动平均
MA250赋值:VAR1的250日指数移动平均
输出控盘度:(VAR1的12日指数移动平均-1日前的VAR1的36日指数移动平均)/1日前的VAR1的36日指数移动平均*100+50,NODRAW
当满足条件 控盘度>50时,在0和控盘度-20之间画柱状线
当满足条件 控盘度>=60时,在60和控盘度之间画柱状线
当满足条件 控盘度>=80时,在80和控盘度之间画柱状线
如果控盘度>=50返回控盘度否则返回0
如果控盘度>=60返回控盘度否则返回0
如果控盘度>=80返回控盘度否则返回0
10,画白色,DOTLINE
CYC13赋值:0.01*成交额的13日指数移动平均/成交量的13日指数移动平均
输出强弱:50,画黄色,DOTLINE
输出高度控盘:(收盘价-CYC13)/CYC13*1000,NODRAW
当满足条件高度控盘>0 AND 控盘度>=60 AND 高度控盘< 50时,在控盘度+20和23之间画图标
当满足条件高度控盘>0时,在0和高度控盘之间画柱状线
当满足条件高度控盘>0 AND 控盘度>=60时,在0和控盘度之间画柱状线
当满足条件高度控盘< 0时,在0和高度控盘之间画柱状线
输出庄洗盘吸筹: 控盘度>=60 AND 高度控盘< 0,COLORC08080,NODRAW
当满足条件 控盘度>=60 AND 高度控盘< 0时,在0和控盘度之间画柱状线
当满足条件高度控盘< -50时,在-50和高度控盘之间画柱状线
当满足条件高度控盘< -100时,在-100和高度控盘之间画柱状线
当满足条件高度控盘>100时,在100和高度控盘之间画柱状线
当满足条件高度控盘>150时,在150和高度控盘之间画柱状线
量能赋值:成交量/当前流通股本*100
VAR5赋值:IF(CODELIKE('688'),0,1)
VAR6赋值:获利盘为85%的成本分布
VAR7赋值:获利盘为15%的成本分布
VAR8赋值:VAR6-VAR7
GSPTCOM赋值:(VAR6+VAR7)/2
筹码赋值:VAR8/GSPTCOM*100< 30,LINETHICK0
BU1赋值:250日内最高价最高值
BU2赋值:250日内最低价最低值
BU3赋值:BU1-BU2
BU4赋值:(GSPTCOM-BU2)
比例赋值:GSPTCOM< (BU3*04+BU2),LINETHICK0
吸筹结束赋值:筹码 AND 比例
BU5赋值:C/1日前的C>1.04
主力持仓%赋值:EMA(100*(收盘价-30日内最低价最低值)/(30日内最高价最高值-30日内最低价最低值),3)
主力持仓赋值:主力持仓%>=75 AND C>0 AND 收盘价>开盘价
输出强庄:FILTER(主力持仓 AND 吸筹结束 AND BU4 AND C计算的获利盘比例>=0.90 AND BU5 AND C/1日前的C>1.092 AND C=H AND C< 40 AND VAR5 AND 量能< 20 ,10),NODRAW
当满足条件强庄时,在控盘度和-10之间画柱状线