通达信“倍量擒龙”主图指标公式--短线强势

admin

更多指标：http://www.macd888.com(macd888股票论坛）
一、公式解析

这个指标是专抓短线强势股的 “量能探测器”，核心聚焦二倍量、三倍量异动信号，搭配自动绘制的压力支撑线，黄色实线是前期高位压力线，紫色实线是前期低位支撑线，核心信号辨识：
二倍量信号：出现时 K 线变成紫粉色，下方标有 “←二倍量” 文字，代表连续两天量能放大 1.91 倍以上，说明资金在持续进场；
三倍量信号：K 线变为亮黄色，标注 “←三倍量”，要求当天量能是前一日 3 倍以上，非涨停等过滤条件，是短线强势拉升的前奏。

二、公式如下

CAT1:=EMA(C,IF(PERIOD=7,7,IF(PERIOD=6,14,30)));
CAT2:=EMA(CLOSE,IF(PERIOD=7,8,IF(PERIOD=6,16,35)));
CAT3:=EMA(C,IF(PERIOD=7,9,IF(PERIOD=6,18,40)));
CAT4:=EMA(CLOSE,IF(PERIOD=7,10,IF(PERIOD=6,20,45)));
CAT5:=EMA(C,IF(PERIOD=7,11,IF(PERIOD=6,22,50)));
CAT6:=EMA(CLOSE,IF(PERIOD=7,12,IF(PERIOD=6,24,55)));
CAT7:=IF(1<1,0,IF(CAPITAL>0 AND C<500,0,1));
CAT8:=FILTER(REF(HIGH,5)=HHV(H,2*5+1),5);
CAT9:=REF(MAX(C,O),5)=HHV(MAX(C,O),2*5+1);
CAT10:=FILTER(BACKSET(FILTER(CAT9,5),5+1),5);
CAT11:=REF(MAX(CLOSE,OPEN),BARSLAST(CAT10));
CAT12:=BACKSET(FILTER(REF(LOW,5)=LLV(LOW,2*5+1),5),5+1);
CAT13:=REF(LOW,BARSLAST(FILTER(CAT12,5)));
CAT14:=REF(MIN(CLOSE,OPEN),5)=LLV(MIN(CLOSE,OPEN),2*5+1);
CAT15:=FILTER(BACKSET(FILTER(CAT14,5),5+1),5);
CAT16:=REF(MIN(CLOSE,OPEN),BARSLAST(CAT15));
CAT17:=IF(0,REF(HIGH,BARSLAST(FILTER(BACKSET(CAT8,5+1),5))),CAT11);
CAT18:=IF(0,CAT13,CAT16);
CAT19:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
CAT20:=C>REF(C,1) AND C<REF(C,1)*1.095;
二倍量:REF(CAT19=1,1) AND CAT19=1,COLORMAGENTA,NODRAW;
三倍量:V>=REF(V,1)*3 AND C<10 AND CAT20 AND CLOSE<>H AND C>OPEN,NODRAW;
STICKLINE(二倍量,O,C,3,0),COLORMAGENTA;
STICKLINE(三倍量,O,C,3,0),COLORYELLOW;
STICKLINE(CAT17=REF(CAT17,1) OR REF(CAT17,1)=REF(CAT17,2),CAT17,CAT17,4,0),COLORYELLOW;
STICKLINE(CAT18=REF(CAT18,1) OR REF(CAT18,1)=REF(CAT18,2),CAT18,CAT18,4,0),COLORCC00CC;
DRAWTEXT(二倍量,L,'←二倍量'),COLORMAGENTA;
DRAWTEXT(三倍量,L,'←三倍量'),COLORYELLOW;
三、选股公式
CAT1:=EMA(C,IF(PERIOD=7,7,IF(PERIOD=6,14,30)));
CAT2:=EMA(CLOSE,IF(PERIOD=7,8,IF(PERIOD=6,16,35)));
CAT3:=EMA(C,IF(PERIOD=7,9,IF(PERIOD=6,18,40)));
CAT4:=EMA(CLOSE,IF(PERIOD=7,10,IF(PERIOD=6,20,45)));
CAT5:=EMA(C,IF(PERIOD=7,11,IF(PERIOD=6,22,50)));
CAT6:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
CAT7:=C>REF(C,1) AND C<REF(C,1)*1.095;
三倍量:VOL>=REF(VOL,1)*3 AND C<10 AND CAT7 AND CLOSE<>H AND C>OPEN;