通达信〖精准分时升级版〗整合了分时支撑/压力位分时主图指标源码
这是一款专为A股盘中盯盘场景设计的分时主图工具，整合了分时支撑/压力位、主力资金动向及即时交易提示，能够同时满足看盘与决策需求，适用于通达信软件，属于带买卖点提示与资金监控的高效分时指标。
实际操作相当便捷：当盘面上粉色支撑线出现“★买”信号时，可视为低吸机会；当绿色阻力线出现“☆卖”信号时，则适合高抛离场。指标左上角会同步显示机构买卖的实时比例，右下角则以柱状图形式清晰呈现大单净流入的力度。此外，界面还嵌入了个股关键基本面数据，用户无需切换窗口，即可在同一画面中查看分时走势、资金进出和基本面风险，显著提高做T的成功率。
公式名称：精准分时升级版主图
源码如下：
ZBGS1:=EMA(CLOSE,30);
ZBGS2:=EMA(CLOSE,900);
STICKLINE((ZBGS1>ZBGS2),ZBGS1,ZBGS2,0.8,0),COLORRED;
STICKLINE((ZBGS1<ZBGS2),ZBGS1,ZBGS2,0.8,0),COLORGREEN;
ZBGS3:=MAX(DYNAINFO(3),DYNAINFO(5));
ZBGS4:=MIN(DYNAINFO(3),DYNAINFO(6));
ZBGS5:=ZBGS3-ZBGS4;
ZBGS6:=ZBGS4+ZBGS5*7/8,COLORLIGREEN;
ZBGS7:=ZBGS4+ZBGS5*0.5/8,COLORLIMAGENTA;
ZBGS8:=(ZBGS7+ZBGS6)/2,COLORWHITE,POINTDOT;
ZBGS9:=SUM(V*C,0)/SUM(V,0),COLORYELLOW,DOTLINE;
ZBGS10:=CLOSE,COLORWHITE,LINETHICK2;
DRAWTEXT( ISLASTBAR AND ZBGS10,ZBGS10,STRCAT('←',CON2STR(ZBGS10,2))),COLORYELLOW;
STICKLINE(CROSS(ZBGS7,ZBGS10),ZBGS7,ZBGS8,1,0),COLORCC00FF;
STICKLINE(CROSS(ZBGS10,ZBGS6),ZBGS6,ZBGS8,1,0),COLOR33FF33;
DRAWTEXT(LONGCROSS(ZBGS7,ZBGS10,2),ZBGS7*1.001,'★买'),COLORFF66FF ;
DRAWTEXT(LONGCROSS(ZBGS10,ZBGS6,2),ZBGS6*0.999,'☆卖'),COLOR66FF33;
STICKLINE(C<ZBGS7,ZBGS7,C,2,0),COLORRED;
STICKLINE(CROSS(ZBGS7,ZBGS10),ZBGS7,(ZBGS7-ZBGS8)/5+ZBGS7,2,0),COLORYELLOW;
DRAWTEXT(CROSS(ZBGS7,ZBGS10),(ZBGS7-ZBGS8)/5+ZBGS7,'底'),COLORYELLOW;
STICKLINE(CROSS(ZBGS10,ZBGS6),ZBGS6,ZBGS6-(ZBGS7-ZBGS8)/5,2,0),COLORLIRED;
DRAWTEXT(CROSS(ZBGS10,ZBGS6),ZBGS6-(ZBGS7-ZBGS8)/5,'顶'),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=8,ZBGS6+0.003,'顶'),COLORGREEN,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT=8,ZBGS7-0.003,'底'),COLORLIRED,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT=8,(ZBGS7+ZBGS6)/2,'中'),COLORWHITE,LINETHICK1;
ZBGS11:=V*C/100,NODRAW;
ZBGS12:=SUM((IF(((ZBGS11/8>20) AND (CLOSE>(REF(CLOSE,1)))),ZBGS11,0)),0);
ZBGS13:=SUM((IF(((ZBGS11/8>20) AND (CLOSE<(REF(CLOSE,1)))),ZBGS11,0)),0);
ZBGS14:=(ZBGS12+ZBGS13);
ZBGS15:=IF((ISLASTBAR),((100*ZBGS12)/ZBGS14),0);
ZBGS16:=IF((ISLASTBAR),((100*ZBGS13)/ZBGS14),0);
ZBGS17:=1;
ZBGS18:=STRCAT(STRCAT('机构买',CON2STR((100*ZBGS12)/ZBGS14,0)),'％');
ZBGS19:=STRCAT(STRCAT('机构卖',CON2STR((100*ZBGS13)/ZBGS14,0)),'％');
ZBGS20:=STRCAT(STRCAT('机构总买入',CON2STR((100*(ZBGS12-ZBGS13))/ZBGS14,0)),'％');
DRAWTEXT_FIX(ZBGS17=1,0,0.02,0,ZBGS18),COLORRED;
DRAWTEXT_FIX(ZBGS17=1,0,0.13,0,ZBGS19),COLOR00FF00;
DRAWTEXT_FIX(ZBGS17=1,0.88,1,0,ZBGS20),COLOR00FFFF;
ZBGS21:=BUYVOL*DYNAINFO(7)*100/10000 COLOR0000FF,NODRAW;
ZBGS22:=SELLVOL*DYNAINFO(7)*100/10000 COLOR00FF00,NODRAW;
ZBGS23:=ABS(ZBGS21)+ABS(ZBGS22)COLOR80FFFF,NODRAW;
ZBGS24:=ABS(ZBGS21)-ABS(ZBGS22)COLOR80FFFF,NODRAW;
ZBGS25:=ABS(ZBGS21)/ZBGS23*100;
ZBGS26:=ABS(ZBGS22)/ZBGS23*100;
TESTSKIP(NOT(ZBGS21 OR ZBGS22 OR ZBGS23 OR ZBGS24 OR ZBGS25 OR ZBGS26)!=0);
DRAWRECTREL(595,1000,795,940,RGB(0,128,0));
DRAWRECTREL(595,995,795,945,RGB(0,148,0));
DRAWRECTREL(595,990,795,950,RGB(0,168,0));
DRAWRECTREL(595,985,795,955,RGB(0,188,0));
DRAWRECTREL(595,980,795,960,RGB(0,208,0));
DRAWRECTREL(595,975,795,965,RGB(0,228,0));
DRAWRECTREL(595,970,795,970,RGB(0,248,0));
DRAWRECTREL(595,1000,595+ZBGS21*210/ZBGS23,940,RGB(128,0,0));
DRAWRECTREL(595,995,595+ZBGS21*210/ZBGS23,945,RGB(148,0,0));
DRAWRECTREL(595,990,595+ZBGS21*210/ZBGS23,950,RGB(168,0,0));
DRAWRECTREL(595,985,595+ZBGS21*210/ZBGS23,955,RGB(188,0,0));
DRAWRECTREL(595,980,595+ZBGS21*210/ZBGS23,960,RGB(208,0,0));
DRAWRECTREL(595,975,595+ZBGS21*210/ZBGS23,965,RGB(228,0,0));
DRAWRECTREL(595,970,595+ZBGS21*210/ZBGS23,970,RGB(248,0,0));
DRAWRECTREL(595+ZBGS21*210/ZBGS23,940,595+ZBGS21*210/ZBGS23,1000,RGB(128,0,0));
DRAWRECTREL(795,940,795,1000,RGB(0,0.0,10));
DRAWRECTREL(594.8,939.8,594.8,1000,RGB(0,0,10));
DRAWRECTREL(594.8,939.8,594.8,939.8,RGB(0,0,10));
DRAWRECTREL(594.8,1000,594.8,1000,RGB(0,0,10));
DRAWTEXT_FIX(1,0.54,0.89,0,STRCAT(STRCAT('',CON2STR(ZBGS21,1)),'万')),COLOR0000FF;
DRAWTEXT_FIX(1,0.785,0.89,0,STRCAT(STRCAT('',CON2STR(ZBGS22,1)),'万')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(ZBGS24)>0,0.65,0.89,0,STRCAT(' ',STRCAT(CON2STR(ZBGS24,1),'万'))) COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(ZBGS24)<0,0.65,0.89,0,STRCAT(' ',STRCAT(CON2STR(ZBGS24,1),'万'))) COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(ZBGS24)=0,0.65,0.89,0,STRCAT(' ',STRCAT(CON2STR(ZBGS24,1),'万'))) COLOR80FFFF;
DRAWTEXT_FIX(1,0.8,0.98,0,STRCAT(STRCAT(' ',CON2STR(ZBGS26,1)),'％')),COLOR00FF00;
DRAWTEXT_FIX(1,0.54,0.98,0,STRCAT(STRCAT('',CON2STR(ZBGS25,1)),'％')),COLOR0000FF;
ZBGS27:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2));
ZBGS28:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));
ZBGS29:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2));
ZBGS30:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
ZBGS31:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
ZBGS32:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));
ZBGS33:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
ZBGS34:=STRCAT(' 利润同比: ',CON2STR(FINANCE(43),2));
ZBGS35:=STRCAT(' 收入同比: ',CON2STR(FINANCE(44),2));
ZBGS36:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
ZBGS37:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;
ZBGS38:=FINANCE(23)/FINANCE(10)*3.3;
ZBGS39:=FINANCE(19)/FINANCE(15)*0.6;
ZBGS40:=FINANCE(20)/FINANCE(15)*0.999;
ZBGS41:=ZBGS36+ZBGS37+ZBGS38+ZBGS39+ZBGS40;
ZBGS42:=IF(ZBGS41<1.2,'重警',IF(ZBGS41>=1.2 AND ZBGS41<2.6,'轻警','无警'));
ZBGS43:=STRCAT('财务预警: ',STRCAT(ZBGS42,STRCAT('-Z值: ',CON2STR(ZBGS41,3))));
ZBGS44:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));
ZBGS45:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));
ZBGS46:=STRCAT('风险系数: ',STRCAT(STRCAT(ZBGS43,ZBGS44),ZBGS45));
DRAWTEXT_FIX(ISLASTBAR,0.025,0.96,0,ZBGS46),COLORCYAN;
ZBGS47:=YEAR AND MONTH AND DAY;
ZBGS48:=STRCAT(CON2STR(YEAR,0),'年');
ZBGS49:=STRCAT(CON2STR(MONTH,0),'月');
ZBGS50:=STRCAT(CON2STR(DAY,0),'日');
ZBGS51:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
ZBGS52:=STRCAT(STRCAT(STRCAT(ZBGS48,ZBGS49),STRCAT(ZBGS50,ZBGS51)),'');
DRAWTEXT_FIX(ZBGS47,0.83,0,0,ZBGS52),COLORGREEN;
未来函数检测结果如下：
该公式包含未来函数:DYNAINFO
该公式包含未来函数:FINANCE
定制指标公式、软件请联系QQ或微信同号：88652583
ZBGS1赋值:收盘价的30日指数移动平均
ZBGS2赋值:收盘价的900日指数移动平均
当满足条件(ZBGS1>ZBGS2)时,在ZBGS1和ZBGS2位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,画红色
当满足条件(ZBGS1ZBGS3赋值:昨收盘价和最高价的较大值
ZBGS4赋值:昨收盘价和最低价的较小值
ZBGS5赋值:ZBGS3-ZBGS4
ZBGS6赋值:ZBGS4+ZBGS5*7/8,画淡绿色
ZBGS7赋值:ZBGS4+ZBGS5*0.5/8,画淡洋红色
ZBGS8赋值:(ZBGS7+ZBGS6)/2,画白色,POINTDOT
ZBGS9赋值:成交量(手)*收盘价的历史累和/成交量(手)的历史累和,画黄色,DOTLINE
ZBGS10赋值:收盘价,画白色,线宽为2
当满足条件ISLASTBARANDZBGS10时,在ZBGS10位置书写文字,画黄色
当满足条件ZBGS7上穿ZBGS10时,在ZBGS7和ZBGS8位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORCC00FF
当满足条件ZBGS10上穿ZBGS6时,在ZBGS6和ZBGS8位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR33FF33
当满足条件ZBGS7小于ZBGS10保持2个交易日后交叉上穿时,在ZBGS7*1.001位置书写文字,COLORFF66FF
当满足条件ZBGS10小于ZBGS6保持2个交易日后交叉上穿时,在ZBGS6*0.999位置书写文字,COLOR66FF33
当满足条件收盘价当满足条件ZBGS7上穿ZBGS10时,在ZBGS7和(ZBGS7-ZBGS8)/5+ZBGS7位置之间画柱状线,宽度为2,0不为0则画空心柱.,画黄色
当满足条件ZBGS7上穿ZBGS10时,在(ZBGS7-ZBGS8)/5+ZBGS7位置书写文字,画黄色
当满足条件ZBGS10上穿ZBGS6时,在ZBGS6和ZBGS6-(ZBGS7-ZBGS8)/5位置之间画柱状线,宽度为2,0不为0则画空心柱.,画淡红色
当满足条件ZBGS10上穿ZBGS6时,在ZBGS6-(ZBGS7-ZBGS8)/5位置书写文字,画淡红色
当满足条件到最后交易的周期=8时,在ZBGS6+0.003位置书写文字,画绿色,线宽为1
当满足条件到最后交易的周期=8时,在ZBGS7-0.003位置书写文字,画淡红色,线宽为1
当满足条件到最后交易的周期=8时,在(ZBGS7+ZBGS6)/2位置书写文字,画白色,线宽为1
ZBGS11赋值:成交量(手)*收盘价/100,NODRAW
ZBGS12赋值:(如果((ZBGS11/8>20)AND(收盘价>(1日前的收盘价))),返回ZBGS11,否则返回0)的历史累和
ZBGS13赋值:(如果((ZBGS11/8>20)AND(收盘价<(1日前的收盘价))),返回ZBGS11,否则返回0)的历史累和
ZBGS14赋值:(ZBGS12+ZBGS13)
ZBGS15赋值:如果(是否最后一个周期),返回((100*ZBGS12)/ZBGS14),否则返回0
ZBGS16赋值:如果(是否最后一个周期),返回((100*ZBGS13)/ZBGS14),否则返回0
ZBGS17赋值:1
ZBGS18赋值:字符串相加
ZBGS19赋值:字符串相加
ZBGS20赋值:字符串相加
当满足条件ZBGS17=1时,在横轴0纵轴0.02位置书写文字,画红色
当满足条件ZBGS17=1时,在横轴0纵轴0.13位置书写文字,COLOR00FF00
当满足条件ZBGS17=1时,在横轴0.88纵轴1位置书写文字,COLOR00FFFF
ZBGS21赋值:外盘*现价*100/10000 COLOR0000FF,NODRAW
ZBGS22赋值:内盘*现价*100/10000 COLOR00FF00,NODRAW
ZBGS23赋值:ZBGS21的绝对值+ZBGS22的绝对值COLOR80FFFF,NODRAW
ZBGS24赋值:ZBGS21的绝对值-ZBGS22的绝对值COLOR80FFFF,NODRAW
ZBGS25赋值:ZBGS21的绝对值/ZBGS23*100
ZBGS26赋值:ZBGS22的绝对值/ZBGS23*100
如果满足条件取反不等于0,公式返回
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
当满足条件1时,在横轴0.54纵轴0.89位置书写文字,COLOR0000FF
当满足条件1时,在横轴0.785纵轴0.89位置书写文字,COLOR00FF00
当满足条件到最后交易的周期=1AND(ZBGS24)>0时,在横轴0.65纵轴0.89位置书写文字 COLOR0000FF
当满足条件到最后交易的周期=1AND(ZBGS24)<0时,在横轴0.65纵轴0.89位置书写文字 COLOR00FF00
当满足条件到最后交易的周期=1AND(ZBGS24)=0时,在横轴0.65纵轴0.89位置书写文字 COLOR80FFFF
当满足条件1时,在横轴0.8纵轴0.98位置书写文字,COLOR00FF00
当满足条件1时,在横轴0.54纵轴0.98位置书写文字,COLOR0000FF
ZBGS27赋值:字符串相加
ZBGS28赋值:字符串相加
ZBGS29赋值:字符串相加
ZBGS30赋值:字符串相加
ZBGS31赋值:字符串相加
ZBGS32赋值:字符串相加
ZBGS33赋值:字符串相加
ZBGS34赋值:字符串相加
ZBGS35赋值:字符串相加
ZBGS36赋值:(流动资产-流动负债)/总资产*1.2
ZBGS37赋值:(未分配利润+资本公积金)/总资产*1.4
ZBGS38赋值:营业利润/总资产*3.3
ZBGS39赋值:股东权益(净资产)/流动负债*0.6
ZBGS40赋值:营业收入/流动负债*0.999
ZBGS41赋值:ZBGS36+ZBGS37+ZBGS38+ZBGS39+ZBGS40
ZBGS42赋值:如果ZBGS41<1.2,返回'重警',否则返回如果ZBGS41>=1.2ANDZBGS41<2.6,返回'轻警',否则返回'无警'
ZBGS43赋值:字符串相加
ZBGS44赋值:字符串相加
ZBGS45赋值:字符串相加
ZBGS46赋值:字符串相加
当满足条件是否最后一个周期时,在横轴0.025纵轴0.96位置书写文字,画青色
ZBGS47赋值:年份 AND 月份 AND 日
ZBGS48赋值:字符串相加
ZBGS49赋值:字符串相加
ZBGS50赋值:字符串相加
ZBGS51赋值:字符串相加
ZBGS52赋值:字符串相加
当满足条件ZBGS47时,在横轴0.83纵轴0位置书写文字,画绿色
