四目观天下

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

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

[复制链接]
发表于 2019-5-22 01:03:11 | 显示全部楼层 |阅读模式
{画线主图 TDX  N:1,100,8  K:0,2,0  P:0,1,0}7 a- r* b3 t8 D% g2 x
{参数 N3=900101  1501231  1080918}{小/大/缺省}. W. {" n  L0 n( z( v8 V4 p5 X) ^$ n
{P2=900101  1501231 1080925}{小/大/缺省}1 R/ O0 ^: a0 E4 F# ~
{短期压力支持 N1 1 100  5}
0 L/ ?) M- L/ R' Q/ oZGD:=HHV(H,60);( b6 e  l2 j! B7 |, ~" |
ZGD2:=CONST(ZGD);7 A" Y2 v3 ^) O: K+ q
ZDD:=LLV(L,60);; Q: v# k8 K% e
ZDD2:=CONST(ZDD);  A: t- L% G( B
GJ:=(C+H+L+O)/4;" y  f% n5 k$ Z/ p6 x! I
嫡阻力:=L+(GJ-L)+(C-L);  f- d5 g% e  ^/ U+ b
嫡支持:=L+(C-GJ);7 J* [3 @3 q3 N
KOH:=L>REF(H,1);' g  E& N  Q+ ?2 j) {' o1 L
KOL:=HREF(H,BARSLAST(KOH)+1);
$ B3 O5 r+ T" l3 _6 g6 [0 ]4 b3 N4 T. ~NHIF:=LN3,代价,1),NODRAW,COLOR40FF00{颈线};
6 X2 H1 D0 X+ `/ X/ E; G/ ^. k颈线A:STICKLINE(颈线,颈线,颈线,0.5,1),COLOR40FF00;
/ {2 Z& x  s; E: C7 U+ [' g' i代价2:=REF(中央价,DATE=(P2+1));
' a+ @7 J- T) T颈线B: DRAWLINE(DATE=P2,中央价,DATE>N3,代价2,1),NODRAW,COLOR8000FF;: g& U  p9 g7 F% P. f, ^# ]' c7 R
颈B: STICKLINE(颈线B,颈线B,颈线B,0.5,1),COLOR8000FF;
# F* D- F& S# N& }# H9 q* K0 ]{立桩量}) J& N. |4 @+ j! x' r  A3 M3 X
V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
$ E9 J5 \7 V. F$ `# g( PVVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL);
' g+ C# Z4 k1 [& K- y: a' K量比:=IF(CURRBARSCOUNT=1,VVOL,VOL)/REF(MA(VOL,5),1);' Q+ A& R9 }# F1 |3 y7 O3 r% Q
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
' I9 d& A2 \; ^. P饱和:=IF(SAT>1,1,SAT)*100;
9 i: d5 f; b4 H  X/ ~立桩:=量比>2 AND 饱和=100;- Y- Q0 a: {) J
立桩量:=(V2>=1 OR 立桩) AND C>O; : q8 ]! s6 _7 [0 h" T/ U7 U" v
STICKLINE(立桩量 ,O,C,1.8,0),COLORFF80FF;: `6 o1 r, p4 E% O' o# b* o
STICKLINE(立桩量,O,C,0.7,0),COLOR8000FF;: P0 b" E" Y- M9 i  A) N' @
{涨停标示}! {7 I, b9 P% H, l
AAK:=CLOSE/REF(C,1)>=1.097 AND C=H;
( \. W9 `1 h& o' CSTICKLINE(AAK,C,O,1.8,0),COLORRED;
7 |/ p- P. a1 n& MSTICKLINE(AAK,O,C,0.2,0),COLOR0000FF;
9 p$ q% D- d8 P+ ~9 o9 x7 x9 G{涨跌停标示}
& `- a. Q& i5 rC3:=REF(C,1);
; Q1 K% w8 ^: ?1 K: @' g. N涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
! R5 X$ _- T4 {( N( u- l9 e' l跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);4 ?! S( v! q: h3 d3 `
STICKLINE(跌停,OPEN,CLOSE,1,0),COLORFF0000;% `; M" q5 g& x! \: |5 q
{画线B}5 o2 ^; _! ~' {1 j
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
6 Z9 I1 {! \/ s/ O- HAAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);) S  `9 E) D, @' x
QYQ:=BACKSET(AAR,HIGHN+1);
* h0 p2 {/ d' D" g: aCCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);
! O, T% D/ c( ~; J" CDDDQQ:=BARSLAST(CCQ);
1 N6 q" p7 S  U' F, KGDTSQ:=IF(CCQ,CURRBARSCOUNT,0);, S5 n( m& i, B5 r) l4 x2 J
DINGBU:=IF(DDDQQ,REF(H,DDDQQ),H);{顶部}
# O) v- o, H  uDINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);
8 \* C5 i) h1 k6 c9 z  V3 j- cDINGBU1:=REF(DINGBU,DDDQQ+1);! o! u8 n4 _" i3 g2 Z0 u$ u
GDCS1Q:=CONST(DINGBUTSQ);5 L" r0 G; k- O. J. ~" X
DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);4 N4 q" y; A. R$ s$ @) X. Q
GDCS2Q:=CONST(DINGBUTS1Q);+ Q; I4 t  [1 M# f3 L; ]
DINGBU2:=REF(DINGBU1,DDDQQ+1);
# Y4 G( t5 k; ?2 f3 x8 s# jMM:=IF(CURRBARSCOUNT>GDCS2Q,0,1);
2 P+ i1 n/ Z* K- _高点压力2:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORGREEN,LINETHICK1;
% @3 k3 p! h9 ~: A2 [AA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1);
5 d# h7 b7 ^1 C& ^% w$ CQY1Q:=BACKSET(AA1Q,LOWN+1);; [+ x7 h" d1 w( ^7 z+ e
CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);: o1 u7 U9 O$ i
DD1Q:=BARSLAST(CC1Q);
, h' b! Z: h% Z, I* ZDDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);
2 j* O0 L" s8 k) n3 pYDB:=IF(DD1Q,REF(L,DD1Q),L);8 ^/ L' M8 ]7 n
DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);
8 \: y- @1 H1 A' bDDCS1Q:=CONST(DDTS1Q);0 X4 }  Q" }1 q4 ]
ZDB:=REF(YDB,DD1Q+1);1 @  W. P" Z4 b5 l/ @
DDTS2Q:=REF(DDTS1Q,DD1Q+1);- H" h8 B0 C6 w' W2 y" Q3 I( U
DDCS2Q:=CONST(DDTS2Q);5 A* w$ i2 \; u: B0 P6 u" H6 j
低点支持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-8-17 14:45 , Processed in 3.059207 second(s), 26 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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