私募

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz

[选股技巧] [通达信] 通达信 主图 自动画线【源码---贴图---公式】

[复制链接]
发表于 2019-5-22 01:03:11 | 显示全部楼层 |阅读模式
{画线主图 TDX  N:1,100,8  K:0,2,0  P:0,1,0}. G2 u5 i' d8 O, T
{参数 N3=900101  1501231  1080918}{小/大/缺省}
& H. I  e/ Z/ F% ]0 q6 Y{P2=900101  1501231 1080925}{小/大/缺省}3 j3 e4 I$ n  ~8 d: S
{短期压力支持 N1 1 100  5}
; M2 F+ ]& R3 cZGD:=HHV(H,60);4 J2 g7 m- `1 p: B( {
ZGD2:=CONST(ZGD);
& x5 ~. G. v3 t. }ZDD:=LLV(L,60);; U$ ~3 \& |  g8 u1 `  V
ZDD2:=CONST(ZDD);; t7 S! I4 h' Q' k; |* |
GJ:=(C+H+L+O)/4;
8 C9 ~4 N6 z: h3 Q' r/ h0 G嫡阻力:=L+(GJ-L)+(C-L);
# [4 K" J% q& V& x+ k嫡支持:=L+(C-GJ);
! ^' w+ W* h; ^+ ^0 A3 VKOH:=L>REF(H,1);
1 O: }4 l0 s9 W4 n7 |KOL:=HREF(H,BARSLAST(KOH)+1);
7 k: [( K8 T$ P) d; qNHIF:=LN3,代价,1),NODRAW,COLOR40FF00{颈线}; 7 ~% R; a3 [2 B: f- y
颈线A:STICKLINE(颈线,颈线,颈线,0.5,1),COLOR40FF00;5 n+ w9 P) O/ q# e5 D# i+ Y$ ?. Z
代价2:=REF(中央价,DATE=(P2+1));
% x" j  r" W) p颈线B: DRAWLINE(DATE=P2,中央价,DATE>N3,代价2,1),NODRAW,COLOR8000FF;& p7 z" B. F0 x" ~5 M
颈B: STICKLINE(颈线B,颈线B,颈线B,0.5,1),COLOR8000FF;
: X  o0 a# j# z. ?( V7 f% K& v# ~7 M{立桩量}& d' L) l2 |' R7 S
V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);6 M+ e/ }1 X! Z9 x! ]% X" k
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL);4 y# g' l7 V# k/ S0 t/ T; f7 k# f
量比:=IF(CURRBARSCOUNT=1,VVOL,VOL)/REF(MA(VOL,5),1);0 l/ Y  D4 _3 M4 b% h
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
' E0 X; b; Z9 a! Z8 R饱和:=IF(SAT>1,1,SAT)*100;
- D; b2 j8 {! U: i0 g3 ?4 H, ^0 a2 X立桩:=量比>2 AND 饱和=100;0 y8 Y4 `$ J; V9 I5 r
立桩量:=(V2>=1 OR 立桩) AND C>O;
0 S) U, o  O4 p( W; z6 tSTICKLINE(立桩量 ,O,C,1.8,0),COLORFF80FF;: M% x- \& E% n7 _! r
STICKLINE(立桩量,O,C,0.7,0),COLOR8000FF;
- f8 b/ F& A$ b! w1 R6 ?{涨停标示}
1 o" M* K! m/ ?* P6 eAAK:=CLOSE/REF(C,1)>=1.097 AND C=H;
4 T0 H% J) O* hSTICKLINE(AAK,C,O,1.8,0),COLORRED;
; S1 f4 r/ U: Y% D. |! r! L+ MSTICKLINE(AAK,O,C,0.2,0),COLOR0000FF;
3 y& \6 N* k& q9 U& d) n{涨跌停标示}
/ t8 C( k* p( ]C3:=REF(C,1);
  k6 f  `+ ~# e涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);* D' z& a& n# O/ L5 z0 L6 Y! c/ J
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
* v- l) S; K% OSTICKLINE(跌停,OPEN,CLOSE,1,0),COLORFF0000;
2 n' G4 a; R3 Q$ x{画线B}  O3 G7 H% x; |/ `  O( G
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;2 r  }2 E- ~, F( H
AAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);+ _8 U  @3 H# s$ {$ _3 M# g" c6 V
QYQ:=BACKSET(AAR,HIGHN+1);
: m8 Y& }/ @3 O9 X( hCCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);& r- \) t& ?2 z3 l6 q) a
DDDQQ:=BARSLAST(CCQ);
" J- z: g" ~4 c$ n9 @GDTSQ:=IF(CCQ,CURRBARSCOUNT,0);
6 G: ?; }. o* p. h1 b: _  JDINGBU:=IF(DDDQQ,REF(H,DDDQQ),H);{顶部}
; u4 X' x' B- j+ x; H8 xDINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);0 ~/ `( @, T9 N2 d+ B
DINGBU1:=REF(DINGBU,DDDQQ+1);
6 s7 c3 X4 r; J: x- g' D) m% D5 ^4 pGDCS1Q:=CONST(DINGBUTSQ);
, B# ]9 D/ L* c) gDINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);
, c5 C1 A! h- o& hGDCS2Q:=CONST(DINGBUTS1Q);
% r4 P' u7 P# R" O  B0 @DINGBU2:=REF(DINGBU1,DDDQQ+1);
- b  n8 m4 O6 w, D/ oMM:=IF(CURRBARSCOUNT>GDCS2Q,0,1);
, P( {0 _8 ^2 s4 U, e0 T' W6 l高点压力2:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORGREEN,LINETHICK1;; F, e3 I# y: n( A& A3 u
AA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1);
( Z3 w; p. J8 M2 @: Z5 kQY1Q:=BACKSET(AA1Q,LOWN+1);+ T1 V3 a1 J( w5 i7 ]
CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);( y9 G. b5 L$ F* |
DD1Q:=BARSLAST(CC1Q);! G6 d3 @, J. `6 F5 T, s# ?
DDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);4 l! I( F6 ^- q% f0 G! `
YDB:=IF(DD1Q,REF(L,DD1Q),L);
, p5 G/ v: ~4 |4 X  _DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);
4 L- n9 r+ z: U0 c- [8 E4 o, dDDCS1Q:=CONST(DDTS1Q);
# b! O: {; A8 o! P8 dZDB:=REF(YDB,DD1Q+1);
; t0 ^" j* L; M6 eDDTS2Q:=REF(DDTS1Q,DD1Q+1);
/ n9 A9 `% f; q& W( ZDDCS2Q:=CONST(DDTS2Q);5 H1 t" q  S- o9 _" c" q
低点支持2:DRAWLINE(CURRBARSCOUNT=DDCS2Q,L,CURRBARSCOUNT=DDCS1Q,L,1),COLORFF00FF,LINETHICK1;
http://www.simu001.cn/x73227x1x1.html
最好的私募社区 | 第一私募论坛 | http://www.simu001.cn

精彩推荐

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|手机版|Archiver| ( 桂ICP备12001440号-3 )|网站地图

GMT+8, 2024-12-29 03:50 , Processed in 0.357499 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表