〖强庄吸筹控盘〗副图/主图指标，控盘强庄主力吸筹突破战法 源码分享

N:=10;{参数N赋值为10}

T1:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1;{统计10日内最大成交量到当前的周期数，固定数值，红色，细线}

低离线:=-20;{定义低离线数值为-20}

高离线:=40;{定义高离线数值为40}

gsptC2:=CLOSE/REF(CLOSE,1)>=1.095 AND CLOSE/REF(CLOSE,1)<=1.105 OR (CLOSE/REF(CLOSE,1)>=1.195 AND CLOSE/REF(CLOSE,1)<=1.205) OR (CLOSE/REF(CLOSE,1)>=1.295 AND CLOSE/REF(CLOSE,1)<=1.305) AND CLOSE=HIGH;{判断涨停/20cm/30cm涨停且收盘价=最高价（封板）}

STICKLINE(gsptC2,OPEN,CLOSE,1,0),COLORMAGENTA;{满足涨停条件，画紫红色实心K线}

DRAWTEXT(gsptC2,H*1.026,' ★龙'),COLORYELLOW;{满足条件，在最高价上方标注黄色“★龙”文字}

gspt1:=(3*CLOSE+OPEN+HIGH+LOW)/6;{计算加权均价：3倍收盘价+开高低价之和，再除以6}

控盘度:=(EMA(gspt1,12)-REF(EMA(gspt1,36),1))/REF(EMA(gspt1,36),1)*100+50,NODRAW;{计算控盘度指标，不绘制曲线}

CYC13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13);{计算13日成本均线}

高度控盘:(CLOSE-CYC13)/CYC13*1000,NODRAW;{计算高度控盘数值，不绘制曲线}

换手:=VOL/CAPITAL*100;{计算换手率：成交量/总股本*100}

gspt5:=IF(CODELIKE('688'),0,1);{判断是否为688开头股票，是则为0，否则为1}

gspt6:=COST(85);{计算85%筹码的获利成本价}

gspt7:=COST(15);{计算15%筹码的获利成本价}

gspt8:=gspt6-gspt7;{计算获利成本区间差值}

gspt9:=(gspt6+gspt7)/2;{计算成本区间中轴价}

筹码:=gspt8/gspt9*100< 30,LINETHICK0;{判断筹码集中度，集中度小于30%，不画线}

gspt10:=HHV(HIGH,250);{计算250日内最高价}

gspt11:=LLV(LOW,250);{计算250日内最低价}

gspt12:=gspt10-gspt11;{计算年股价波动区间}

gspt13:=(gspt9-gspt11);{计算中轴价与最低价差值}

比例:=gspt9< (gspt12*04+gspt11),LINETHICK0;{判断股价位置比例条件，不画线}

吸筹结束:=筹码 AND 比例;{同时满足筹码集中和位置比例，判定吸筹结束}

gspt15:=C/REF(C,1)>1.04;{判断当日涨幅大于4%}

主力持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);{计算主力持仓百分比指标}

主力持仓:=主力持仓%>=75 AND C>0 AND CLOSE>OPEN;{持仓大于等于75%、收阳线，判定主力持仓}

强庄:=FILTER(主力持仓 AND 吸筹结束 AND gspt13 AND WINNER(C)>=0.90 AND gspt15 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND gspt5 AND 换手< 20 ,10),NODRAW;{综合条件筛选强庄，10周内只显示一次，不画线}

短线成本线:EMA(CLOSE,5),LINETHICK1,COLORWHITE DOTLINE;{绘制5日指数均线，白色虚线，短线成本线}

DRAWTEXT_FIX(1,0.980,20,1,'公式平台，公式源码 http://www.gspt.com'),COLOR333333;

A:=(3*C+L+O+H)/6;{再次计算加权均价}

X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;{计算长周期加权均价}

中线成本线:EMA(X,34),LINETHICK2,COLORRED;{绘制34日指数均线，红色粗线，中线成本线}

STICKLINE(强庄,O,C,1,0),COLORFF0080;{满足强庄条件，画玫红色实心K线}

开始控盘:=BARSLASTCOUNT(高度控盘>0 AND 高度控盘>=50)=1;{高度控盘连续满足，第一天判定为开始控盘}

STICKLINE(开始控盘,C,O,2,0),COLORYELLOW;{开始控盘时，画黄色宽实体K线}

DRAWICON(开始控盘,L*1.002,9);{开始控盘时，在最低价上方显示图标9}

DRAWTEXT(开始控盘,L*0.93,' ↖强庄'),COLORMAGENTA;{开始控盘时，在最低价下方标注玫红色“强庄”文字}