通达信〖波浪高低点箱体共振〗自动锁定近期阶段高低点并绘制上方压力线源码
本指标以压力、支撑和突破动作为核心，用于辅助判断买卖时机：系统会自动锁定近期阶段高低点，并据此绘制上方压力线、下方支撑线以及箱体上沿，再围绕突破后的价格表现给出交易提示。
当价格放量向上突破压力线时，会提示“突破颈线”；突破后若缩量回踩支撑且支撑有效，则提示“回踩支撑”；回踩完成后若再次放量走高，则提示“放量确认”。此外，当价格同时站稳多条关键线时，会提示“箱体共振”；一旦跌破支撑，则发出风险预警。
实战应对上，“突破颈线”并伴随成交量明显放大，通常意味着多头开始发力，可重点观察；突破后出现“回踩支撑”且未跌破，是较理想的低吸机会；随后若再出现“放量确认”或“箱体共振”，说明上行趋势得到验证，可继续持有或择机加仓；若出现“跌破支撑”，则表明走势转弱，应及时止损或降低仓位。
GD:=FILTER(BACKSET(FILTER(REF(H,10)=HHV(H,21),10),11),10);
DD:=FILTER(BACKSET(FILTER(REF(H,10)=LLV(H,21),10),11),10);
A:=REF(H,BARSLAST(GD));
B:=REF(H,BARSLAST(DD));
T1:=BARSLAST(GD);
T2:=T1>BARSLAST(DD) AND NOT(DD);
BLD:IF(T1,A,A),COLORGREEN,POINTDOT,LINETHICK1;
DRAWNUMBER(BLD!=REF(BLD,1),H,BLD),COLORF00FF0;
STICKLINE(T1,A,A,9,0),COLORF00FF0,LINETHICK1;
BLB:IF(T2,B,B),COLORGREEN,POINTDOT,LINETHICK1;
STICKLINE(T2,B,B,9,0),COLORCYAN,LINETHICK1;
ZC1D:=FILTER(BACKSET(FILTER(REF(C,6)=LLV(C,13),6),7),6) AND C=LLV(C,7);
ZC1J:=BARSLAST(ZC1D);
ZC1B:=IF(ZC1D,CURRBARSCOUNT,0);
ZC1Y:=IF(ZC1J,REF(ZC1B,ZC1J),ZC1B);
ZC1W:=CONST(ZC1Y);
ZC1:DRAWLINE(CURRBARSCOUNT=ZC1W,C,CURRBARSCOUNT=1,REF(C,ZC1W-1),1),COLOR00FF00,LINETHICK1;
DRAWNUMBER(ZC1!=REF(ZC1,1),C,ZC1),COLOR00FF00;
DRAWNUMBER(CURRBARSCOUNT=1,ZC1,ZC1),COLOR00FF00;
ZC2D:=FILTER(BACKSET(FILTER(REF(C,3)=LLV(C,7),3),4),3) AND C=LLV(C,4);
ZC2J:=BARSLAST(ZC2D);
ZC2B:=IF(ZC2D,CURRBARSCOUNT,0);
ZC2Y:=IF(ZC2J,REF(ZC2B,ZC2J),ZC2B);
ZC2W:=CONST(ZC2Y);
ZC2:DRAWLINE(CURRBARSCOUNT=ZC2W,C,CURRBARSCOUNT=1,REF(C,ZC2W-1),1),COLOR00FF00,LINETHICK1;
JX2D:=FILTER(BACKSET(FILTER(REF(C,6)=HHV(C,13),6),7),6) AND C=HHV(C,7);
JX2J:=BARSLAST(JX2D);
JX2B:=IF(JX2D,CURRBARSCOUNT,0);
JX2Y:=IF(JX2J,REF(JX2B,JX2J),JX2B);
JX2W:=CONST(JX2Y);
JX2:DRAWLINE(CURRBARSCOUNT=JX2W,C,CURRBARSCOUNT=1,REF(C,JX2W-1),1),COLORFFDD00,LINETHICK1;
DRAWNUMBER(JX2!=REF(JX2,1),C,JX2),COLOR00FF00;
T1B:=CONST(LLVBARS(L,10));
T1G:=CONST(REF(H,T1B));
CCC:=CONST(CURRBARSCOUNT);
T2B:=CONST(BARSLAST(CURRBARSCOUNT>CCC+T1B AND H>T1G));
T2G:=CONST(REF(H,T2B));
T3B:=CONST(BARSLAST(CURRBARSCOUNT>CCC+T2B AND H>T2G));
T3G:=CONST(REF(H,T3B));
QQ10:DRAWLINE(CURRBARSCOUNT=T3B+1,T3G,CURRBARSCOUNT=1,T3G,1),COLORYELLOW,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT=1,T3G,'过线'),COLORYELLOW;
DRAWNUMBER(QQ10!=REF(QQ10,1),H,QQ10),COLORYELLOW;
STICKLINE(C>ZC1,ZC1,BLD,15,1),COLOR005599,LINETHICK2;
STICKLINE(C>ZC2,ZC2,BLD,5,1),COLOR005599,LINETHICK2;
STICKLINE(C>ZC1,ZC1,(BLD+ZC1)/2,15,1),COLOR005599,LINETHICK2;
STICKLINE(C>ZC1,ZC1,JX2,5,1),COLORFFAA33;
STICKLINE(C>ZC1,ZC1,(JX2+ZC1)/2,5,1),COLORFFAA33;
STICKLINE(C>ZC1,(QQ10+ZC1)/2,(QQ10+ZC1)/2,5,1),COLORYELLOW;
MA5:MA(C,5);
MA13:MA(C,13);
FL:=V>MA(V,20)*1.5;
TPJX:=CROSS(C,JX2) AND FL;
DRAWTEXT(TPJX AND COUNT(TPJX,15)=1,H*1.02,'★突破颈线'),COLORRED;
HCZC:=L<=ZC1*1.01 AND C>ZC1 AND C>O AND JX2>ZC1;
DRAWTEXT(HCZC AND COUNT(HCZC,15)=1,L*0.98,'★回踩支撑'),COLOR00FF00;
FLQR:=C>JX2 AND C>O AND FL AND BARSLAST(TPJX)<=5 AND BARSLAST(TPJX)>0;
DRAWTEXT(FLQR AND COUNT(FLQR,15)=1,H*1.02,'★放量确认'),COLORYELLOW;
DPZC:=CROSS(ZC1,C) AND BARSLAST(TPJX)>0;
DRAWTEXT(DPZC AND COUNT(DPZC,10)=1,H*1.02,'跌破支撑'),COLORGREEN;
XTGZ:=C>JX2 AND C>QQ10 AND JX2>ZC1 AND FL;
DRAWTEXT(XTGZ AND COUNT(XTGZ,20)=1,H*1.02,'★箱体共振'),COLORMAGENTA;
DRAWKLINE(H,O,L,C);
未来函数检测结果
GD赋值:若10日前的最高价=21日内最高价的最高值的10日过滤则将最近11周期置为1的10日过滤
DD赋值:若10日前的最高价=21日内最高价的最低值的10日过滤则将最近11周期置为1的10日过滤
A赋值:上次GD距今天数日前的最高价
B赋值:上次DD距今天数日前的最高价
T1赋值:上次GD距今天数
T2赋值:T1>上次DD距今天数 AND 取反
输出BLD:如果T1,返回A,否则返回A,画绿色,POINTDOT,线宽为1
当满足条件BLD不等于1日前的BLD时,在最高价位置书写数字,COLORF00FF0
当满足条件T1时,在A和A位置之间画柱状线,宽度为9,0不为0则画空心柱.,COLORF00FF0,线宽为1
输出BLB:如果T2,返回B,否则返回B,画绿色,POINTDOT,线宽为1
当满足条件T2时,在B和B位置之间画柱状线,宽度为9,0不为0则画空心柱.,画青色,线宽为1
ZC1D赋值:若6日前的收盘价=13日内收盘价的最低值的6日过滤则将最近7周期置为1的6日过滤 AND 收盘价=7日内收盘价的最低值
ZC1J赋值:上次ZC1D距今天数
ZC1B赋值:如果ZC1D,返回到最后交易的周期,否则返回0
ZC1Y赋值:如果ZC1J,返回ZC1J日前的ZC1B,否则返回ZC1B
ZC1W赋值:ZC1Y的最后一日取值设为常数
输出ZC1:当满足条件到最后交易的周期=ZC1W时,在收盘价位置画直线起点，当满足条件到最后交易的周期=1时,在ZC1W-1日前的收盘价位置画直线终点,1表示是否延长.,COLOR00FF00,线宽为1
当满足条件ZC1不等于1日前的ZC1时,在收盘价位置书写数字,COLOR00FF00
当满足条件到最后交易的周期=1时,在ZC1位置书写数字,COLOR00FF00
ZC2D赋值:若3日前的收盘价=7日内收盘价的最低值的3日过滤则将最近4周期置为1的3日过滤 AND 收盘价=4日内收盘价的最低值
ZC2J赋值:上次ZC2D距今天数
ZC2B赋值:如果ZC2D,返回到最后交易的周期,否则返回0
ZC2Y赋值:如果ZC2J,返回ZC2J日前的ZC2B,否则返回ZC2B
ZC2W赋值:ZC2Y的最后一日取值设为常数
输出ZC2:当满足条件到最后交易的周期=ZC2W时,在收盘价位置画直线起点，当满足条件到最后交易的周期=1时,在ZC2W-1日前的收盘价位置画直线终点,1表示是否延长.,COLOR00FF00,线宽为1
JX2D赋值:若6日前的收盘价=13日内收盘价的最高值的6日过滤则将最近7周期置为1的6日过滤 AND 收盘价=7日内收盘价的最高值
JX2J赋值:上次JX2D距今天数
JX2B赋值:如果JX2D,返回到最后交易的周期,否则返回0
JX2Y赋值:如果JX2J,返回JX2J日前的JX2B,否则返回JX2B
JX2W赋值:JX2Y的最后一日取值设为常数
输出JX2:当满足条件到最后交易的周期=JX2W时,在收盘价位置画直线起点，当满足条件到最后交易的周期=1时,在JX2W-1日前的收盘价位置画直线终点,1表示是否延长.,COLORFFDD00,线宽为1
当满足条件JX2不等于1日前的JX2时,在收盘价位置书写数字,COLOR00FF00
T1B赋值:10日内最低价距今天数的最后一日取值设为常数
T1G赋值:T1B日前的最高价的最后一日取值设为常数
CCC赋值:到最后交易的周期的最后一日取值设为常数
T2B赋值:上次到最后交易的周期>CCC+T1BANDH>T1G距今天数的最后一日取值设为常数
T2G赋值:T2B日前的最高价的最后一日取值设为常数
T3B赋值:上次到最后交易的周期>CCC+T2BANDH>T2G距今天数的最后一日取值设为常数
T3G赋值:T3B日前的最高价的最后一日取值设为常数
输出QQ10:当满足条件到最后交易的周期=T3B+1时,在T3G位置画直线起点，当满足条件到最后交易的周期=1时,在T3G位置画直线终点,1表示是否延长.,画黄色,线宽为1
当满足条件到最后交易的周期=1时,在T3G位置书写文字,画黄色
当满足条件QQ10不等于1日前的QQ10时,在最高价位置书写数字,画黄色
当满足条件收盘价>ZC1时,在ZC1和BLD位置之间画柱状线,宽度为15,1不为0则画空心柱.,COLOR005599,线宽为2
当满足条件收盘价>ZC2时,在ZC2和BLD位置之间画柱状线,宽度为5,1不为0则画空心柱.,COLOR005599,线宽为2
当满足条件收盘价>ZC1时,在ZC1和(BLD+ZC1)/2位置之间画柱状线,宽度为15,1不为0则画空心柱.,COLOR005599,线宽为2
当满足条件收盘价>ZC1时,在ZC1和JX2位置之间画柱状线,宽度为5,1不为0则画空心柱.,COLORFFAA33
当满足条件收盘价>ZC1时,在ZC1和(JX2+ZC1)/2位置之间画柱状线,宽度为5,1不为0则画空心柱.,COLORFFAA33
当满足条件收盘价>ZC1时,在(QQ10+ZC1)/2和(QQ10+ZC1)/2位置之间画柱状线,宽度为5,1不为0则画空心柱.,画黄色
输出MA5:收盘价的5日简单移动平均
输出MA13:收盘价的13日简单移动平均
FL赋值:成交量(手)>成交量(手)的20日简单移动平均*1.5
TPJX赋值:收盘价上穿JX2 AND FL
当满足条件TPJXANDCOUNT(TPJX,15)=1时,在最高价*1.02位置书写文字,画红色
HCZC赋值:最低价<=ZC1*1.01 AND 收盘价>ZC1 AND 收阳线AND JX2>ZC1
当满足条件HCZCANDCOUNT(HCZC,15)=1时,在最低价*0.98位置书写文字,COLOR00FF00
FLQR赋值:收盘价>JX2 AND 收阳线AND FL AND 上次TPJX距今天数<=5 AND 上次TPJX距今天数>0
当满足条件FLQRANDCOUNT(FLQR,15)=1时,在最高价*1.02位置书写文字,画黄色
DPZC赋值:ZC1上穿收盘价 AND 上次TPJX距今天数>0
当满足条件DPZCANDCOUNT(DPZC,10)=1时,在最高价*1.02位置书写文字,画绿色
XTGZ赋值:收盘价>JX2 AND 收盘价>QQ10 AND JX2>ZC1 AND FL
当满足条件XTGZANDCOUNT(XTGZ,20)=1时,在最高价*1.02位置书写文字,画洋红色
K线
