分享一个自己的通达信主图指标公式

王者之柳暗花明

    Z~近浏览了一下论坛里诸位牛人分享的通达信主图指标公式，我进行了消化和整理，除了王者十条黄金均线外，还统计了涨停板、跌停板数量，总市值、流通市值，以及历史Z~高点至今的跌幅！    愿大家在恩师的技术和心态指导下猪年妥妥的！！！
8 N7 c3 V) U4 |; e  L7 l' ?& S


" l& ]3 t; V; d  D- V' l补充内容 (2019-2-23 19:49):
我用通达信把公式导出来了，发在了24楼，有需要的麻烦爬楼下载吧！

王者之柳暗花明

通达信的导出公式

王者之柳暗花明

新加了一段程序，用来在屏幕上显示2019年01月31日以来股票的涨幅，可以更快的对比个股与指数的涨跌幅，黏贴到程序的任意位置就行！
" X  S* ?. L1 F: P近期涨幅:=STRCAT(STRCAT('近期涨幅：',CON2STR((CLOSE/REFDATE(CLOSE,1190131)-1)*100,1)),'%');
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,近期涨幅),COLORRED;

王者之柳暗花明

不好意思，第一次发帖，公式如下：
MA20:MA(CLOSE,M1),COLORRED,LINETHICK2;
7 C3 A* l: P0 g涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLORWHITE,LINETHICK2;
5 `8 r; Z! h. A+ o跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORGREEN,LINETHICK2;
" M5 o5 W# _; O2 y; G6 `1 M
" d0 Z/ R1 }+ Z5 O  B3 IDRAWTEXT_FIX(1,0,0,0,'叉叉看阳线买，冲冲看阴线抛，只做上升趋势，加油'),COLORRED;
1 B1 B: O# q# d9 Y' [, PAB股总市值:=STRCAT(STRCAT('AB股总市值：',CON2STR(FINANCE(41)/100000000,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,AB股总市值),COLORWHITE;
5 N5 ^; i0 A: H$ I* h流通股市值:=STRCAT(STRCAT('流通股市值：',CON2STR(FINANCE(40)/100000000,2)),'亿');
! t! \- N5 a% o9 VDRAWTEXT_FIX(ISLASTBAR,0.1,0.1,0,流通股市值),COLORWHITE;
+ W" v$ @2 y$ {) N1 s历史Z~高点跌幅:=STRCAT(STRCAT('历史Z~高点跌幅：',CON2STR((1-CLOSE/HHV(HIGH,150000))*100,1)),'%');
$ w9 Z3 i2 `' X6 ]DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,历史Z~高点跌幅),COLORGREEN;

; G- Z1 \# P  a- xST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
C1:=REF(C,1);

. K. R" o/ o* a9 DST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
涨停:=ST涨停||非ST涨停;
STICKLINE(涨停,O,C,2,0),COLORRED;
STICKLINE(涨停,H,L,0,0),COLORRED;
. g! y: x% h! m0 M9 M  UNUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED;
! y: b- R' h5 k& K. k  k  p2 JDRAWNUMBER(非ST涨停,H*1.04,NUMBER1),COLORRED;
{上市以来共涨停:NUMBER1,NODRAW,COLORRED;}

1 l7 I7 a4 _. ]  Z# F, Q+ L上市以来涨停值:=STRCAT(STRCAT('上市以来共涨停：',CON2STR(NUMBER1,0)),'次');
6 P8 m- Y0 [; W& C1 ~4 `/ V$ ^DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,上市以来涨停值),COLORRED;
' Q' m9 Z: w; P" a' @- _
7 O8 j/ D4 b: U/ F6 C# lST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
- `- q7 K: c, A跌停:=ST跌停||非ST跌停;
3 ]8 D* `' G) W2 {0 D% jSTICKLINE(跌停,O,C,2,0),COLORGREEN;
6 i- O4 H; i- z$ Z8 P6 rSTICKLINE(跌停,H,L,0,1),COLORGREEN;
4 A$ V0 R. t$ C5 y! O% c& s/ _NUMBER2:=COUNT(非ST跌停,BARSSINCE(非ST跌停)+1),NODRAW,COLORGREEN;
3 _$ N+ Q7 l, u8 T3 a" KDRAWNUMBER(非ST跌停,H*1.04,NUMBER2),COLORGREEN;
1 D- J# X, ^0 p0 J{上市以来共跌停:NUMBER2,NODRAW,COLORGREEN;}
  O; @  v( Z% n
4 h+ o0 i2 H) x6 n% ?" r6 @4 T上市以来涨跌值:=STRCAT(STRCAT('上市以来共跌停：',CON2STR(NUMBER2,0)),'次');
4 @/ S6 u* f' c' k0 {2 m2 \DRAWTEXT_FIX(ISLASTBAR,0.1,0.05,0,上市以来涨跌值),COLORGREEN;
% f' O7 E  G: P& Q& H
* Y0 H  l) x; l  `* M! s2 s% H1 xZTB:=(C-REF(C,1))/REF(C,1)>=0.099 && C>=O && H>L;
& \" M) u. N0 b2 i4 ^DYX:=(REF(C,1)-C)/REF(C,1)>=0.05 && C<O && H>L;
: B; N& B# a: c1 O4 L2 S& I4 oSTICKLINE(ZTB,O,C,3,0), COLORRED;
STICKLINE(DYX,C,O,3,0), COLORLIGREEN;
8 N* B: ?, n1 Y& p% b% U
9 s$ P' f: O6 k5 A& }( q/ K7 V8 `D5D:MA(C,5),COLORRED;
D10D:MA(C,10),COLORGREEN;
D20D:MA(C,20),COLORYELLOW;
8 @- u! y* R! V! L. b' z# ID55D:MA(C,55),COLORCYAN;
D89D:MA(C,89),COLORMAGENTA;
D144D:MA(C,144),COLORRED,LINETHICK2;
1 `! P- K  a% }" s) Z+ }D233D:MA(C,233),COLORGREEN,LINETHICK2;
D377D:MA(C,377),COLORLIGRAY,LINETHICK2;
D450D:MA(C,450),COLORRED,POINTDOT,LINETHICK4;
8 b8 o& {2 H6 q+ J, r: r, XD610D:MA(C,610),COLORWHITE,POINTDOT,LINETHICK4;
- _/ q9 E" x7 E7 A2 p; G4 h
$ s  C+ d! r- Q6 O' T3 n二十天角度: (ATAN((D20D/REF(D20D,1)-1)*100)*180/3.1415926),NODRAW,COLORWHITE;
IF(二十天角度>0,D20D,DRAWNULL),LINETHICK4,COLORYELLOW;

草根王之征途如虹

王粉之征服

感谢您的付出，祝多多涨停板

森焱_7873

感谢您的分享，祝股票天天涨停板

王粉之红涨拨青

为什么我复制过去之后，所有的文字部分全部变成了一堆？呢

王粉之红涨拨青

把公式复制到word里调整了字体字号，然后又复制到文本文档里面，再从文本文档里复制到通达信公式编辑器，把文字变？的解决了，可还是出现了问题。
' F$ O1 l. A9 ^; K9 Z" f$ }" S问题是这样的：
# ]5 H; q5 m; o5 A当前公式 : M10 (条件选股公式)  
9 a4 |+ t9 E% A$ |; j9 T$ E错误句 :
5 }1 j* h- X1 o7 Q) C4 K/ }MA20:MA(CLOSE,M1),COLORRED,LINETHICK2
详细信息 : 输出变量 MA20 定义重复!
错误起始位置 : 332 ; 长度: 12

王粉之红涨拨青

上面是我失误，有四行公式重复了。删掉重复的公式，出现新的问题
; q+ l: t( c. V) z错误句 :
NUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED
详细信息 : 不是画线指标公式，不能指定画线类型!
错误起始位置 : 853 ; 长度: 9
0 I7 P4 i# v9 n! T" _4 d

王粉之葫芦福满仓

非常感谢！比原先指标大有改进直观有效！给作者点赞赞赞！！！

草根王之宁静致远

谢谢分享！