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

王者之柳暗花明

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


. N- Y5 m' ^9 P  O! |  X
# y- D3 a! ?* c1 Q补充内容 (2019-2-23 19:49):
我用通达信把公式导出来了，发在了24楼，有需要的麻烦爬楼下载吧！

王者之柳暗花明

通达信的导出公式

王者之柳暗花明

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

王者之柳暗花明

不好意思，第一次发帖，公式如下：
MA20:MA(CLOSE,M1),COLORRED,LINETHICK2;
涨:IF(MA20>REF(MA20,1),MA20,DRAWNULL),COLORRED,LINETHICK2;
平:=IF(MA20=REF(MA20,1),MA20,DRAWNULL),COLORWHITE,LINETHICK2;
跌:IF(MA20<REF(MA20,1),MA20,DRAWNULL),COLORGREEN,LINETHICK2;
1 m, D- ^- ~6 Z& F& J# d9 |8 r- J
' J  T; g: a) E/ p  R) J0 FDRAWTEXT_FIX(1,0,0,0,'叉叉看阳线买，冲冲看阴线抛，只做上升趋势，加油'),COLORRED;
; |. q1 J+ Z" d. ]) w' pAB股总市值:=STRCAT(STRCAT('AB股总市值：',CON2STR(FINANCE(41)/100000000,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,AB股总市值),COLORWHITE;
流通股市值:=STRCAT(STRCAT('流通股市值：',CON2STR(FINANCE(40)/100000000,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0.1,0.1,0,流通股市值),COLORWHITE;
7 m& Y, V: O, U历史Z~高点跌幅:=STRCAT(STRCAT('历史Z~高点跌幅：',CON2STR((1-CLOSE/HHV(HIGH,150000))*100,1)),'%');
) u3 J4 m8 z5 i1 W8 r9 TDRAWTEXT_FIX(ISLASTBAR,0,0.15,0,历史Z~高点跌幅),COLORGREEN;

) |% ^8 W: J! h, p; S% gST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
C1:=REF(C,1);

, ^1 V( h; S6 MST涨停:=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;
NUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED;
* I7 ^( k; I# I) fDRAWNUMBER(非ST涨停,H*1.04,NUMBER1),COLORRED;
{上市以来共涨停:NUMBER1,NODRAW,COLORRED;}

" e  Q# K, q1 N5 D; Q上市以来涨停值:=STRCAT(STRCAT('上市以来共涨停：',CON2STR(NUMBER1,0)),'次');
0 \& R$ g& [; m6 [) p. {DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,上市以来涨停值),COLORRED;
9 d. Z- A0 e  C- X, g& E1 M3 V
ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
  H3 z' E* a# L% P+ w2 `) o* @. h非ST跌停:=IF(C-0.9*C1<0.005,1,0);
跌停:=ST跌停||非ST跌停;
; h+ ]  A4 V6 dSTICKLINE(跌停,O,C,2,0),COLORGREEN;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
NUMBER2:=COUNT(非ST跌停,BARSSINCE(非ST跌停)+1),NODRAW,COLORGREEN;
* \/ `1 v, U  d" K; zDRAWNUMBER(非ST跌停,H*1.04,NUMBER2),COLORGREEN;
{上市以来共跌停:NUMBER2,NODRAW,COLORGREEN;}
- ^8 q; z) J6 ]1 U
% i0 B; O- E' @# b上市以来涨跌值:=STRCAT(STRCAT('上市以来共跌停：',CON2STR(NUMBER2,0)),'次');
DRAWTEXT_FIX(ISLASTBAR,0.1,0.05,0,上市以来涨跌值),COLORGREEN;
! s' G5 S. f+ L, E4 ?/ [. y
ZTB:=(C-REF(C,1))/REF(C,1)>=0.099 && C>=O && H>L;
  \* Z# {: V/ X4 iDYX:=(REF(C,1)-C)/REF(C,1)>=0.05 && C<O && H>L;
STICKLINE(ZTB,O,C,3,0), COLORRED;
- m& \( N: u6 {STICKLINE(DYX,C,O,3,0), COLORLIGREEN;

D5D:MA(C,5),COLORRED;
D10D:MA(C,10),COLORGREEN;
D20D:MA(C,20),COLORYELLOW;
D55D:MA(C,55),COLORCYAN;
D89D:MA(C,89),COLORMAGENTA;
D144D:MA(C,144),COLORRED,LINETHICK2;
D233D:MA(C,233),COLORGREEN,LINETHICK2;
9 [9 a! \9 e6 r$ `. zD377D:MA(C,377),COLORLIGRAY,LINETHICK2;
  c: T9 j6 r0 GD450D:MA(C,450),COLORRED,POINTDOT,LINETHICK4;
D610D:MA(C,610),COLORWHITE,POINTDOT,LINETHICK4;
4 ^0 e4 i7 D$ M2 j
二十天角度: (ATAN((D20D/REF(D20D,1)-1)*100)*180/3.1415926),NODRAW,COLORWHITE;
IF(二十天角度>0,D20D,DRAWNULL),LINETHICK4,COLORYELLOW;

id_217812

谢谢师兄的分享！

id_396222

师兄，是添加在条件选股里面吗、我添加了怎么没有出现

王者梦

谢谢分享！

id_396222

王者之柳暗花明 发表于 2019-2-23 19:46
' K9 |# \6 ]. C' L通达信的导出公式

楼主，你好，我是根据添加条件选股进去的，添加好了，为什么在我软件上啥都没有显示呢、
* z& D  q- m/ `6 J$ W9 o4 ^7 D

王粉之大唐小生

感谢分享！

王粉小福即安

谢谢分享！

王粉天山旭日

非常感谢！祝涨停板不停。

草根王之上山虎

王者之柳暗花明 发表于 2019-3-1 11:25
! l" F5 s% T7 \# R' z新加了一段程序，用来在屏幕上显示2019年01月31日以来股票的涨幅，可以更快的对比个股与指数的涨跌幅，黏贴 ...

棒棒哒！
* ?# U, h- t/ I5 J# S& D" h: n4 e; u

王粉之股道金sir

王者之柳暗花明 发表于 2019-2-25 23:33
错误的意思是M1没有定义参数，M1就是定义的参数，如果名称换了，公式里的M1也要跟着改名字！
. v8 L0 S7 v. C9 R- a8 R! o* p- I0 W另外，如果 ...

谢谢师兄
; {' L5 X# C7 d2 e
9 r) |: l4 E: ^3 k7 S" M