四目观天下

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

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

[复制链接]
发表于 2019-5-22 01:03:11 | 显示全部楼层 |阅读模式
{画线主图 TDX  N:1,100,8  K:0,2,0  P:0,1,0}
# }7 }2 |  N9 [$ F) u7 `4 _{参数 N3=900101  1501231  1080918}{小/大/缺省}
3 w+ B2 e& L* r, z9 a{P2=900101  1501231 1080925}{小/大/缺省}+ O/ @1 E, J; O6 i( X
{短期压力支持 N1 1 100  5}* H6 B8 t2 ~1 N
ZGD:=HHV(H,60);, J/ B* V* k1 ~
ZGD2:=CONST(ZGD);8 O3 T6 |  ~. k1 s) Q
ZDD:=LLV(L,60);; D. X1 |: x# ?" D4 S  s' `
ZDD2:=CONST(ZDD);  H' m2 v# @- C
GJ:=(C+H+L+O)/4;
0 T$ T" \' S3 {8 u# T/ F嫡阻力:=L+(GJ-L)+(C-L);
' E! T6 m. w$ m$ L3 g+ w嫡支持:=L+(C-GJ);( B8 h$ S4 \  E8 }
KOH:=L>REF(H,1);' x' w3 x: U, x# O: y
KOL:=HREF(H,BARSLAST(KOH)+1);9 A3 g& n6 Z3 L* x( [) G1 T: J
NHIF:=LN3,代价,1),NODRAW,COLOR40FF00{颈线};
$ [- P0 q1 H  I8 j5 e颈线A:STICKLINE(颈线,颈线,颈线,0.5,1),COLOR40FF00;
9 U9 {) ?; b; o) f代价2:=REF(中央价,DATE=(P2+1));
# O* X, a* w2 a* u6 l9 m颈线B: DRAWLINE(DATE=P2,中央价,DATE>N3,代价2,1),NODRAW,COLOR8000FF;8 N* ^* P+ Q( S! Z  ^  ]
颈B: STICKLINE(颈线B,颈线B,颈线B,0.5,1),COLOR8000FF;
/ ]$ m8 @  M9 x7 n* v; `% e! @{立桩量}
: H; e5 }( x2 e- a2 T8 wV2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);3 d& i! Y1 ^) F5 f- g& m
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL);) t* Q, \/ \6 f0 _& S
量比:=IF(CURRBARSCOUNT=1,VVOL,VOL)/REF(MA(VOL,5),1);2 O9 ?8 |) }+ i" p9 E
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
' p' A* V) ?* v: x饱和:=IF(SAT>1,1,SAT)*100;
$ f, u! _0 j" w! r+ s" B6 h# h8 Z立桩:=量比>2 AND 饱和=100;
' K1 t7 u: f3 d立桩量:=(V2>=1 OR 立桩) AND C>O;
- M( y% z5 j5 l: B% G4 y4 q0 D! c  qSTICKLINE(立桩量 ,O,C,1.8,0),COLORFF80FF;
: a- l/ F) S; Y, PSTICKLINE(立桩量,O,C,0.7,0),COLOR8000FF;
" ]* V- K* G) X9 h8 w- j{涨停标示}( O6 K, k+ V6 s# ?& t+ K
AAK:=CLOSE/REF(C,1)>=1.097 AND C=H;3 l, X. o. s, n' [% l
STICKLINE(AAK,C,O,1.8,0),COLORRED;
; C8 Z& n) i1 O6 |1 Q* GSTICKLINE(AAK,O,C,0.2,0),COLOR0000FF;# S% c' c/ M) Z/ k% s! ?. `
{涨跌停标示}
) d2 ^% c, s- m0 w$ Z, p- C; v# KC3:=REF(C,1);! o0 ^; m  q! h% `( h
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
3 @5 }6 g) E: D5 o. i0 `% ?- y) m跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
) K# o7 A( m5 {STICKLINE(跌停,OPEN,CLOSE,1,0),COLORFF0000;
& a/ p! O0 p4 v) _; l{画线B}
$ {5 v7 V, r6 F; e) _; I/ uHIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
- Q2 b# j  k$ p# SAAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);5 |6 ]$ `/ U, p' X: q! @
QYQ:=BACKSET(AAR,HIGHN+1);8 X8 }6 \* Q. Z0 D$ V, V# K
CCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);
/ D- B* b/ C  ]. FDDDQQ:=BARSLAST(CCQ);
2 j+ K3 W+ C" g; [1 ~4 kGDTSQ:=IF(CCQ,CURRBARSCOUNT,0);- m: _& m/ k9 X
DINGBU:=IF(DDDQQ,REF(H,DDDQQ),H);{顶部}
9 n  ?7 j; C& J. v1 qDINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);
9 M4 l  B  W' K" l6 N/ C: O5 ~DINGBU1:=REF(DINGBU,DDDQQ+1);/ |2 M, q) b5 k8 V9 ^$ t
GDCS1Q:=CONST(DINGBUTSQ);
0 L' v/ X% L) ^% HDINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);
" N9 H% l7 M- S2 a# D. _GDCS2Q:=CONST(DINGBUTS1Q);, |( p( o3 G9 B, d. M1 s3 L- K
DINGBU2:=REF(DINGBU1,DDDQQ+1);  P' b* X, S, U1 i
MM:=IF(CURRBARSCOUNT>GDCS2Q,0,1);* \' h% Z8 [! y
高点压力2:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORGREEN,LINETHICK1;
; \* \( w# x  ]8 cAA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1);7 \, K/ q; |8 X# X) b0 a( Y# c
QY1Q:=BACKSET(AA1Q,LOWN+1);' A. [: H  ]; q
CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);
- l4 G+ |) D; T) ~! z8 C6 Q& _/ O1 BDD1Q:=BARSLAST(CC1Q);
) K) E2 }3 |9 wDDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);
8 ^- r& B2 W$ b+ w4 S8 nYDB:=IF(DD1Q,REF(L,DD1Q),L);
4 \) [6 B, ?0 y; L: p) dDDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);# G1 ?$ ?# b$ v
DDCS1Q:=CONST(DDTS1Q);- i4 o; H7 m! e" S& P7 N
ZDB:=REF(YDB,DD1Q+1);5 E- N; c; ]: O( R
DDTS2Q:=REF(DDTS1Q,DD1Q+1);
# ?: v( _7 ~. @: J. `( l; S* ]7 _DDCS2Q:=CONST(DDTS2Q);
6 {+ N, n7 h, n) B) u( F& T4 Z# q: h低点支持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, 2026-10-4 05:20 , Processed in 0.716808 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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