通达信发一个很好用的分时主图未加密选股指标公式源码

通达信发一个很好用的分时主图未加密选股指标公式源码

源码正文：

M1:=36{XG51};
N1:=13{XG51};
N:=100{XG51};
Q:=5{XG51};
SHORT:=21{XG51};
LONG:=44{XG51};
MID:=11{XG51};
P2:=11{XG51};
DRAWGBK(C>0, RGB(50,60,250),RGB(17,21,89),0,'11',0){XG51};
H1:=maX(DYNAINFO(3),DYNAINFO(5)){XG51};
L1:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
P1:=H1-L1{XG51};
阻力:L1+P1*7/8,COLORCYAN{XG51};
支撑:L1+P1*0.5/8,COLORWHITE{XG51};
中:(支撑+阻力)/2,COLORRED,POINTDOT{XG51};
现价:CLOSE,COLORRED,LINETHICK2{XG51};
顶卖:stICKLINE(C>阻力,阻力,C,5,0),COLORCYAN{XG51};
底买:STICKLINE(C<支撑,支撑,C,5,0),COLORWHITE{XG51};
MR:=C<支撑 AND crOSS(C,REF(C,2)){XG51};
DRAWTEXT(CROSS(现价,支撑),中,'★买'),COLORWHITE{XG51};
STICKLINE(CROSS(现价,支撑),C,中,2,0),COLORWHITE{XG51};
STICKLINE(MR=1,支撑,中,2,0),COLORWHITE{XG51};
DRAWICON(MR=1 OR CROSS(现价,支撑),中,1){XG51};
STICKLINE(CROSS(支撑,现价),支撑,(支撑-中)/5+支撑,2,0),COLORBLUE{XG51};
DRAWTEXT(CROSS(支撑,现价),(支撑-中)/5+支撑,'★底'),COLORBLUE{XG51};
MC:=C>阻力 AND CROSS(REF(C,2),C){XG51};
DRAWTEXT(CROSS(阻力,现价),中,'★卖'),COLORCYAN{XG51};
STICKLINE(CROSS(阻力,现价),C,中,2,0),COLORCYAN{XG51};
STICKLINE(MC=1,阻力,中,2,0),COLORCYAN{XG51};
DRAWICON(MC=1 OR CROSS(阻力,现价),中,2){XG51};
STICKLINE(CROSS(现价,阻力),阻力,阻力-(支撑-中)/5,2,0),COLORLIMAGENTA{XG51};
DRAWTEXT(CROSS(现价,阻力),阻力-(支撑-中)/5,'★顶'),COLORLIMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,阻力,'顶'),COLORCYAN{XG51};
DRAWTEXT(ISLASTBAR,支撑,'底'),COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR,(支撑+阻力)/2,'中'),COLORRED{XG51};
每股净资产:=STRCAT(STRCAT('每股净资产：',CON2STR(FINANCE(34),2)),'元'){XG51};
DRAWTEXT_FIX(1,0.22,0.92,0,每股净资产),COLORRED{XG51};
主营同比增长:=STRCAT(STRCAT('主营同比增长：',CON2STR(FINANCE(44),2)),'%'){XG51};
DRAWTEXT_FIX(1,0.33,0.99,0,主营同比增长),COLORGREEN{XG51};
净利润同比增长:=STRCAT(STRCAT('净利润同比增长：',CON2STR(FINANCE(43),2)),'%'){XG51};
DRAWTEXT_FIX(1,0.33,0.92,0,净利润同比增长),COLORBLUE{XG51};
销售毛利率:=STRCAT(STRCAT('销售毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)),'%'){XG51};
DRAWTEXT_FIX(1,0.22,0.99,0,销售毛利率),COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.11,0.99,0,'每股收益:')COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.16,0.99,0,STRCAT(CON2STR(FINANCE(30)/FINANCE(1),2),'元'))COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.11,0.92,0,'每股市盈率:')COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.17,0.92,0,STRCAT(CON2STR(C/FINANCE(33),2),'倍'))COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.01,0.99,0,'流通A股:')COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.06,0.99,0,STRCAT(CON2STR(CAPITAL/1000000,2),'亿股'))COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.11,0.87,0,'每股未分配： 元')COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.17,0.87,0,CON2STR(FINANCE(32),2))COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.01,0.92,0,'经营现金流: 元')COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.07,0.92,0,CON2STR(FINANCE(25)/FINANCE(1),2))COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.50,0.99,0,'☆[热点概念]：')COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.57,0.99,0,EXTERNSTR(0,1))COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.50,0.92,0,'☆[主营行业]：')COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.57,0.92,0,EXTERNSTR(0,2))COLORGREEN{XG51};
{XG51};
所属板块:=STRCAT('☆【所属板块】',STRCAT(STRCAT(STRCAT('[行业]—',HYBLOCK),STRCAT('[地域]—',DYBLOCK)),STRCAT('[概念]—',GNBLOCK))){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.50,0.87,0,所属板块),COLORBLUE{XG51};
今日人气:=DYNAINFO(60)/DYNAINFO(61){XG51};
DRAWTEXT_FIX(1,0,0.87,0,'◆大盘人气:'),COLORBLUE,LINETHICK4{XG51};
DRAWNUMBER_FIX(1,0.07,0.87,0,CONST(今日人气)),COLORBLUE{XG51};
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1))))){XG51};
MTIME:=MOD(FROMOPEN,TOTAL){XG51};
CTIME:=IF(MTIME<0.5,TOTAL,MTIME){XG51};
虚拟量:=IF(CURRBARSCOUNT=1,vol*TOTAL/CTIME,DRAWNULL){XG51};
虚拟量比:=虚拟量/REF(VOL,1),COLORRED,LINETHICK0{XG51};
虚量值:=(虚拟量-VOL)/VOL,COLORRED,LINETHICK0{XG51};
DRAWTEXT_FIX(1,0.33,0.87,0,'▲量比:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.37,0.87,0,CONST(虚拟量比)),COLORBLUE{XG51};
量价:=(VOL/CLOSE)/3{XG51};
统计主动买量:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0){XG51};
统计主动卖量:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0){XG51};
涨停能量:=((统计主动买量)/统计主动卖量)*10,COLOR4080FF{XG51};
DRAWTEXT_FIX(1,0.22,0.87,0,'★涨停能量:'),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.28,0.87,0,CONST(涨停能量)),COLORBLUE{X~G~5?1~C~N~{};

通达信低买高卖主图未加密选股指标公式源码

源码正文：

M1:=60{XG51};
stICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000055{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000077;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR000099{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF{XG51};
ma1:MA(CLOSE,M1),COLORLIMAGENTA,LINETHICK2{XG51};
ema13:=EMA(C,13),COLORRED;
EMA21:=EMA(C,21),COLORBLUE;
EMA34:=EMA(C,34),COLORFF00FF;
EMA60:=MA(C,60),COLORFFCC66;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4);
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
庄家:=EMA(0.777*REF(散户,1)+0.333*散户,2)*VAR3;
DRAWTEXT(crOSS(散户,庄家) AND 散户<30,L-0.05,'←低吸'),COLORLICYAN;
DRAWTEXT(CROSS(庄家,散户) AND 散户>85,H+0.05,'←高抛'),COLORCYAN;
DRAWICON(CROSS(散户,庄家) AND 散户<30,L-0.05,1);
DRAWICON(CROSS(庄家,散户) AND 散户>85,H+0.05,2);
A0:=(L+H+C*2)/4{XG51};
A1:EMA(A0,14)COLORRED ,LINETHICK2{XG51};
A2:=EMA(A0,25)COLORLIGREEN,LINETHICK2{XG51};
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW{XG51};
A2X:=(A2-REF(A2,1))/REF(A2,1)*100,NODRAW{XG51};
买入持股:IF(A1X>=0,A1,DRAWNULL)COLORWHITE ,LINETHICK3{XG51};
卖出空仓:IF(A1X<0 AND A2X<0,A1,DRAWNULL)COLORCYAN,LINETHICK3{XG51};
STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLORBLUE {XG51};
STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLORBLUE ;
STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLORBLUE ;
STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLORBLUE ;
MA5:MA(C,5),LINETHICK0,COLORFF00FF{XG51};
MA20:=MA(C,20){XG51};
MA30:=MA(C,30){XG51};
MA120:=SMA(C,120,1){XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(Abs(MTM),6),6){XG51};
QSXS1:=MA5>REF(MA5,1){XG51};
QSXS2:=MA20>REF(MA20,1){XG51};
QSXS3:=MA30>REF(MA30,1){XG51};
DTPL:=MA20>MA30 AND MA30>MA120{XG51};
LYT:=DTPL AND QSXS2 AND QSXS3 AND COUNT(QSXS1,4)<=1{XG51};
GJHS:=C>MA5 AND ((QSXS1 AND NOT(REF(QSXS1,1))) OR C>REF(C,3)){XG51};
买1:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER(买1=1,5),LOW-0.03,'▲ 买'),COLORBLUE{XG51};
卖1:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0){XG51};
DRAWTEXT(FILTER(卖1=1,5),HIGH*1.025,'● 卖'),COLOR00FF00{XG51};
VAR6:=REF(C,1){XG51};
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100{XG51};
DRAWTEXT(CROSS(84,VAR7),H*1.01,'顶'),COLORFFFF00{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORGREEN{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR990000{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORGREEN{X~G!5*1~C~N~{};