[AG261123]撑压指标主图-通达信指标源码分享

01一把尺子，把量能钉进十五个格

你想象一下，把一年的价格高低压进一把尺子，尺子再切十五格，每格里站了多少成交量，全用柱子画出来。撑压指标主图干的就是这事，主图上一排排灰柱，哪层承接厚，一眼扫得出来。

先岔一句，这把尺子不是等分的。价格从十块涨到二十块是翻倍，从一百块涨到一百一十块只挪一成，都算"走一格"的话，刻度必须按倍数来。源码里 GZ 那行就是造尺子的。

速查卡（五秒扫完）：

02指标源码分享｜撑压指标主图

指标编号：AG261123

指标完整源码：

TS:=350;N:=95;DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);DA:=IF(CURRBARSCOUNT>DA1,0,DA1);HI:=REFDATE(HHV(H,DA),DATE);{最高价}LO:=REFDATE(LLV(L,DA),DATE);C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);GZ:=EXP(LN(HI/LO)/15);{对数格值}LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);LH2:=SUM(IF(C1>=(HI/POW(GZ,2))ANDC1<(HI/GZ),V,0),DA);LH3:=SUM(IF(C1>=(HI/POW(GZ,3))ANDC1<(HI/POW(GZ,2)),V,0),DA);LH4:=SUM(IF(C1>=(HI/POW(GZ,4))ANDC1<(HI/POW(GZ,3)),V,0),DA);LH5:=SUM(IF(C1>=(HI/POW(GZ,5))ANDC1<(HI/POW(GZ,4)),V,0),DA);LH6:=SUM(IF(C1>=(HI/POW(GZ,6))ANDC1<(HI/POW(GZ,5)),V,0),DA);LH7:=SUM(IF(C1>=(HI/POW(GZ,7))ANDC1<(HI/POW(GZ,6)),V,0),DA);LH8:=SUM(IF(C1>=(HI/POW(GZ,8))ANDC1<(HI/POW(GZ,7)),V,0),DA);LH9:=SUM(IF(C1>=(HI/POW(GZ,9))ANDC1<LO*POW(GZ,7),V,0),DA);LH10:=SUM(IF(C1>=(LO*POW(GZ,5))ANDC1<LO*POW(GZ,6),V,0),DA);LH11:=SUM(IF(C1>=(LO*POW(GZ,4))ANDC1<LO*POW(GZ,5),V,0),DA);LH12:=SUM(IF(C1>=(LO*POW(GZ,3))ANDC1<LO*POW(GZ,4),V,0),DA);LH13:=SUM(IF(C1>=(LO*POW(GZ,2))ANDC1<LO*POW(GZ,3),V,0),DA);LH14:=SUM(IF(C1>=(LO*GZ)ANDC1<LO*POW(GZ,2),V,0),DA);LH15:=SUM(IF(C1>=LOANDC1<LO*GZ,V,0),DA);L1:=REFDATE(HHV(LH1,DA),DATE);L2:=REFDATE(HHV(LH2,DA),DATE);L3:=REFDATE(HHV(LH3,DA),DATE);L4:=REFDATE(HHV(LH4,DA),DATE);L5:=REFDATE(HHV(LH5,DA),DATE);L6:=REFDATE(HHV(LH6,DA),DATE);L7:=REFDATE(HHV(LH7,DA),DATE);L8:=REFDATE(HHV(LH8,DA),DATE);L9:=REFDATE(HHV(LH9,DA),DATE);L10:=REFDATE(HHV(LH10,DA),DATE);L11:=REFDATE(HHV(LH11,DA),DATE);L12:=REFDATE(HHV(LH12,DA),DATE);L13:=REFDATE(HHV(LH13,DA),DATE);L14:=REFDATE(HHV(LH14,DA),DATE);L15:=REFDATE(HHV(LH15,DA),DATE);SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10+L11+L12+L13+L14+L15);STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,HI/GZ,5,0)COLORGRAY;STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),5,0)COLORGRAY;STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),5,0)COLORGRAY;STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),5,0)COLORGRAY;STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),5,0)COLORGRAY;STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),5,0)COLORGRAY;STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),5,0)COLORGRAY;STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,7),LO*POW(GZ,8)*N/100,5,0)COLORGRAY;STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,6),LO*POW(GZ,7)*N/100,5,0)COLORGRAY;STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,5),LO*POW(GZ,6)*N/100,5,0)COLORGRAY;STICKLINE(CEILING(DA*L11/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,4),LO*POW(GZ,5)*N/100,5,0)COLORGRAY;STICKLINE(CEILING(DA*L12/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,3),LO*POW(GZ,4)*N/100,5,0)COLORGRAY;STICKLINE(CEILING(DA*L13/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,5,0)COLORGRAY;STICKLINE(CEILING(DA*L14/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,5,0)COLORGRAY;{STICKLINE(CEILING(DA*L15/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,5,0)COLORGRAY;}DRAWKLINE(HIGH,OPEN,LOW,CLOSE);五:MA(C,5);

顺手把 #撑压指标# 这个话题钉一下，平时跟 #量能分层##主图# 绑在一块儿聊的，基本都在找资金待得久的位置。

03GZ 那一下对数，格子就这么铺开

尺子先看怎么造出来的，代码里就一行：

GZ:=EXP(LN(HI/LO)/15);

HI 是一年最高，LO 是一年最低，LN 取对数、除以 15，再 EXP 还原。它在算每格要跨多大的倍数——十五格走完一整年的高低区间，每格恰好是同样的倍数跨度。不能等分的道理也在这：十块到二十块翻一倍，等分格把它跟一百到一百一十塞进同一格，这一格直接吃亏；对数格才把翻倍和涨一成放同一把尺子上量。

参数里 DA 值得单独说道。TS 默认 350，次新股没那么多K线，收口靠 DA1 那行，拿 TOTALBARSCOUNT 兜底。上周我拿一只上市半年的次新试过，它自动收到一百二十根，柱子照样立得住；缺了这层收口，新区间还没走满一年，分层就是空的。反过来说，350 收到 30，一年四季的高低压不住，柱子全挤在中间几格；放到 500，每层都摊得太薄，柱身立不起来。卡在 350，等于把一年左右的波动量全收进来，不多不少。两件事凑一块，横着比竖着比都不变形。

十五档落位之后，LH1 到 LH15 各自累计成交量。档位是死的，哪档站得多是活的，柱身高低就是投票结果。它还在算资金愿意在哪一格多待——像装修队按楼层报价，同一栋楼，十楼和二楼不是一个价，成交量也这样，哪层柱子高，说明价格在这一格晃的时候，接的量最大。

SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10+L11+L12+L13+L14+L15);

SS 把十五档的累计量合到一处，再算每档占了多少份。占比大的档位，STICKLINE 优先立柱子，柱高按 N 的 95 收口，顶格数字不贴边。早年我照搬过一个等比格指标，K线区间一除零直接出横线，后来才明白收口和占比的顺序错不得，反了全盘皆输。

这指标什么时候会骗你？横盘窄幅的时候，HI 和 LO 靠得近，格距也小，十五层全堆在巴掌大的区间里，分层意义淡了。那种时候别数层，看柱子的相对高低更实在。说真的，对数格这一层我信得过，比等分格靠谱。