在研究数据和图表的过程中,好用的工具能让我们事半功倍。今天就给大家分享一套超实用的通达信指标公式源码,一共包含6个分时指标,涵盖分时指标、分时强弱、分时量能、分时MACD、分时成交量1、分时万手量能等多个方面,哪怕是对相关领域不太熟悉的朋友,也能轻松上手。其中,分时指标、分时成交量1、分时MACD、分时万手量能4个指标可用于手机

指标类型 分时指标 适用软件 通达信
适用周期 日线 / 60分钟 未来函数 含未来函数
加密状态 源码未加密,可修改 源码行数 450
公式套数 6 套 包含 分时万手单副图(8行) / 分时指标主图(198行) / 分时成交量副图(33行) / 分时强弱副图(37行) / MACD指标分时副图(71行) / 分时量能副图(103行)
一、指标效果截图

效果图 1
效果图 2
效果图 3
效果图 4
效果图 5
效果图 6

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

1. 分时万手单副图(副图 · 8 行)

现量:V,VOLSTICK,COLORGRAY;
达标:9900,COLORGRAY;
{ 买入达万手单条件:价格上涨且成交量达标 }
万手买量:=C>=REF(C,1) AND 现量>=达标;
STICKLINE(万手买量,0,V,1,0),COLOR0022CB;
{ 卖出达万手单条件:价格下跌且成交量达标 }
万手卖量:=C<REF(C,1) AND 现量>=达标;
STICKLINE(万手卖量,0,V,1,0),COLOR11AA11;
{ 统计240周期内买卖大单次数 }
万手买统计:COUNT(万手买量,240),NODRAW,COLOR00CCDF;
万手卖统计:COUNT(万手卖量,240),NODRAW,COLOR11AA22;

2. 分时指标主图(主图 · 198 行)

M:=8;
获利比例:=WINNER(C)*100,NODRAW;
基点:=获利比例>50 AND 获利比例<59,NODRAW;
选:IF(REF(基点,1)=1,C>REF(H,1),IF(REF(获利比例,1)<=50,C>REF(REF(H,BARSLAST(基点)),1),0))
AND BARSLAST(基点)<M AND REF(BARSLAST(基点),1)<M-1,NODRAW;
筹码参数:=TOTALCAPITAL*100/FINANCE(46) NODRAW;
筹码获利率:=WINNER(C)*100 NODRAW;
TTT:=DRAWSL(基点,H,0,IF(REFX(BARSNEXT(基点),1)=DRAWNULL,CURRBARSCOUNT,REFX(BARSNEXT(基点),1)+1),0)COLORBLUE,LINETHICK2;
A:=WINNER(C)*100;
B:=BETWEEN(A,50,59);
Q1:=BACKSET(BARSTATUS=2,BARSLAST(B)+1);
前期:=Q1>REF(Q1,1);
向右水平线:=REF(H,BARSLAST(前期))COLORBLUE,LINETHICK2;
E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
分时底:LLV(L,380),COLORGREEN,POINTDOT,NODRAW;
最新:C,COLORWHITE,NODRAW;
IF(C>=REF(TTT,1),C,DRAWNULL),LINETHICK2,COLORCYAN;
IF(C>=REF(向右水平线,1),C,DRAWNULL),LINETHICK2,COLORRED;
IF(C<=REF(分时底,1),C,DRAWNULL),LINETHICK2,COLORGREEN;
量价:=(VOL/CLOSE)/3;
A2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);
A3:=SUM((IF(((量价>0.20) AND (CLOSE< (REF(CLOSE,1)))),量价,0)),0);
A6:=A2+A3;
DD1:=1;
比:=A2/A3;
AA1:=STRCAT(STRCAT('买= ',CON2STR((100*A2)/A6,0)),'%');
AA2:=STRCAT(STRCAT('卖= ',CON2STR((100*A3)/A6,0)),'%');
AA3:=STRCAT(STRCAT('差= ',CON2STR((100*(A2-A3))/A6,0)),'%');
DRAWTEXT_FIX(DD1=1,0.8,0.87,0,AA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0.8,0.92,0,AA2),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0.8,0.99,0,AA3),COLOR00FFFF;
现价:=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));
HJ_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;
HJ_9:=EMA(CLOSE,2);
HJ_10:=EMA(CLOSE,3);
HJ_11:=MAX(HJ_9,HJ_10);
AND HJ_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;
HJ_4:=CLOSE;
HJ_5:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5);
BAB1:=STICKLINE(HJ_5>0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0);
BAB2:=STICKLINE(HJ_5<0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0);
HJ_6:=CLOSE/DYNAINFO(3);
HJ_7:=FILTER(HJ_5>0.015 AND HJ_5>REF(HJ_5,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR HJ_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,'压'),COLOR0000FF;
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.995,'抓'),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);
VV:=BARSSINCE(每日一点)+1;
起爆时间:=REF(TIME/10000,VV),NODRAW;
已爆分钟:=VV-1,NODRAW;
DRAWICON(每日一点,C,25);
DRAWTEXT(每日一点,L-0.01,'←分时起爆'),COLOR0000FF;
ACX:=FILTER(CROSS(KK1,KK2),240);
ACX1:=BARSSINCE(ACX)+1;
X1:=IF(MA(C,5)>MA(C,10),20,0);
X21:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X7:=IF(WINNER(C)>0.5,10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=X1+X21+X3+X4+X5+X6+X7+X8;
DRAWTEXT_FIX(V>O,0.90,0.99,0,STRCAT('量化评分:',STRCAT(CON2STR(XX,2),' '))),COLORYELLOW;
A11:=(VOL/CLOSE)/3;
A21:=SUM((IF(((A11>40) AND (CLOSE>(REF(CLOSE,1)))),A11,0)),0);
A31:=SUM((IF(((A11>40) AND (CLOSE<(REF(CLOSE,1)))),A11,0)),0);
A41:=SUM((IF(((A11<40) AND (CLOSE>(REF(CLOSE,1)))),A11,0)),0);
A51:=SUM((IF(((A11<40) AND (CLOSE<(REF(CLOSE,1)))),A11,0)),0);
A61:=((A21+A31)+A41)+A51;
W1:=V*C/100;
W22:=SUM((IF(((W1/8>20) AND (CLOSE>(REF(CLOSE,1)))),W1,0)),0);
W32:=SUM((IF(((W1/8>20) AND (CLOSE<(REF(CLOSE,1)))),W1,0)),0);
W42:=SUM((IF(((W1/8<20) AND (CLOSE>(REF(CLOSE,1)))),W1,0)),0);
W52:=SUM((IF(((W1/8<20) AND (CLOSE<(REF(CLOSE,1)))),W1,0)),0);
W6:=((A21+A31)+A41)+A51;
W7:=IF((ISLASTBAR),((100*W22)/W6),0);
W8:=IF((ISLASTBAR),((100*W32)/W6),0);
W9:=IF((ISLASTBAR),((100*W42)/W6),0);
W10:=IF((ISLASTBAR),((100*W52)/W6),0);
机构买盘1:=(W22);
机构卖盘1:=(W32);
散户买盘1:=(W42);
散户卖盘1:=(W52);
DRAWTEXT_FIX(1,0,0.9,0,STRCAT(STRCAT('【机买】',CON2STR(机构买盘1,2)),' 万')),COLORLIMAGENTA;
DRAWTEXT_FIX(1,0,0.99,0,STRCAT(STRCAT('【机卖】',CON2STR(机构卖盘1,2)),' 万')),COLORGREEN;
DRAWTEXT_FIX(1,0.10,0.9,0,STRCAT(STRCAT('【散买】',CON2STR(散户买盘,2)),' 万')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.10,0.99,0,STRCAT(STRCAT('【散卖】',CON2STR(散户卖盘,2)),' 万')),COLORCYAN;
HS:=100*DYNAINFO(8)/CAPITAL;
ZHWS:=STRCAT(VAR2STR(DYNAINFO(8)/10000,2),'万手');
JHS:=STRCAT('今换手:',STRCAT(VAR2STR(HS,2),'%'));
JHS1:=STRCAT(JHS,' ≈ ');
DRAWTEXT_FIX(1,0.20,0.99,0,STRCAT(JHS1,ZHWS))COLORYELLOW;
LTPDW:=IF((FINANCE(46))/1000000>1,'亿股','万股');
LTP:=IF((FINANCE(46))/1000000>1,CON2STR((FINANCE(46))/100000000,2),CON2STR((FINANCE(46))/10000,0));
LTP1:=STRCAT(STRCAT('自由流通盘:',LTP),LTPDW);
LTPWS:=STRCAT(VAR2STR(FINANCE(46)/1000000,2),'万手');
LTP2:=STRCAT(LTP1,' ≈ ');
DRAWTEXT_FIX(1,0.37,0.99,0,STRCAT(LTP2,LTPWS))COLORMAGENTA;
DRAWTEXT_FIX(1,0.37,0.92,0,STRCAT(STRCAT('自由流通市值:',CON2STR(FINANCE(46)*C/100000000,2)),'亿元'))COLORMAGENTA;
KP:=(DYNAINFO(4)-DYNAINFO(3))/DYNAINFO(3)*100;
DRAWTEXT_FIX(1,0.2,0.65,0,STRCAT('开盘:',STRCAT(VAR2STR(KP,2),'%')))COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.85,0,STRCAT('最高价:',CON2STR(DYNAINFO(5),2)))COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.90,0,STRCAT('最低价:',CON2STR(DYNAINFO(6),2)))COLORYELLOW;
今日竞价股数:=DYNAINFO(15)/DYNAINFO(4);
开盘换手Z:=DYNAINFO(15)/DYNAINFO(4)/FINANCE(46)*100;
DRAWTEXT_FIX(1,0.2,0.7,0,STRCAT(STRCAT('开盘换手Z:',CON2STR(开盘换手Z,2)),''))COLORYELLOW;
CJE:=DYNAINFO(8)*DYNAINFO(11);
DW:=IF(CJE/1000000>1,'亿','万');
ABT:=IF(CJE/1000000>1,CJE/1000000,CJE/100);
DRAWTEXT_FIX(1,0.2,0.75,0,STRCAT(STRCAT('成交额:',CON2STR(ABT,2)),DW))COLORYELLOW;
市盈率:=STRCAT('市盈率:',CON2STR(C/FINANCE(33),2));
DRAWTEXT_FIX(1,0.2,0.80,0,STRCAT(市盈率,'倍'))COLORYELLOW;
JJCJL:=DYNAINFO(15)/DYNAINFO(4)/100;
JJJEDW:=IF(DYNAINFO(15)>10000,'万元','元');
JJJE:=IF(DYNAINFO(15)>10000,CON2STR(DYNAINFO(15)/10000,1),CON2STR(DYNAINFO(15),1));
JJJE1:=STRCAT(JJJE,JJJEDW);
JJ:=STRCAT('竞价:',STRCAT(CON2STR(JJCJL,0),'手'));
JJ1:=STRCAT(JJ,' = ');
DRAWTEXT_FIX(1,0.2,0.55,0,STRCAT(JJ1,JJJE1))COLORMAGENTA;
SSJ:=BARSCOUNT(V);
今开量:DYNAINFO(15)/DYNAINFO(4)/100/10000,NODRAW;
昨大量:IF(SSJ>238,REF(HHV(V,239),SSJ-238),0)/10000,NODRAW;
DRAWTEXT_FIX(SSJ>239 AND BZ>0.6,0.25,0.1,0,STRCAT(STRCAT('【昨爆今开比】',CON2STR(BZ,2)),'')),COLORRED;
DRAWTEXT_FIX(SSJ>239 AND BZ<0.6,0.25,0.1,0,STRCAT(STRCAT('【昨爆今开比】',CON2STR(BZ,2)),'')),COLORYELLOW;
DRAWTEXT_FIX(SSJ>239 AND BETWEEN(BZ,0.5,2),0.2,0.2,0,'【开盘量价达标,择机介入】'),COLORYELLOW;
均价线:=DYNAINFO(11);
差值:=ABS(CLOSE-DYNAINFO(11));
DRAWTEXT_FIX(1,0.6,0.99,0,STRCAT(STRCAT('【乖离率小于3%】= ',CON2STR(偏离值,1)),'%')),COLORYELLOW;
竞价额:= DYNAINFO(15);
换手Z:= 竞价额/O/FINANCE(46)*100;
JJ3:=SUM(IF(BETWEEN(TIME,0930,0930),V,0),FROMOPEN);
DRAWTEXT(JJ3/(HHV(V,5),1)*100>=2 AND BETWEEN(TIME,0930,0930) AND 换手Z>=1,C,'爆'),COLORMAGENTA;

3. 分时成交量副图(副图 · 33 行)

{ 市值系统 }
超大市值:=(CAPITAL/1000000)*C>=200;
大市值:=(CAPITAL/1000000)*C>=50 AND (CAPITAL/1000000)*C<200;
中市值:=(CAPITAL/1000000)*C>=20 AND (CAPITAL/1000000)*C<50;
小市值:=(CAPITAL/1000000)*C>=5 AND (CAPITAL/1000000)*C<20;
可转债:=(CAPITAL/1000000)*C<10;
成交金额:=(AMOUNT/100000000)>5;
小成交金额:=(AMOUNT/100000000)>2;
AMOW:=AMOUNT/10000.0,VOLSTICK;
STICKLINE(C>REF(C,1) AND AMO>10000000 ,0,AMOW,0.8,0),COLOR8000FF;
STICKLINE(C>REF(C,1) AND AMO>20000000 ,0,AMOW,1.5,0),COLOR0000FF;
STICKLINE(C<REF(C,1),0,AMOW,0.1,0),COLOR80FF80;
STICKLINE(C<REF(C,1) AND AMOW<REF(V,1)*0.50 AND AMO<200000,0,AMOW,0.1,0),COLOR80FF80;
STICKLINE(C=REF(C,1),0,AMOW,0.5,0),COLORWHITE;
DRAWNUMBER(AMO>18000000 AND C>REF(C,1) AND 超大市值,AMOW*1.05,AMO*0.0001),COLOR00FFFF;
DRAWNUMBER(AMO>18000000 AND C<REF(C,1) AND 超大市值,AMOW*1.0,AMO*0.0001),COLOR00FF00;
DRAWNUMBER(AMO>18000000 AND C=REF(C,1) AND 超大市值,AMOW*1.01,AMO*0.0001),COLOR0080FF;
DRAWNUMBER(AMO>10000000 AND C>REF(C,1) AND 大市值,AMOW*1.05,AMO*0.0001),COLOR00FFFF;
DRAWNUMBER(AMO>10000000 AND C<REF(C,1) AND 大市值,AMOW*1.0,AMO*0.0001),COLOR00FF00;
DRAWNUMBER(AMO>10000000 AND C=REF(C,1) AND 大市值,AMOW*1.01,AMO*0.0001),COLOR0080FF;
DRAWNUMBER(AMO>10000000 AND C>REF(C,1) AND 中市值,AMOW*1.05,AMO*0.0001),COLOR00FFFF;
DRAWNUMBER(AMO>10000000 AND C<REF(C,1) AND 中市值,AMOW*1.0,AMO*0.0001),COLOR00FF00;
DRAWNUMBER(AMO>10000000 AND C=REF(C,1) AND 中市值,AMOW*1.01,AMO*0.0001),COLOR0080FF;
DRAWNUMBER(AMO>6000000 AND C>REF(C,1) AND 小市值,AMOW*1.05,AMO*0.0001),COLOR00FFFF;
DRAWNUMBER(AMO>6000000 AND C<REF(C,1) AND 小市值,AMOW*1.0,AMO*0.0001),COLOR00FF00;
DRAWNUMBER(AMO>6000000 AND C=REF(C,1) AND 小市值,AMOW*1.01,AMO*0.0001),COLOR0080FF;
DRAWNUMBER(AMO>20000000 AND C>REF(C,1) AND 可转债,AMOW*1.05,AMO*0.0001),COLOR00FFFF;
DRAWNUMBER(AMO>20000000 AND C<REF(C,1) AND 可转债,AMOW*1.0,AMO*0.0001),COLOR00FF00;
DRAWNUMBER(AMO>20000000 AND C=REF(C,1) AND 可转债,AMOW*1.01,AMO*0.0001),COLOR0080FF;
高量线:HHV(AMOW,0),COLOR0000FF,DOTLINE;
成交量线:HHV(AMOW,60),COLOR0080FF,DOTLINE;
量价齐升:=高量线>REF(EMA(高量线,5),1) AND CLOSE>REF(EMA(CLOSE,7),1);
DRAWICON(FILTER(CROSS(量价齐升,0.5),3),(REF(高量线,5)+高量线)/2,1);
NOTEXT01:IF(高量线>REF(EMA(高量线,5),1) AND CLOSE>REF(EMA(CLOSE,7),1),高量线,DRAWNULL),COLORRED;

4. 分时强弱副图(副图 · 37 行)

MA30:=EMA(CLOSE,30);
强弱:=EMA(CLOSE,900);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:=L1+P1*7/8;
支撑:=L1+P1*0.5/8;
现价:C,COLORC0C0C0,LINETHICK1;
STICKLINE(CROSS(支撑,现价),现价,现价-0.05,0.01,0),COLORYELLOW;
VAR0:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR3:=SMA(VAR0,3,1);
VAR1:=SMA(VAR3,4,1)-10;
VAR4:=(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR5:=SMA(VAR4,3,1);
VAR2:=SMA(VAR5,4,1)-90;
STICKLINE(CROSS(VAR1,VAR2),现价,现价-0.05,5,0),COLORYELLOW;
JLR:=IF(C>REF(C,1),AMOUNT,0);
JLC:=IF(C<REF(C,1),AMOUNT,0);
总额:=SUM(AMOUNT,0)/10000;
净流入:=(SUM(JLR,0)-SUM(JLC,0))/100000000;
IF(净流入<0 && SAFESCORE>=70 && NOT(INBLOCK(('重大风险'))),现价,DRAWNULL),COLOR408000,LINETHICK1;
IF(净流入>0 && SAFESCORE>=70 && NOT(INBLOCK(('重大风险'))),现价,DRAWNULL),COLORRED,LINETHICK2;
IF(C,HHV(C,0),DRAWNULL),COLOR00FFFF,POINTDOT;
成交额:=V*C/100,NODRAW;{万元}
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR),((100*A2)/A6),0);
A8:=IF((ISLASTBAR),((100*A3)/A6),0);
A9:=IF((ISLASTBAR),((100*A4)/A6),0);
A10:=IF((ISLASTBAR),((100*A5)/A6),0);
强势:=((100*A2)/A6>50);
拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE((MA30>强弱) && SAFESCORE>=70 && NOT(INBLOCK(('重大风险'))) && NOT(C=REF(C,1)),MA30,强弱,1,-1),COLORC08080;
STICKLINE((MA30<强弱) && SAFESCORE>=70 && NOT(INBLOCK(('重大风险'))) && NOT(C=REF(C,1)),MA30,强弱,0.001,0),COLOR408000;

5. MACD指标分时副图(副图 · 71 行)

DIFF:EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:EMA(DIFF,9);
DIF:EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
MACD:= 2*(DIFF-DEA),COLORSTICK;
JC:=DEA-DIFF;
零轴:0,COLORC0C0C0,LINETHICK1;
DRAWBAND(DIF,RGB(200,50,55),DEA,RGB(0,128,64));
{ 多空彩色带 }
DIFFF:EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),COLORWHITE,DOTLINE,LINETHICK1;
DEAA:EMA(DIFF,9),COLORYELLOW,DOTLINE,LINETHICK1;
IF(DIFFF>=DEAA && DIFFF>=REF(DIFFF,1) AND DIFFF>0,DIFFF,DRAWNULL),COLORWHITE,LINETHICK2;
IF(DEAA>=REF(DEAA,1) && DEA>=REF(DEA,1) AND DIFFF>0 AND DEAA>0,DEAA,DRAWNULL),COLORYELLOW,LINETHICK2;
{ 成交量系统 }
VOLUME:=VOL;
VOL30:=MA(VOLUME,30);
VOL150:=MA(VOLUME,150);
A:=MA(C,5);
B:=MA(C,10);
Q:=MA(C,20);
W:=MA(C,30);
P:=MA(C,60);
K:=MA(C,120);
Y:=MA(C,250);
{ 计算绿柱面积和红柱面积 }
绿柱S:IF(DIF<DEA,SUM(MACD,BARSLAST(CROSS(DEA,DIF)))*(-1),DRAWNULL),NODRAW;
红柱S:IF(DIF>DEA,SUM(MACD,BARSLAST(CROSS(DIF,DEA))),DRAWNULL),NODRAW;
DRAWNUMBER(CURRBARSCOUNT<=120 AND CROSS(DEA,DIF),DEA*0.85,REF(红柱S,2)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT<=120 AND CROSS(DIF,DEA),DEA*1.2,REF(绿柱S,2)),COLORGREEN;
STICKLINE(MACD>0 AND PERIOD>=0 AND MACD>=REF(MACD,1),0,MACD,0.1,1),COLOR0000FF;
STICKLINE(MACD>0 AND PERIOD>=0 AND MACD<REF(MACD,1),0,MACD,0.1,1),COLOR800080;
STICKLINE(MACD<0 AND PERIOD>=0 AND MACD>=REF(MACD,1),0,MACD,0.1,1),COLOR808000;
STICKLINE(MACD<0 AND PERIOD>=0 AND MACD<REF(MACD,1),0,MACD,0.1,1),COLOR00FF00;
STICKLINE(MACD>REF(MACD,1) AND MACD>0 && A>=B && B>=Q && Q>=W,MACD,REF(MACD,1),0.5,0),COLORFFFFFF;
STICKLINE(MACD>REF(MACD,1) AND MACD>0 && A>=B && B>=Q && Q>=W && EVERY(DIF>DEA,15),MACD,REF(MACD,1),0.5,0),COLORFFFF00;
STICKLINE(MACD>REF(MACD,1) AND MACD>0 && REF(MACD,1)<0 && A>=B && B>=Q && Q>=W,MACD,REF(MACD,1),2,0),COLOR00FFFF;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,MACD,REF(MACD,1),0.2,0),COLOR8C008C;
STICKLINE(MACD>REF(MACD,1) AND MACD<0,MACD,REF(MACD,1),0.1,0),COLORFF00FF;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,MACD,REF(MACD,1),0.2,0),COLOR408000;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,MACD,REF(MACD,1),0.1,0),COLOR40FF00;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,MACD,REF(MACD,1),0.2,0),COLOR008000;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,MACD,REF(MACD,1),0.1,0),COLOR00FF00;
DRAWTEXT(CURRBARSCOUNT<=120 AND CROSS(DIFF,DEA) AND DIF>0,DIFF-0.01,'▲'),COLORRED;
DRAWTEXT(CURRBARSCOUNT<=120 AND CROSS(DEA,DIFF) AND DIF>0,DIFF+0.01,'▼'),COLORGREEN;
STICKLINE(MACD>=0,MACD,0,0.0000001,0),COLOR0000FF;
STICKLINE(MACD<0,MACD,0,0.0000001,0),COLOR408000;
{ 顶底背驰系统 }
SC:=CROSS(DEA,DIF);
SC1:=BARSLAST(SC);
SC2:=BARSLAST(REF(SC,1));
GJ:=MA(C,10)>MA(C,20) AND MA(C,20)>MA(C,30);
{ 10、20、60日均线多头排列 }
XG:=SC AND GJ AND REF(DIF,SC1)<REF(DIF,SC2) AND EVERY(DEA>0,SC2) AND REF(L,SC1);
DRAWTEXT(XG,DIF*1.2,'顶背驰'),COLOR00FFFF;
JC4:=CROSS(DIF,DEA);
JC1:=BARSLAST(JC4);
JC2:=BARSLAST(REF(JC4,1));
GJ2:=MA(C,10);
XG3:=JC4 AND GJ2 AND REF(DIF,JC1)>REF(DIF,JC2) AND EVERY(DEA<0,JC2) AND REF(L,JC1);
DRAWTEXT(XG3,DEA*0.6,'底背驰'),COLORGREEN;
{ 空中加油 }
粘合:=DIFF/DEA<1.1 AND DIFF/DEA>1.05 AND C>MA(C,120) AND W>=REF(W,1) AND P>=REF(P,1) AND K>=REF(K,1) AND A>B AND B>Q AND Q>W;
取反:=COUNT(DIFF>=DEA,8)>=7 AND COUNT(DIFF<REF(DIFF,1),3)>=1 AND COUNT(DIFF<DEA,5)<1;
KZJY_A:=DIF-DEA<=LLV(DIF-DEA,5);
KZJY_B:=DIF-DEA<REF(DIF-DEA,1) && REF(DIF-DEA,1)<REF(DIF-DEA,2);
DRAWICON(CURRBARSCOUNT<=120 AND DIFF>DEA AND DIFF>0 AND DIFF>0 && REF(DIFF,1)<REF(DIFF,2) AND VOL30>VOL150 AND PERIOD=5 AND DIFF-DEA<0.7 && DIFF>REF(DIFF,1) && COUNT(DIFF>DEA,8)>=8,DIFF+0.01,28);
A1:=DIFF>-1 AND DEA>-1 AND DIFF<1 AND DEA<1;
AA:=REF(COUNT(A1,50),3)=50 OR REF(COUNT(A1,50),2)=50 OR REF(COUNT(A1,50),1)=50;
BB:=ABS(DIFF/DEA)<0.01;
STICKLINE(CURRBARSCOUNT<=120 AND AA AND BB,MACD,0,1,0),COLOR408000;
ZDF:=IF(FINANCE(3)=3 OR FINANCE(3)=4, 0.2, IF(FINANCE(3)=2, 0.3,IF(NAMEINCLUDE('ST'), 0.05, 0.1)));
ZT:=ZTPRICE(REF(C,1),ZDF);
DT:=DTPRICE(REF(C,1),ZDF);
次日涨停:=IF(FROMOPEN=60, ZTPRICE(C, ZDF),0);
跌停:=IF(FROMOPEN=60, DTPRICE(C, ZDF),0);
年涨停:=COUNT(C+0.01>=ZT,20);
破板:=COUNT(H=ZT && C<H,20);
摸跌停:=COUNT(L<=DT,20);

6. 分时量能副图(副图 · 103 行)

分时均线:=SUM(V*C,0)/SUM(V,0);
量价:=(VOL/CLOSE)/3,NODRAW;
小买:=SUM(IF(量价<100 AND CLOSE>REF(CLOSE,1),量价,0),0);
小卖:=SUM(IF(量价<100 AND CLOSE< REF(CLOSE,1),量价,0),0);
SSA:=IF(C>REF(C,1),AMOUNT,0);
SSB:=IF(C< REF(C,1),AMOUNT,0);
攻击资金:=SUM(SSA,0)-SUM(SSB,0),COLORFFFFFF;
总额:=SUM(AMOUNT,0);
MAX04:=MAX( MAX(REF(V,1),V) , MAX(REF(V,3),REF(V,2)));
MIN04:=MIN( MIN(REF(V,1),V) , MIN(REF(V,3),REF(V,2)));
T:=IF(C>REF(C,1),1,-1);
实量:=SUM(VOL,FROMOPEN);
虚拟量:=实量/240*FROMOPEN;
SZB:=实量/10000;
XZB:=虚拟量/10000;
大单买:SUM(IF(CLOSE>=REF(CLOSE,1) AND VOL*C/100/8>=25,VOL,0),FROMOPEN),COLOR0000FF,LINETHICK5;
大单卖:SUM(IF(CLOSE<REF(CLOSE,1) AND VOL*C/100/8>=25,VOL,0),FROMOPEN),COLOR00FF00,DOTLINE,LINETHICK1;
小单买:SUM(IF(CLOSE>=REF(CLOSE,1) AND VOL*C/100/8<25,VOL,0),FROMOPEN),COLOR0080FF,DOTLINE,LINETHICK1;
小单卖:SUM(IF(CLOSE<REF(CLOSE,1) AND VOL*C/100/8<25,VOL,0),FROMOPEN),COLOR808040,DOTLINE,LINETHICK1;
成交额:=V*C/100,NODRAW;{万元}
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR),((100*A2)/A6),0);
A8:=IF((ISLASTBAR),((100*A3)/A6),0);
A9:=IF((ISLASTBAR),((100*A4)/A6),0);
A10:=IF((ISLASTBAR),((100*A5)/A6),0);
强势:=((100*A2)/A6>50);
拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
统计主动买量:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);
统计主动卖量:=SUM((IF(((量价>0.20) AND (CLOSE< (REF(CLOSE,1)))),量价,0)),0);
CN:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
M12:=36;
N1:=13;
N:=100;
M:=5;
SHORT:=21;
LONG:=44;
MID:=11;
N2:=11;
NN:=2400;
HD:=HHV(V,NN);
LD:=LLV(V,NN);
最高:=CONST(HD),NODRAW;
最低:=CONST(LD),NODRAW;
HLMAX:=最高;
HLMIN:=最低;
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
HLMN3:=(100-0)/2*1.3;
HLMN4:=(100-0)/1*1.3;
中间价轴:=(50-HLMN3)*HLMN2/HLMN4+HLMN1;
拉升量:=IF(C>REF(C,1),VOL,0);
打压量:=IF(C<REF(C,1),VOL,0);
昨拉升最高值:=CONST(FINDHIGH(拉升量,FROMOPEN,240,1));
昨打压最高值:=CONST(FINDHIGH(打压量,FROMOPEN,240,1));
今拉升最高值:=CONST(REF(HHV(拉升量,FROMOPEN),0));
今打压最高值:=CONST(REF(HHV(打压量,FROMOPEN),0));
量能均线:=SUM(V,FROMOPEN)/FROMOPEN;
量:=VOL;
五日量:=MA(量,5);
TT:=BARSCOUNT(C);{取得有效收盘价}
均价黄:=SUM(C*V,TT)/SUM(V,TT);{分时均线的取值}
量两步:=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.1;
价创新高:=C>=HHV(C,0);
量创新高:=V>=HHV(V,0);
{ 计算收益、已爆分钟 }
VV:=BARSSINCE(每日一点)+1;
首次起爆价:=REF(C,VV-1),NODRAW;
流通盘:=CAPITAL*100/100000000,NODRAW;
起爆时间:=REF(TIME/10000,VV),NODRAW;
已爆分钟:=VV-1,NODRAW;
TA:=BARSLAST(TIME=100000);
TC:=REF(HHV(C,0),TA+1);
TV:=REF(HHV(V,0),TA+1);
ZF:=TC/DYNAINFO(3)<1.05;
XG1:=CROSS(C,TC) AND V>TV AND ZF,COLORWHITE;
TA1:=BARSLAST(TIME=110000);
CC1:=REF(HHV(C,0),TA1+1);
VV1:=REF(HHV(V,0),TA1+1);
ZF1:=CC1/DYNAINFO(3)<1.05;
XG2:=CROSS(C,CC1) AND V>VV1 AND ZF1,COLORYELLOW;
突破:=XG1 OR XG2,COLORRED;
VT:=BARSSINCE(突破)+1;
首次突破价:=REF(C,VT-1),NODRAW;
DD1:=1;
AAA1:=STRCAT(STRCAT('大单买:',CON2STR((100*大单买)/总,0)),'%');
AAA2:=STRCAT(STRCAT('大单卖:',CON2STR((100*大单卖)/总,0)),'%');
AAA3:=STRCAT(STRCAT('小单买:',CON2STR((100*小单买)/总,0)),'%');
AAA4:=STRCAT(STRCAT('小单卖:',CON2STR((100*小单卖)/总,0)),'%');
DRAWTEXT_FIX(DD1=1,0,0.20,0,AAA1),COLOR000000;
DRAWTEXT_FIX(DD1=1,0,0.40,0,AAA2),COLOR000000;
DRAWTEXT_FIX(DD1=1,0.08,0.20,0,AAA3),COLOR000000;
DRAWTEXT_FIX(DD1=1,0.08,0.40,0,AAA4),COLOR000000;
STICKLINE(每日一点,最低+轴差*0.4,0,2,0),COLOR00FFFF;
DRAWICON(突破=1,大单买,17);
DRAWTEXT(突破=1,大单买,'●突破●'),COLOR00FFFF;
DRAWTEXT_FIX(1,0.45,0.5,0,STRCAT(STRCAT('暴涨能量→ ',CON2STR(暴涨能量→,2)),' ')),COLOR00FFFF;
{ 所属自定义概念 }
DRAWTEXT_FIX(1,0,0.0,0,STRCAT(HYBLOCK, STRCAT('【', STRCAT(DYBLOCK,STRCAT('】', GNBLOCK))))),COLOR0080FF;

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

声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。