私募网

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

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

[复制链接]
发表于 2019-5-22 01:03:11 | 显示全部楼层 |阅读模式
{画线主图 TDX  N:1,100,8  K:0,2,0  P:0,1,0}
' j) ~- \' d5 R6 K; e{参数 N3=900101  1501231  1080918}{小/大/缺省}
( q$ s: H" P5 K  S{P2=900101  1501231 1080925}{小/大/缺省}6 z0 Z4 e4 k2 S, \3 i/ s) r
{短期压力支持 N1 1 100  5}
8 V4 L4 v* N5 q; E2 ^  i, ZZGD:=HHV(H,60);" _* A1 z8 s/ Z8 X8 {
ZGD2:=CONST(ZGD);
- K" B) M  E8 x7 l( SZDD:=LLV(L,60);* A$ V; e( T1 q+ ?) j
ZDD2:=CONST(ZDD);! o7 H8 a' R( j
GJ:=(C+H+L+O)/4;9 s% w4 O" D+ U0 Z; t: @
嫡阻力:=L+(GJ-L)+(C-L);
6 z$ S+ q" l# ^; }- \嫡支持:=L+(C-GJ);/ \# v/ K+ W8 e1 H
KOH:=L>REF(H,1);8 U4 D; y5 ^6 J( u
KOL:=HREF(H,BARSLAST(KOH)+1);* c1 A6 e, Z3 ~& f7 j6 \- `
NHIF:=LN3,代价,1),NODRAW,COLOR40FF00{颈线}; + {" j& e, N/ p) G% g$ j' r* H, K
颈线A:STICKLINE(颈线,颈线,颈线,0.5,1),COLOR40FF00;: c$ a; ?2 N, r" J5 ], c8 M
代价2:=REF(中央价,DATE=(P2+1));( P' r; B$ N+ c/ c3 `+ b
颈线B: DRAWLINE(DATE=P2,中央价,DATE>N3,代价2,1),NODRAW,COLOR8000FF;
0 Q& W3 l' V& n' O+ N# H颈B: STICKLINE(颈线B,颈线B,颈线B,0.5,1),COLOR8000FF;+ ^; b& _; w( u/ \0 C, s8 }
{立桩量}
1 R' q( z9 Z$ M! X4 oV2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
2 P- W2 E! N" NVVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL);0 |/ q' n: i4 J; i: b# b2 i' Y
量比:=IF(CURRBARSCOUNT=1,VVOL,VOL)/REF(MA(VOL,5),1);: g3 C  i: C& X) _* s: C- V! V
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
8 ]# E' |" f  J; i+ y0 E1 q" [  O饱和:=IF(SAT>1,1,SAT)*100;
' Z( v& ~1 ^# T立桩:=量比>2 AND 饱和=100;
6 ?$ K4 i& B( B7 z立桩量:=(V2>=1 OR 立桩) AND C>O;
+ c4 E2 w! t) HSTICKLINE(立桩量 ,O,C,1.8,0),COLORFF80FF;' f$ K7 X! w" H- r1 z" b
STICKLINE(立桩量,O,C,0.7,0),COLOR8000FF;
* O0 [6 s3 Q; A/ B  h, b2 o9 ?* X{涨停标示}
1 y6 b5 b( {7 o& w( V+ g/ JAAK:=CLOSE/REF(C,1)>=1.097 AND C=H;; A8 B. A& ~# ^9 P7 F) |4 M$ m
STICKLINE(AAK,C,O,1.8,0),COLORRED;2 d6 f1 u' K% u/ k
STICKLINE(AAK,O,C,0.2,0),COLOR0000FF;
1 H" k) w* B$ u6 R% R/ B7 P{涨跌停标示}
6 x" y! B  X) t3 q; TC3:=REF(C,1);
( s" z; R' \. k. M涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);' s4 j" U2 Y8 ?7 b* T
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
% G6 W8 E- N6 z) mSTICKLINE(跌停,OPEN,CLOSE,1,0),COLORFF0000;6 d  i/ e. u- J! c) ~
{画线B}, R. J- h/ e. z) E$ q+ C
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;; B* ~- x( `$ r
AAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
% w4 Q) C7 G  f' y- x1 cQYQ:=BACKSET(AAR,HIGHN+1);8 V1 f) C  ~. J3 ?5 t
CCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);  r1 {. b+ D' c( `
DDDQQ:=BARSLAST(CCQ);
1 n: S( t$ l( B2 s' n. v& w6 |/ nGDTSQ:=IF(CCQ,CURRBARSCOUNT,0);1 o: Q+ \5 R( _3 Y
DINGBU:=IF(DDDQQ,REF(H,DDDQQ),H);{顶部}: U/ ]/ ]3 v' `4 }: R# j8 u
DINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);+ R: ~$ ?. M' A& P$ B- G$ p0 Z: M
DINGBU1:=REF(DINGBU,DDDQQ+1);
/ M- _- `) U& H0 q; ]0 qGDCS1Q:=CONST(DINGBUTSQ);
3 K  H" x; U* W# ]! t' }DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);
+ e3 Z# E3 v1 a9 \8 i' t! K$ G2 gGDCS2Q:=CONST(DINGBUTS1Q);( y9 Q- x0 k6 j1 g( c' b
DINGBU2:=REF(DINGBU1,DDDQQ+1);
; C* `% ]7 n) S. m3 K( vMM:=IF(CURRBARSCOUNT>GDCS2Q,0,1);
4 Y, B" f' l+ ^3 d5 l高点压力2:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORGREEN,LINETHICK1;
8 v) s4 D; t( \3 JAA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1);
2 R# p% `/ t/ b! j! `2 ZQY1Q:=BACKSET(AA1Q,LOWN+1);9 \  C. G, M7 ^1 o8 v
CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);" |8 g! j! u! y
DD1Q:=BARSLAST(CC1Q);9 a# J2 Q! O8 u2 t( M; O' P
DDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);* h  }; ?4 N1 D# V3 ?6 H% D/ ~
YDB:=IF(DD1Q,REF(L,DD1Q),L);  I. R2 k$ x3 F! q2 R$ [
DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);
# m& a) F( ]6 e' l/ l, H1 x, g8 ^+ eDDCS1Q:=CONST(DDTS1Q);  Z* J  N3 g+ h1 y# V, D% C$ w; @
ZDB:=REF(YDB,DD1Q+1);, C, F% o* D, w4 {
DDTS2Q:=REF(DDTS1Q,DD1Q+1);# c' S4 h* u  Y
DDCS2Q:=CONST(DDTS2Q);
8 q- O3 _, L7 @$ l. }低点支持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-3-28 09:51 , Processed in 0.696186 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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