通达信〖筹码高度〗精准测算近期资金的交易活跃度及主力控盘力度源码
该指标主要用于直观量化个股的筹码分布状况及资金活跃程度。通过阶梯式颜色柱体，清晰呈现当前股价在长期历史区间内的相对位置与筹码集中情况；同时，结合特定时间节点的饱和度指标，精准测算近期资金的交易活跃度及主力控盘力度。
操作策略：
在实际操作中，投资者可将该指标作为评估个股爆发潜力的参考工具。当阶梯柱体颜色逐步向高亮色过渡，且资金活跃度处于合理区间时，说明筹码在特定位置高度集中，主力控盘程度较强。此时若趋势向上，往往是股价拉升的前兆，可考虑逢低吸纳或继续持股。反之，若在高位出现极端活跃度或筹码明显发散，则需警惕主力出货风险，应及时逢高减仓，做好风险控制。
N:=10;
T:=200;
M1:=CONST(HHV(H,T));
M2:=CONST(LLV(L,T));
A1:=LOG(M1/M2)/10;
筹码:1000*A1,NODRAW;
L0A:=
IF(RANGE(C,M2*POW(10,0*A1),M2*POW(10,1*A1)),0+1*A1,
IF(RANGE(C,M2*POW(10,1*A1),M2*POW(10,2*A1)),0+2*A1,
IF(RANGE(C,M2*POW(10,2*A1),M2*POW(10,3*A1)),0+3*A1,
IF(RANGE(C,M2*POW(10,3*A1),M2*POW(10,4*A1)),0+4*A1,
IF(RANGE(C,M2*POW(10,4*A1),M2*POW(10,5*A1)),0+5*A1,
DRAWNULL)))));
L0:=
IF(RANGE(C,M2*POW(10,5*A1),M2*POW(10,6*A1)),0+6*A1,
IF(RANGE(C,M2*POW(10,6*A1),M2*POW(10,7*A1)),0+7*A1,
IF(RANGE(C,M2*POW(10,7*A1),M2*POW(10,8*A1)),0+8*A1,
IF(RANGE(C,M2*POW(10,8*A1),M2*POW(10,9*A1)),0+9*A1,
IF(RANGE(C,M2*POW(10,9*A1),M2*POW(10,10*A1)),0+10*A1,
L0A)))));
STICKLINE(L0>0*A1,0,1*A1*1000,4,0),COLOREE11EE;
STICKLINE(L0>1*A1,0,2*A1*1000,4,0),COLORAA11EE;
STICKLINE(L0>2*A1,0,3*A1*1000,4,0),COLOR5511EE;
STICKLINE(L0>3*A1,0,4*A1*1000,4,0),COLOR1111EE;
STICKLINE(L0>4*A1,0,5*A1*1000,4,0),COLOR1155EE;
STICKLINE(L0>5*A1,0,6*A1*1000,4,0),COLOR11AAEE;
STICKLINE(L0>6*A1,0,7*A1*1000,4,0),COLOR11EEEE;
STICKLINE(L0>7*A1,0,8*A1*1000,4,0),COLOR11EEAA;
STICKLINE(L0>8*A1,0,9*A1*1000,4,0),COLOR11EE55;
STICKLINE(L0>9*A1,0,10*A1*1000,4,0),COLOR11EE11;
AI:=AMOUNT/VOL/100;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*VOL/CAPITAL;
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
STICKLINE(((CLOSE > 0) AND DAY=2),20,121,40,1),COLORFFFFFF;
STICKLINE(((SAT <= 5) AND DAY=2),21,(20 + SAT),35,0),COLORFFFFFF;
STICKLINE((((SAT > 5) AND (SAT <= 20)) AND DAY=2),21,(20 + SAT),35,0),COLORCCFF88;
STICKLINE((((SAT > 20) AND (SAT <= 40)) AND DAY=2),21,(20 + SAT),35,0),COLORFF00FF;
STICKLINE(((SAT > 40) AND DAY=2),21,(20 + SAT),35,0),COLOR0000FF;
未来函数检测结果如下：
该公式包含未来函数:CAPITAL
定制指标公式、软件请联系QQ或微信同号：88652583
N赋值:10
T赋值:200
M1赋值:T日内最高价的最高值的最后一日取值设为常数
M2赋值:T日内最低价的最低值的最后一日取值设为常数
A1赋值:M1/M2的对数/10
输出筹码:1000*A1,NODRAW
L0A赋值:如果收盘价位于M2*10的0*A1乘幂和M2*10的1*A1乘幂之间,返回0+1*A1,否则返回如果收盘价位于M2*10的1*A1乘幂和M2*10的2*A1乘幂之间,返回0+2*A1,否则返回如果收盘价位于M2*10的2*A1乘幂和M2*10的3*A1乘幂之间,返回0+3*A1,否则返回如果收盘价位于M2*10的3*A1乘幂和M2*10的4*A1乘幂之间,返回0+4*A1,否则返回如果RAN,返回?,否则返回?
L0赋值:如果收盘价位于M2*10的5*A1乘幂和M2*10的6*A1乘幂之间,返回0+6*A1,否则返回如果收盘价位于M2*10的6*A1乘幂和M2*10的7*A1乘幂之间,返回0+7*A1,否则返回如果收盘价位于M2*10的7*A1乘幂和M2*10的8*A1乘幂之间,返回0+8*A1,否则返回如果收盘价位于M2*10的8*A1乘幂和M2*10的9*A1乘幂之间,返回0+9*A1,否则返回如果RAN,返回?,否则返回?
当满足条件L0>0*A1时,在0和1*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOREE11EE
当满足条件L0>1*A1时,在0和2*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORAA11EE
当满足条件L0>2*A1时,在0和3*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR5511EE
当满足条件L0>3*A1时,在0和4*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR1111EE
当满足条件L0>4*A1时,在0和5*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR1155EE
当满足条件L0>5*A1时,在0和6*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR11AAEE
当满足条件L0>6*A1时,在0和7*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR11EEEE
当满足条件L0>7*A1时,在0和8*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR11EEAA
当满足条件L0>8*A1时,在0和9*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR11EE55
当满足条件L0>9*A1时,在0和10*A1*1000位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR11EE11
AI赋值:成交额(元)/成交量(手)/100
C0赋值:2日前的收盘价*0.865
C1赋值:13日前的收盘价*0.772
DSY赋值:100*成交量(手)/当前流通股本(手)
SAT赋值:如果(成交额(元)/收盘价)/(20日内成交额(元)的最高值/20日内收盘价的最高值)*100>100,返回100,否则返回(成交额(元)/收盘价)/(20日内成交额(元)的最高值/20日内收盘价的最高值)*100
当满足条件((收盘价>0)ANDDAY=2)时,在20和121位置之间画柱状线,宽度为40,1不为0则画空心柱.,COLORFFFFFF
当满足条件((SAT<=5)ANDDAY=2)时,在21和(20+SAT)位置之间画柱状线,宽度为35,0不为0则画空心柱.,COLORFFFFFF
当满足条件(((SAT>5)AND(SAT<=20))ANDDAY=2)时,在21和(20+SAT)位置之间画柱状线,宽度为35,0不为0则画空心柱.,COLORCCFF88
当满足条件(((SAT>20)AND(SAT<=40))ANDDAY=2)时,在21和(20+SAT)位置之间画柱状线,宽度为35,0不为0则画空心柱.,COLORFF00FF
当满足条件((SAT>40)ANDDAY=2)时,在21和(20+SAT)位置之间画柱状线,宽度为35,0不为0则画空心柱.,COLOR0000FF
