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

王者之柳暗花明

    Z~近浏览了一下论坛里诸位牛人分享的通达信主图指标公式，我进行了消化和整理，除了王者十条黄金均线外，还统计了涨停板、跌停板数量，总市值、流通市值，以及历史Z~高点至今的跌幅！    愿大家在恩师的技术和心态指导下猪年妥妥的！！！
1 F; g( ]! S2 C
) y9 H% t9 B% S
: T9 K' S& r7 f* }
3 V  D* M3 ]1 x5 Q9 s$ s5 w1 \补充内容 (2019-2-23 19:49):
我用通达信把公式导出来了，发在了24楼，有需要的麻烦爬楼下载吧！

王者之柳暗花明

通达信的导出公式

王者之柳暗花明

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

王者之柳暗花明

不好意思，第一次发帖，公式如下：
MA20:MA(CLOSE,M1),COLORRED,LINETHICK2;
3 Z7 D, q6 x+ Q7 _; m# e涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
  F4 ~% A4 y3 o平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLORWHITE,LINETHICK2;
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORGREEN,LINETHICK2;
  f9 O' [7 H, Z. K4 a
" S3 |+ O% |3 R4 ^DRAWTEXT_FIX(1,0,0,0,'叉叉看阳线买，冲冲看阴线抛，只做上升趋势，加油'),COLORRED;
! E5 _2 Z& y# Q* H/ C1 Q+ j6 y( IAB股总市值:=STRCAT(STRCAT('AB股总市值：',CON2STR(FINANCE(41)/100000000,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,AB股总市值),COLORWHITE;
% m0 h, ]# Y! q" i9 I$ u9 n3 h流通股市值:=STRCAT(STRCAT('流通股市值：',CON2STR(FINANCE(40)/100000000,2)),'亿');
7 r+ Q: e- e, _+ Y5 G. Q3 @/ tDRAWTEXT_FIX(ISLASTBAR,0.1,0.1,0,流通股市值),COLORWHITE;
7 s* U* P# @. y/ L历史Z~高点跌幅:=STRCAT(STRCAT('历史Z~高点跌幅：',CON2STR((1-CLOSE/HHV(HIGH,150000))*100,1)),'%');
% c4 d* \' E* B$ _" X* `. bDRAWTEXT_FIX(ISLASTBAR,0,0.15,0,历史Z~高点跌幅),COLORGREEN;
7 Y  q, P# ^  I' c3 k' i
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
C1:=REF(C,1);
3 _0 V, n2 u$ ^3 q
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
# f; _3 ~5 s+ a, ?. v. i3 ?6 m涨停:=ST涨停||非ST涨停;
/ v# w, n- X  A' ~0 _% Q, [STICKLINE(涨停,O,C,2,0),COLORRED;
7 p% {6 }/ {4 MSTICKLINE(涨停,H,L,0,0),COLORRED;
NUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED;
' z0 P; U; M# T5 O; z. @DRAWNUMBER(非ST涨停,H*1.04,NUMBER1),COLORRED;
" ]# l5 L1 I  z# y6 F0 ?{上市以来共涨停:NUMBER1,NODRAW,COLORRED;}

  K' I8 `3 Y' j上市以来涨停值:=STRCAT(STRCAT('上市以来共涨停：',CON2STR(NUMBER1,0)),'次');
DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,上市以来涨停值),COLORRED;

ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
1 ?  G0 I0 y9 l跌停:=ST跌停||非ST跌停;
STICKLINE(跌停,O,C,2,0),COLORGREEN;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
NUMBER2:=COUNT(非ST跌停,BARSSINCE(非ST跌停)+1),NODRAW,COLORGREEN;
DRAWNUMBER(非ST跌停,H*1.04,NUMBER2),COLORGREEN;
% @6 J. D2 r$ N{上市以来共跌停:NUMBER2,NODRAW,COLORGREEN;}

上市以来涨跌值:=STRCAT(STRCAT('上市以来共跌停：',CON2STR(NUMBER2,0)),'次');
5 ]9 H# F  v: q" ~; A) iDRAWTEXT_FIX(ISLASTBAR,0.1,0.05,0,上市以来涨跌值),COLORGREEN;
+ O5 ^' R/ T- \+ S2 m+ `
2 }* P3 |* ^! M, {: M0 CZTB:=(C-REF(C,1))/REF(C,1)>=0.099 && C>=O && H>L;
DYX:=(REF(C,1)-C)/REF(C,1)>=0.05 && C<O && H>L;
STICKLINE(ZTB,O,C,3,0), COLORRED;
STICKLINE(DYX,C,O,3,0), COLORLIGREEN;
9 W' S$ C. S8 s3 a  A  n  ]
5 M5 Z/ ~  }( P3 X! {/ KD5D:MA(C,5),COLORRED;
( {# y# m* z8 s; m9 `D10D:MA(C,10),COLORGREEN;
D20D:MA(C,20),COLORYELLOW;
D55D:MA(C,55),COLORCYAN;
8 ]* s0 C, L$ UD89D:MA(C,89),COLORMAGENTA;
D144D:MA(C,144),COLORRED,LINETHICK2;
* k4 Y# C5 }7 n9 b( z4 @, I% AD233D:MA(C,233),COLORGREEN,LINETHICK2;
" U9 ?/ U) ~& v8 r3 `D377D:MA(C,377),COLORLIGRAY,LINETHICK2;
2 L3 v* ]5 ~' z+ g! gD450D:MA(C,450),COLORRED,POINTDOT,LINETHICK4;
! u) [- `* N: J0 SD610D:MA(C,610),COLORWHITE,POINTDOT,LINETHICK4;
9 a, U1 f. P+ V
- n3 ?( T; A9 D! ]1 o二十天角度: (ATAN((D20D/REF(D20D,1)-1)*100)*180/3.1415926),NODRAW,COLORWHITE;
) s4 K: ^  X' DIF(二十天角度>0,D20D,DRAWNULL),LINETHICK4,COLORYELLOW;
5 `* {! G; r" v

草根王之征途如虹

5 ]+ w9 q. T; K1 V! o, P- f

王粉之征服

感谢您的付出，祝多多涨停板
8 U# y! D! e5 i0 }8 [- G, q. W

森焱_7873

3 U1 ~; x8 Y* H, m感谢您的分享，祝股票天天涨停板

王粉之红涨拨青

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

王粉之红涨拨青

把公式复制到word里调整了字体字号，然后又复制到文本文档里面，再从文本文档里复制到通达信公式编辑器，把文字变？的解决了，可还是出现了问题。
% E8 D# P1 y" v% X6 z问题是这样的：
: X3 H- h$ G# Q, O) C当前公式 : M10 (条件选股公式)  
2 f" A3 n% u9 s& ~& n+ r+ e错误句 :
9 H, l$ v, I( Z! f- l: ~6 _# \MA20:MA(CLOSE,M1),COLORRED,LINETHICK2
详细信息 : 输出变量 MA20 定义重复!
错误起始位置 : 332 ; 长度: 12
4 p8 u) ^9 d- p/ O

王粉之红涨拨青

上面是我失误，有四行公式重复了。删掉重复的公式，出现新的问题
错误句 :
; E/ W/ ?1 L& L& ^( vNUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED
# W  N  b4 H/ m& A/ ]& H, C8 P详细信息 : 不是画线指标公式，不能指定画线类型!
错误起始位置 : 853 ; 长度: 9
8 x/ c& d* U4 `. O7 b

王粉之葫芦福满仓

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

草根王之宁静致远

谢谢分享！