通达信〖强阳反包〗短期获利盘向上穿越筹码密集比值源码
核心逻辑
1. 趋势动力：用高低收加权价做13/34周期EMA差值，再5周期平滑过滤杂波，只保留多头正向强度，强度大于20认定为强势上行趋势；搭配位置震荡指标修正，保证价格处于相对高位多头区间，剔除弱势横盘。
2. 均线趋势：附加EXPMA10站稳EXPMA60，保证中期大趋势向上，杜绝逆势抄底。
3. 筹码博弈：PWINNER(30)：短期30周期获利筹码占比、计算±7.5%窄区间筹码密集度，对比历史高位获利盘比值、当短期获利盘向上穿越筹码密集比值，说明场内筹码开始解套抬升、抛压变小，资金主动抬价拉升。
入场时机同时满足三点：
1）当日是趋势强势、10EXPMA上穿60EXPMA的第一天启动；
2）短期获利盘上穿筹码密集比值（筹码资金共振金叉）；
3）K线被青色实心柱标记，图下方出现34图标+“强阳反包”文字提示。
→ 开盘/盘中回踩分时低吸，仓位可重仓。
{主图源码如下}
VARG1:=(VOL/C)/2; {计算单笔成交量：成交量/收盘价/2}
VARG2:=SUM(IF(VARG1>100 AND CLOSE>REF(CLOSE,1),VARG1,0),0); {统计大单主动买入：收盘价上涨且单笔量>100}
VARG3:=SUM(IF(VARG1>100 AND CLOSE< REF(CLOSE,1),VARG1,0),0); {统计大单主动卖出：收盘价下跌且单笔量>100}
VARG4:=SUM(IF(VARG1< 100 AND CLOSE>REF(CLOSE,1),VARG1,0),0); {统计小单主动买入：收盘价上涨且单笔量<100}
VARG5:=SUM(IF(VARG1< 100 AND CLOSE< REF(CLOSE,1),VARG1,0),0); {统计小单主动卖出：收盘价下跌且单笔量<100}
VARG6:=VARG2+VARG3+VARG4+VARG5; {计算总成交量合计}
机买:=(VARG2/VARG6)*100-100; {计算机构买入占比}
机卖:=(VARG3/VARG6)*100-100; {计算机构卖出占比}
VARG7:=(C*2+H+L)/4*10; {计算加权均价并放大10倍}
VARG8:=EMA(VARG7,13)-EMA(VARG7,34); {计算13日与34日指数平均差值}
VARG9:=EMA(VARG8,5); {对差值做5日指数平均}
VARG10:=2*(VARG8-VARG9)*5.5; {计算趋势强度值}
VARG11:=IF(VARG10>=0,VARG10 * 3,0); {多头趋势强度：只取正值并放大}
VARG12:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,21)-LLV(LOW,34))*100; {计算34日相对位置指标}
VARG13:=(EMA(VARG12,3)-50)*2; {对相对位置做平滑处理}
VARG14:=IF(DATE<=1150530,1,0); {日期限制：2011年5月30日前有效}
VARG15:=BETWEEN((C*VARG14)/(SUM(AMOUNT,BARSCOUNT((C*VARG14)))/SUM(VOL*100,BARSCOUNT((C*VARG14)))),1.05,0.95); {判断当前价与均价偏离度}
VARG16:=IF(VARG15=0,MA((C*VARG14),BARSCOUNT((C*VARG14))),(SUM(AMOUNT,BARSCOUNT((C*VARG14)))/SUM(VOL*100,BARSCOUNT((C*VARG14))))); {计算有效均价}
VARG17:=BARSLASTCOUNT(VARG11>20 AND VARG13>0)=1; {首次满足强势多头条件}
VARG18:=BARSLASTCOUNT(VARG11>20 AND VARG13>0 AND (EXPMA(C,10)>EXPMA(C,60)))=1; {首次满足强势多头+均线多头排列}
VARG19:=PWINNER(30,C)*100; {30周期获利盘比例}
VARG20:=(WINNER(CLOSE*1.075)-WINNER(CLOSE*0.925))*100; {7.5%涨跌幅区间筹码集中度}
VARG21:=VARG20/WINNER(HHV(HIGH,0)); {集中度与历史最高价获利盘比值}
VARG22:=CROSS(VARG19,VARG21); {获利盘比例上穿集中度比值，形成买点信号}
反包:EMA(EMA(C,5),5),COLORRED,LINETHICK2; {双重5日指数均线，红色粗线}
IF(REF(反包,1)>反包,反包,DRAWNULL),COLORFF0000,LINETHICK2; {均线走弱时变深红色}
STICKLINE(VARG18,O,C,2,0),COLORMAGENTA; {满足VARG18条件，K线画洋红色实心}
STICKLINE(VARG11>20 AND VARG13>0,O,C,2.0,0),COLOR0000FF; {强势多头，K线画红色实心}
STICKLINE(VARG17,O,C,2,0),COLORRED; {首次强势信号，画红色实心K线}
STICKLINE(VARG22 AND VARG17,O,C,2,0),COLOR00FFFF; {共振买点，画青色实心K线}
DRAWICON(VARG22 AND VARG17,L*1.002,29); {共振买点，在最低价上方画图标29}
DRAWICON(VARG22 AND VARG18,L*0.96,34); {强阳反包信号，画图标34}
DRAWTEXT(VARG22 AND VARG18,L*0.96,' 强阳反包'),COLOR00FFFF; {标注文字“强阳反包”，青色};
{副图源码如下}
XG1:=(C*2+H+L)/4*10; {加权均价放大10倍}
XG2:=EMA(XG1,13)-EMA(XG1,34); {13日与34日指数平均差值}
XG3:=EMA(XG2,5); {5日指数平滑}
XG4:=2*(XG2-XG3)*5.5; {趋势强度计算}
XG5:=IF(XG4>=0,XG4 * 3,0); {多头趋势强度}
XG6:=(CLOSE-LLV(LOW,34))/(HHV(H,21)-LLV(L,34))*100; {34日相对位置}
XG7:=(EMA(XG6,3)-50)*2; {相对位置平滑}
XG8:=IF(DATE<=1150530,1,0); {日期限制}
XG9:=BETWEEN((C*XG8)/(SUM(AMOUNT,BARSCOUNT((C*XG8)))/SUM(VOL*100,BARSCOUNT((C*XG8)))),1.05,0.95); {价格偏离度判断}
XG10:=IF(XG9=0,MA((C*XG8),BARSCOUNT((C*XG8))),(SUM(AMOUNT,BARSCOUNT((C*XG8)))/SUM(VOL*100,BARSCOUNT((C*XG8))))); {有效均价}
XG11:=BARSLASTCOUNT(XG5>20 AND XG7>0)=1; {首次强势多头}
XG12:=BARSLASTCOUNT(XG5>20 AND XG7>0 AND (EXPMA(C,10)>EXPMA(C,60)))=1; {首次强势多头+均线多头}
XG13:=PWINNER(30,C)*100; {30周期获利盘}
XG14:=(WINNER(CLOSE*1.075)-WINNER(CLOSE*0.925))*100; {7.5%区间筹码集中度}
XG15:=XG14/WINNER(HHV(HIGH,0)); {集中度比值}
XG16:=CROSS(XG13,XG15); {获利盘上穿信号}
强阳反包X:XG16 AND XG12; {最终副图信号：共振+均线多头};
未来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:PWINNER
定制指标公式、软件请联系QQ或微信同号：88652583
VARG1赋值:(成交量(手)/收盘价)/2
VARG2赋值:如果VARG1>100ANDCLOSE>1日前的收盘价,返回VARG1,否则返回0的历史累和
VARG3赋值:如果VARG1>100ANDCLOSE<1日前的收盘价,返回VARG1,否则返回0的历史累和
VARG4赋值:如果VARG1<100ANDCLOSE>1日前的收盘价,返回VARG1,否则返回0的历史累和
VARG5赋值:如果VARG1<100ANDCLOSE<1日前的收盘价,返回VARG1,否则返回0的历史累和
VARG6赋值:VARG2+VARG3+VARG4+VARG5
机买赋值:(VARG2/VARG6)*100-100
机卖赋值:(VARG3/VARG6)*100-100
VARG7赋值:(收盘价*2+最高价+最低价)/4*10
VARG8赋值:VARG7的13日指数移动平均-VARG7的34日指数移动平均
VARG9赋值:VARG8的5日指数移动平均
VARG10赋值:2*(VARG8-VARG9)*5.5
VARG11赋值:如果VARG10>=0,返回VARG10*3,否则返回0
VARG12赋值:(收盘价-34日内最低价的最低值)/(21日内最高价的最高值-34日内最低价的最低值)*100
VARG13赋值:(VARG12的3日指数移动平均-50)*2
VARG14赋值:如果日期<=1150530,返回1,否则返回0
VARG15赋值:(收盘价*VARG14)/(成交额(元)的(收盘价*VARG14)的有效数据周期数日累和/成交量(手)*100的(收盘价*VARG14)的有效数据周期数日累和)位于1.05和0.95之间
VARG16赋值:如果VARG15=0,返回(收盘价*VARG14)的(收盘价*VARG14)的有效数据周期数日简单移动平均,否则返回(成交额(元)的(收盘价*VARG14)的有效数据周期数日累和/成交量(手)*100的(收盘价*VARG14)的有效数据周期数日累和)
VARG17赋值:条件连续成立次数=1
VARG18赋值:条件连续成立次数=1
VARG19赋值:30日前那部分成本以收盘价价格卖出的获利盘比例*100
VARG20赋值:(以收盘价*1.075计算的获利盘比例-以收盘价*0.925计算的获利盘比例)*100
VARG21赋值:VARG20/以0日内最高价的最高值计算的获利盘比例
VARG22赋值:VARG19上穿VARG21
输出 反包:收盘价的5日指数移动平均的5日指数移动平均,画红色,线宽为2
如果1日前的反包>反包,返回反包,否则返回无效数,COLORFF0000,线宽为2
当满足条件VARG18时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画洋红色
当满足条件VARG11>20ANDVARG13>0时,在开盘价和收盘价位置之间画柱状线,宽度为2.0,0不为0则画空心柱.,COLOR0000FF
当满足条件VARG17时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色
当满足条件VARG22ANDVARG17时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00FFFF
当满足条件VARG22ANDVARG17时,在最低价*1.002位置画29号图标
当满足条件VARG22ANDVARG18时,在最低价*0.96位置画34号图标
当满足条件VARG22ANDVARG18时,在最低价*0.96位置书写文字,COLOR00FFFF
XG1赋值:(收盘价*2+最高价+最低价)/4*10
XG2赋值:XG1的13日指数移动平均-XG1的34日指数移动平均
XG3赋值:XG2的5日指数移动平均
XG4赋值:2*(XG2-XG3)*5.5
XG5赋值:如果XG4>=0,返回XG4*3,否则返回0
XG6赋值:(收盘价-34日内最低价的最低值)/(21日内最高价的最高值-34日内最低价的最低值)*100
XG7赋值:(XG6的3日指数移动平均-50)*2
XG8赋值:如果日期<=1150530,返回1,否则返回0
XG9赋值:(收盘价*XG8)/(成交额(元)的(收盘价*XG8)的有效数据周期数日累和/成交量(手)*100的(收盘价*XG8)的有效数据周期数日累和)位于1.05和0.95之间
XG10赋值:如果XG9=0,返回(收盘价*XG8)的(收盘价*XG8)的有效数据周期数日简单移动平均,否则返回(成交额(元)的(收盘价*XG8)的有效数据周期数日累和/成交量(手)*100的(收盘价*XG8)的有效数据周期数日累和)
XG11赋值:条件连续成立次数=1
XG12赋值:条件连续成立次数=1
XG13赋值:30日前那部分成本以收盘价价格卖出的获利盘比例*100
XG14赋值:(以收盘价*1.075计算的获利盘比例-以收盘价*0.925计算的获利盘比例)*100
XG15赋值:XG14/以0日内最高价的最高值计算的获利盘比例
XG16赋值:XG13上穿XG15
输出 强阳反包X:XG16 AND XG12
