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

王者之柳暗花明

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


+ W' `! W! h9 \% Q9 L; O/ I5 }+ y7 M9 `
补充内容 (2019-2-23 19:49):
; j) P  a( B( {' E. _我用通达信把公式导出来了，发在了24楼，有需要的麻烦爬楼下载吧！

王者之柳暗花明

不好意思，第一次发帖，公式如下：
MA20:MA(CLOSE,M1),COLORRED,LINETHICK2;
0 Y; R8 l# a$ `! o: v- {9 n& S& C$ [涨: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;

DRAWTEXT_FIX(1,0,0,0,'叉叉看阳线买，冲冲看阴线抛，只做上升趋势，加油'),COLORRED;
1 E8 J. h5 A! f. m7 }3 T. G& LAB股总市值:=STRCAT(STRCAT('AB股总市值：',CON2STR(FINANCE(41)/100000000,2)),'亿');
$ R! A, ]/ u. P! t8 k* R/ N) j! UDRAWTEXT_FIX(ISLASTBAR,0,0.1,0,AB股总市值),COLORWHITE;
流通股市值:=STRCAT(STRCAT('流通股市值：',CON2STR(FINANCE(40)/100000000,2)),'亿');
DRAWTEXT_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;

ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
C1:=REF(C,1);
- @0 ?  P, O- B" e- r
ST涨停:=IF(1.05*C1-C<0.005,1,0)&&ST;
非ST涨停:=IF(1.1*C1-C<0.005,1,0);
涨停:=ST涨停||非ST涨停;
  g& V3 {( Z) N4 u1 CSTICKLINE(涨停,O,C,2,0),COLORRED;
STICKLINE(涨停,H,L,0,0),COLORRED;
& A$ v& e% x; w! lNUMBER1:=COUNT(非ST涨停,BARSSINCE(非ST涨停)+1),NODRAW,COLORRED;
DRAWNUMBER(非ST涨停,H*1.04,NUMBER1),COLORRED;
4 _# ^9 D3 E' M7 v{上市以来共涨停:NUMBER1,NODRAW,COLORRED;}

3 C& ]: ]) b' `2 K上市以来涨停值:=STRCAT(STRCAT('上市以来共涨停：',CON2STR(NUMBER1,0)),'次');
+ @/ p' u( J! `: f# j. {DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,上市以来涨停值),COLORRED;
1 g6 ]  }; G  u9 @8 a# u" n
3 f! w6 k9 w' m5 j* S" ]ST跌停:=IF(C-0.95*C1<0.005,1,0)&&ST;
非ST跌停:=IF(C-0.9*C1<0.005,1,0);
2 o' b1 f+ Z* u0 }- V7 c1 y5 N7 q跌停:=ST跌停||非ST跌停;
STICKLINE(跌停,O,C,2,0),COLORGREEN;
7 B: R# _% u! n; Y! F% \STICKLINE(跌停,H,L,0,1),COLORGREEN;
NUMBER2:=COUNT(非ST跌停,BARSSINCE(非ST跌停)+1),NODRAW,COLORGREEN;
DRAWNUMBER(非ST跌停,H*1.04,NUMBER2),COLORGREEN;
{上市以来共跌停:NUMBER2,NODRAW,COLORGREEN;}

上市以来涨跌值:=STRCAT(STRCAT('上市以来共跌停：',CON2STR(NUMBER2,0)),'次');
5 a% L9 {5 Y  RDRAWTEXT_FIX(ISLASTBAR,0.1,0.05,0,上市以来涨跌值),COLORGREEN;

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;
( d6 s) s& X# Y! }- V4 GSTICKLINE(ZTB,O,C,3,0), COLORRED;
5 H9 n2 b$ w2 W* V$ q5 w5 TSTICKLINE(DYX,C,O,3,0), COLORLIGREEN;
, W" Z& S9 t5 W  _. Z1 N
D5D:MA(C,5),COLORRED;
$ @( o! B0 x# d$ t4 {) nD10D:MA(C,10),COLORGREEN;
) f- Z$ M* y$ @5 _5 y' M% W0 VD20D:MA(C,20),COLORYELLOW;
0 s0 @6 g" W( O$ d2 K: HD55D:MA(C,55),COLORCYAN;
& |( Q) f2 ^; o/ l. RD89D:MA(C,89),COLORMAGENTA;
D144D:MA(C,144),COLORRED,LINETHICK2;
D233D:MA(C,233),COLORGREEN,LINETHICK2;
D377D:MA(C,377),COLORLIGRAY,LINETHICK2;
D450D:MA(C,450),COLORRED,POINTDOT,LINETHICK4;
7 W8 ^- }) V$ ~" U4 T5 ]# {D610D:MA(C,610),COLORWHITE,POINTDOT,LINETHICK4;

; E- s! Q& x/ J. {9 x. Q9 Z二十天角度: (ATAN((D20D/REF(D20D,1)-1)*100)*180/3.1415926),NODRAW,COLORWHITE;
IF(二十天角度>0,D20D,DRAWNULL),LINETHICK4,COLORYELLOW;

王者之柳暗花明

王粉之蝉溪一梦 发表于 2019-2-23 14:09
这里堆到一块了？

同一行靠的太近，可以把“DRAWTEXT_FIX(ISLASTBAR,0.1,0.1,0,流通股市值),COLORWHITE;”改为“DRAWTEXT_FIX(ISLASTBAR,0.2,0.1,0,流通股市值),COLORWHITE;”试试！
要是还近，就再改成“DRAWTEXT_FIX(ISLASTBAR,0.3,0.1,0,流通股市值),COLORWHITE;”

王者之柳暗花明

王粉之红涨拨青 发表于 2019-2-23 08:30
1 h6 W5 x" o+ Q/ Z" S, W把公式复制到word里调整了字体字号，然后又复制到文本文档里面，再从文本文档里复制到通达信公式编辑器，把 ...

, t1 s$ ~. n9 N/ j" V8 I6 K先检查一下每句话后面有没有“；”试一下吧

王者之柳暗花明

王粉之红涨拨青 发表于 2019-2-23 16:48
还是不行。好像只有我遇到这个问题了。呵呵。

5 r1 U, n/ Q2 h3 i* K& V直接复制到通达信试一下吧！编程就是这样，经常会遇到稍不注意就稀里糊涂时好时坏的问题！

王者之柳暗花明

通达信的导出公式

王者之柳暗花明

草根王长牛 发表于 2019-2-23 23:13
  {9 F; k( @) G/ x6 ~# K  X谢谢师兄的无私分享，好人有好报，祝您股市长虹！
有个问题请教，20天线角度那里有两个数字是怎么理解？ 再 ...

( F' i9 u( a8 k9 o, l0 y( w如果20日线向下，只有一个数字，负数的，表示角度向下！如果20日线向上，两个数字，第一个正数表示20日线向上角度，第二个数字是20日线的数值，参考用

王者之柳暗花明

王粉之股道金sir 发表于 2019-2-25 17:09
你好师兄我怎么设置不了，帮忙看一下，谢谢
+ }5 T" m- x4 O, s" dZ~下框出现了下面这些，应该怎么办？
0 W% W! K6 l6 M. Y  d当前公式 : MA10 (画线 ...

错误的意思是M1没有定义参数，M1就是定义的参数，如果名称换了，公式里的M1也要跟着改名字！
; c' I) b  K- D7 O3 e另外，如果不想定义参数，就直接把M1改成20也行！

王者之柳暗花明

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