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

王者之柳暗花明

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



( T3 c1 m7 J2 ^  D8 m补充内容 (2019-2-23 19:49):
我用通达信把公式导出来了，发在了24楼，有需要的麻烦爬楼下载吧！

王者之柳暗花明

通达信的导出公式

王者之柳暗花明

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

王者之柳暗花明

不好意思，第一次发帖，公式如下：
0 }% z2 j) ~% W; E9 ]. B5 GMA20:MA(CLOSE,M1),COLORRED,LINETHICK2;
3 ~, V! D7 s3 a2 K' |  D8 {涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
( l. f" [; k* ]平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLORWHITE,LINETHICK2;
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORGREEN,LINETHICK2;

DRAWTEXT_FIX(1,0,0,0,'叉叉看阳线买，冲冲看阴线抛，只做上升趋势，加油'),COLORRED;
AB股总市值:=STRCAT(STRCAT('AB股总市值：',CON2STR(FINANCE(41)/100000000,2)),'亿');
' J. k6 r+ q8 KDRAWTEXT_FIX(ISLASTBAR,0,0.1,0,AB股总市值),COLORWHITE;
流通股市值:=STRCAT(STRCAT('流通股市值：',CON2STR(FINANCE(40)/100000000,2)),'亿');
- C* G# x! ~& H' z: g; jDRAWTEXT_FIX(ISLASTBAR,0.1,0.1,0,流通股市值),COLORWHITE;
历史Z~高点跌幅:=STRCAT(STRCAT('历史Z~高点跌幅：',CON2STR((1-CLOSE/HHV(HIGH,150000))*100,1)),'%');
DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,历史Z~高点跌幅),COLORGREEN;
* h- n5 Z' _  e
9 r) [8 ^5 F6 _/ S6 ?ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
C1:=REF(C,1);

ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
( }( j- g( B6 c& C! i& ?" X2 Z/ U1 k涨停:=ST涨停||非ST涨停;
! @$ j7 O: U9 e- I0 N4 `STICKLINE(涨停,O,C,2,0),COLORRED;
STICKLINE(涨停,H,L,0,0),COLORRED;
1 \6 H% s3 l8 }- r" V: Z& R, \NUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED;
; a; E  {8 l; m2 F% h0 i- E& Z# iDRAWNUMBER(非ST涨停,H*1.04,NUMBER1),COLORRED;
{上市以来共涨停:NUMBER1,NODRAW,COLORRED;}
2 X, ?8 D- X5 |, }- l0 R! T% [- ?
  M6 W2 t- W3 ^/ ^4 i& }0 e! h6 C上市以来涨停值:=STRCAT(STRCAT('上市以来共涨停：',CON2STR(NUMBER1,0)),'次');
% N8 N/ _7 \( xDRAWTEXT_FIX(ISLASTBAR,0,0.05,0,上市以来涨停值),COLORRED;
9 h) o- X) m# J; {' g+ ?6 g8 |
* k, U/ _) V) gST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
; Y; p! ~/ `* Y) P非ST跌停:=IF(C-0.9*C1<0.005,1,0);
跌停:=ST跌停||非ST跌停;
5 ]. {# g! J( ~1 Z4 _! Q9 K6 OSTICKLINE(跌停,O,C,2,0),COLORGREEN;
$ p$ @" ^/ ~0 J2 a5 N( \2 \8 M5 PSTICKLINE(跌停,H,L,0,1),COLORGREEN;
- \6 J8 C; s- }# P' R: j, I# gNUMBER2:=COUNT(非ST跌停,BARSSINCE(非ST跌停)+1),NODRAW,COLORGREEN;
DRAWNUMBER(非ST跌停,H*1.04,NUMBER2),COLORGREEN;
1 L/ M) @( h% m% v: l& D8 Q{上市以来共跌停:NUMBER2,NODRAW,COLORGREEN;}
# D. J0 X* T+ M5 a; ]. y. L
上市以来涨跌值:=STRCAT(STRCAT('上市以来共跌停：',CON2STR(NUMBER2,0)),'次');
DRAWTEXT_FIX(ISLASTBAR,0.1,0.05,0,上市以来涨跌值),COLORGREEN;
% K' x9 y* l! ^) g0 N  r% i% M1 i
ZTB:=(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;
- M" h- s+ a! b, g) z* |* p1 J$ j# CSTICKLINE(ZTB,O,C,3,0), COLORRED;
STICKLINE(DYX,C,O,3,0), COLORLIGREEN;

' Y/ I' [! X( M) r: S& pD5D:MA(C,5),COLORRED;
7 C$ ?/ w8 l) b$ }9 y$ @D10D:MA(C,10),COLORGREEN;
  i+ }* Y% @: ]. [# A0 z( XD20D:MA(C,20),COLORYELLOW;
2 M* p' G1 o9 ~; g$ \: ]7 V0 MD55D:MA(C,55),COLORCYAN;
D89D:MA(C,89),COLORMAGENTA;
D144D:MA(C,144),COLORRED,LINETHICK2;
7 \& [3 a3 F9 c) q* qD233D:MA(C,233),COLORGREEN,LINETHICK2;
  u4 j0 J7 K8 q7 Y6 ]0 P( M$ TD377D:MA(C,377),COLORLIGRAY,LINETHICK2;
4 _) A! B: |0 O; _( a6 E- `' l( u' [D450D:MA(C,450),COLORRED,POINTDOT,LINETHICK4;
$ D: O9 c3 B8 h8 l( ?D610D:MA(C,610),COLORWHITE,POINTDOT,LINETHICK4;
$ i% l$ X! O- H" I, j' j
二十天角度: (ATAN((D20D/REF(D20D,1)-1)*100)*180/3.1415926),NODRAW,COLORWHITE;
; K, i4 z  S5 N& C3 E. w4 g/ i, q) NIF(二十天角度>0,D20D,DRAWNULL),LINETHICK4,COLORYELLOW;

草根王之征途如虹

王粉之征服

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

森焱_7873

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

王粉之红涨拨青

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

王粉之红涨拨青

把公式复制到word里调整了字体字号，然后又复制到文本文档里面，再从文本文档里复制到通达信公式编辑器，把文字变？的解决了，可还是出现了问题。
问题是这样的：
当前公式 : M10 (条件选股公式)  
错误句 :
MA20:MA(CLOSE,M1),COLORRED,LINETHICK2
详细信息 : 输出变量 MA20 定义重复!
! }, @, a" N6 k! g+ c/ T错误起始位置 : 332 ; 长度: 12
0 H+ H7 z; m+ f7 @. I. y% w3 p

王粉之红涨拨青

上面是我失误，有四行公式重复了。删掉重复的公式，出现新的问题
2 S% b/ m7 C. N$ p% T错误句 :
9 q; ^7 N; L$ A* O* KNUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED
详细信息 : 不是画线指标公式，不能指定画线类型!
错误起始位置 : 853 ; 长度: 9

王粉之葫芦福满仓

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

草根王之宁静致远

谢谢分享！