【吸筹雷达分时主图分时主图】指标 源码

通达信主图指标吸筹雷达，主要以柱体强弱标识资金进出，辅以在关键位置打点提醒，源码 117 行，实盘前建议先在历史区间比对。

指标类型 主图指标 适用软件 通达信
适用周期 日线 / 60分钟 未来函数 无未来函数
加密状态 源码未加密，可修改 源码行数 117
公式套数 1 套 包含 吸筹雷达分时主图(117行)
一、指标效果截图

二、公式源码
以下源码未加密，复制 → 打开通达信 → Ctrl+F 调出公式管理器 → 新建 → 粘贴 → 测试公式 → 保存即可调用。多套公式请分别新建，名称不要重名。

1. 吸筹雷达分时主图（主图 · 117 行）

现价:=C,COLORWHITE,LINETHICK2;
均价11:=SUM(C*V,240)/SUM(V,240),COLORRED,LINETHICK2;
TT:=BARSCOUNT(C);
前高:=REF(HHV(H,TT),1);
突破:=CROSS(C,REF(HHV(H,TT),1)) AND C/均价11< 1.09 AND TT>1 AND TT< 240;
主力扫盘:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,TT),1));
TOP_2:=DYNAINFO(4)>0 AND HHV(HIGH,2)/LLV(LOW,2)< 1.25 AND REF(CLOSE,1)< LLV(LOW,3)+(HHV(HIGH,3)-LLV(LOW,3))*0.85;
TOP_9:=EMA(CLOSE,2);
TOP_10:=EMA(CLOSE,3);
TOP_11:=MAX(TOP_9,TOP_10);
X2:=CLOSE>TOP_11 AND TOP_2 AND (CLOSE>REF(HHV(HIGH,2),1) AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.015) AND (V/CAPITAL<=0.2) AND C/REF(C,1)< 1.07;
NX:=MA(((SLOPE(C,20)*5)+C),10);
B1:=HOUR=09 AND MINUTE=45;
B20:=LLV(L,15);
B30:=BARSLAST(B1);
B4:=REF(B20,B30);
B5:=CONST(B4),COLORFF80FF,CIRCLEDOT,LINETHICK2;
C1:=HOUR=09 AND MINUTE=45;
C2:=HHV(H,15);
C3:=BARSLAST(C1);
C4:=REF(C2,C3);
C5:=CONST(C4),COLORFF80FF,CIRCLEDOT,LINETHICK2;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD10:=(DIF-DEA)*2;
AA0:=MACD10>00 AND DIF>0 AND DEA>0;
A100:=HOUR=10 AND MINUTE=0;
A20:=HHV(H,30);
A30:=BARSLAST(A100);
A40:=REF(A20,A30);
A50:=CONST(A40);
A80:=CLOSE>A50 AND REF(C<=A50,1) AND CLOSE>NX;
AB:=FILTER(A80,100);
A90:=DYNAINFO(3);
AC:=CLOSE<=A90*1.04 AND CLOSE>A90;
量比:=V/REF(MA(V,5),1);
XG:=AA0 AND AB AND AC AND A40>A90 AND 量比>=1;
TOP_4:=CLOSE;
TOP_5:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5);
BAB1:=STICKLINE(TOP_5>0,DYNAINFO(3),DYNAINFO(3)*(1+TOP_5),0.1,0);
BAB2:=STICKLINE(TOP_5< 0,DYNAINFO(3),DYNAINFO(3)*(1+TOP_5),0.1,0);
TOP_6:=CLOSE/DYNAINFO(3);
TOP_7:=FILTER(TOP_5>0.015 AND TOP_5>REF(TOP_5,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR TOP_5>0.025,240);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:=L1+P1*8/9,COLORLIRED,DOTLINE;
支撑:=L1+P1*0.5/9,COLORGREEN,DOTLINE;
DRAWTEXT(FILTER(CROSS(C,支撑),240),L-0.01,'吸筹'),COLOR0000FF;
DRAWTEXT(FILTER(CROSS(C,阻力),240),H-0.01,'卖'),COLORGREEN;
WA1:=V*C/100;
WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);
WA3:=SUM((IF(((WA1/8>20) AND (CLOSE< (REF(CLOSE,1)))),WA1,0)),0);
WA4:=SUM((IF(((WA1/8< 20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);
WA5:=SUM((IF(((WA1/8< 20) AND (CLOSE< (REF(CLOSE,1)))),WA1,0)),0);
机构买盘:=(WA2);
机构卖盘:=(WA3);
散户买盘:=(WA4);
散户卖盘:=(WA5);
BU:=BARSLAST(CLOSE=HHV(CLOSE,60));
SE:=BARSLAST(CLOSE=LLV(CLOSE,60));
KK1:=SE;
KK2:=BU;
LM1:=SE;
LM2:=BU;
OK:=KK1>KK2 AND LM1>LM2;
OK1:=KK1>KK2 AND LM1< LM2;
NOK:=KK2>KK1 AND LM2>LM1;
NOK1:=KK2>KK1 AND LM2< LM1;
DRAWICON(FILTER(CROSS(KK1,KK2),240),OPEN*1,5);
DRAWTEXT(FILTER(CROSS(KK1,KK2),240) ,OPEN*0.985,'抓板'),COLORYELLOW;
TT1:=BARSCOUNT(C);
均价黄:=SUM(C*V,TT1)/SUM(V,TT1);
量两步:=MA(V,5)>REF(MA(V,5),1) AND REF(MA(V,5),1)>REF(MA(V,5),2);
价两步:= C>=REF(C,1) AND REF(C,1)>REF(C,2);
价上岗量破5:=C>均价黄 AND V>MA(V,5);
量起爆:=V>=REF(V,1)*1;
价创新高:=C>=HHV(C,0);
量创新高:=V>=HHV(V,0);
对昨日涨幅:=(C/DYNAINFO(3)-1)*100<=4.50;
VV:=BARSSINCE(每日一点)+1;
首次起爆价:=REF(C,VV-1),NODRAW;
流通盘:=CAPITAL*100/100000000,NODRAW;
起爆时间:=REF(TIME/10000,VV),NODRAW;
已爆分钟:=VV-1,NODRAW;
DRAWICON(每日一点,C,25);
DRAWTEXT(每日一点,L-0.01,'←起爆'),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.8,0.45,0,'起爆收益'),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.85,0.5,0,'%'),COLOR0000FF;
ACX:=FILTER(CROSS(KK1,KK2),240);
ACX1:=BARSSINCE(ACX)+1;
首次抓板价:=REF(C,ACX1-1),NODRAW;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.8,0.3,0,'抓板收益'),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.85,0.35,0,'%'),COLOR0000FF;
DRAWTEXT(全仓买进 ,前高, '←全仓'),COLORCYAN;
DRAWICON(全仓买进,C,23);
对昨日涨幅1:=(C/DYNAINFO(3)-1)*100<=7;
价2步:=C/REF(C,3)>1.04 ;
DRAWTEXT(价2步,C*0.995,'←突'),COLORYELLOW;
现:=100*(C-REF(C,1))/REF(C,1);
量:=SUM(V,FROMOPEN);
大买:=SUM(IF(现>=0 AND V>CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
大卖:=SUM(IF(现< 0 AND V>CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
小买:=SUM(IF(现>=0 AND V< CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
小卖:=SUM(IF(现< 0 AND V< CAPITAL*0.0005 AND PERIOD=0,V,0),FROMOPEN);
B31:=100*大买/量;
B32:=100*大卖/量;
B33:=100*小买/量;
B34:=100*小卖/量;
DRAWRECTREL(133,CONST(100-B31)*1000/100,159,1000,RGB(255,0,0));
DRAWRECTREL(269,CONST(100-B32)*1000/100,294,1000,RGB(0,255,0));
DRAWRECTREL(405,CONST(100-B33)*1000/100,426,1000,RGB(128,0,0));
DRAWRECTREL(536,CONST(100-B34)*1000/100,557,1000,RGB(0,128,0));
DRAWTEXT_FIX(PERIOD=0,0.135,8,0,CON2STR(B31,0)) COLORFFFFFF;
DRAWTEXT_FIX(PERIOD=0,0.270,8,0,CON2STR(B32,0)) COLORFF0000;
DRAWTEXT_FIX(PERIOD=0,0.403,8,0,CON2STR(B33,0)) COLORFFFFFF;
DRAWTEXT_FIX(PERIOD=0,0.539,8,0,CON2STR(B34,0)) COLORFF0000;

三、安装与调用
通达信客户端按 Ctrl + F 打开「公式管理器」。
选中对应分组（技术指标公式 → 其他类型 / 条件选股公式），点「新建」。
公式名称填英文或拼音（不含空格、不超过 10 个字符），把源码粘进编辑区。
点「测试公式」，提示编译通过后「确定」保存。
K 线图界面输入公式名称调出；选股公式在「条件选股」里执行。
四、使用提醒
指标本质是把价格与成交量做数学加工，用来辅助判断趋势和买卖时机，不能预测未来。任何公式都有失效区间，请结合大盘环境、板块节奏与仓位管理使用。本文源码仅供学习研究，不构成投资建议。