私募

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

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

[复制链接]
发表于 2019-5-22 01:03:11 | 显示全部楼层 |阅读模式
{画线主图 TDX  N:1,100,8  K:0,2,0  P:0,1,0}
# @6 s* _( I2 J+ U0 q{参数 N3=900101  1501231  1080918}{小/大/缺省}
! N' A) C' l( n; [5 r{P2=900101  1501231 1080925}{小/大/缺省}
1 a% X/ S: h/ N' v! `3 S# p{短期压力支持 N1 1 100  5}) w/ W: U3 I; r& q" c, w3 v
ZGD:=HHV(H,60);
& h, i" D! c4 X/ p5 V$ w& z  eZGD2:=CONST(ZGD);! l; v8 F$ G, Q2 `% ]1 Y% E
ZDD:=LLV(L,60);+ i' y& K: n2 R: \
ZDD2:=CONST(ZDD);
: @4 g/ z! B* b% b2 T4 x  \GJ:=(C+H+L+O)/4;
, W+ o- U& Z; n! A: M! J- ?嫡阻力:=L+(GJ-L)+(C-L);6 @: _* A* q* n1 G! a6 a# P
嫡支持:=L+(C-GJ);
$ N, V$ b: |0 [& c: rKOH:=L>REF(H,1);* `- k4 w& K8 Z
KOL:=HREF(H,BARSLAST(KOH)+1);
, l% |4 ~' b& v, oNHIF:=LN3,代价,1),NODRAW,COLOR40FF00{颈线}; - _& d2 G+ t. [
颈线A:STICKLINE(颈线,颈线,颈线,0.5,1),COLOR40FF00;
( S7 {5 o1 C; u3 n) O1 w5 r3 Q# S代价2:=REF(中央价,DATE=(P2+1));
- m& n; }% V  z# P- o+ o颈线B: DRAWLINE(DATE=P2,中央价,DATE>N3,代价2,1),NODRAW,COLOR8000FF;0 y3 L5 d+ P" W8 \/ w
颈B: STICKLINE(颈线B,颈线B,颈线B,0.5,1),COLOR8000FF;1 F! E  U, R2 H
{立桩量}+ E7 Q. {1 S5 y- r7 C4 W1 r& z
V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
, @1 B/ v2 w/ l% J; BVVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL);
- m7 _( W! g8 ~1 q2 s量比:=IF(CURRBARSCOUNT=1,VVOL,VOL)/REF(MA(VOL,5),1);
( G2 T# ]2 M/ N3 P& eSAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));" a/ v. J/ Y5 L8 J8 x  l
饱和:=IF(SAT>1,1,SAT)*100;+ z# [  C% M4 h, u) ~" V
立桩:=量比>2 AND 饱和=100;
+ h3 k2 u* P4 W6 H7 \  P/ n立桩量:=(V2>=1 OR 立桩) AND C>O; . Z# j3 f+ K+ a9 |$ C
STICKLINE(立桩量 ,O,C,1.8,0),COLORFF80FF;
7 ~- J9 N+ e: d9 E/ p; @% ^/ uSTICKLINE(立桩量,O,C,0.7,0),COLOR8000FF;
) Q. u3 T! L1 @{涨停标示}: t; Z3 j4 S/ f# b+ K, w
AAK:=CLOSE/REF(C,1)>=1.097 AND C=H;
/ [& r4 U+ z3 m8 t2 i1 eSTICKLINE(AAK,C,O,1.8,0),COLORRED;$ R1 P4 S2 G! d+ g1 g) t
STICKLINE(AAK,O,C,0.2,0),COLOR0000FF;5 j5 `) X1 T5 g3 j0 K
{涨跌停标示}1 Q, w. @" H; ]8 X7 H
C3:=REF(C,1);7 I9 ?7 q1 s0 c  h( a* ^, h
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);0 w1 p4 V/ e! n$ f
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);+ z3 T+ J$ _3 e" I* \: _
STICKLINE(跌停,OPEN,CLOSE,1,0),COLORFF0000;: C4 c. I2 X1 B/ X' g  p& r  C
{画线B}
4 a- x. b1 Y- Q! CHIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
  X; P  x3 G' _  c7 G' MAAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);# Y6 v0 Y+ D' A2 K8 o2 _9 a
QYQ:=BACKSET(AAR,HIGHN+1);
1 h9 n/ ^& U$ P* O$ U! d' xCCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);
. P* s$ l7 d' \$ J0 Z7 EDDDQQ:=BARSLAST(CCQ);# c1 f0 m& \. C: r4 f
GDTSQ:=IF(CCQ,CURRBARSCOUNT,0);
+ I$ C/ O; ^, [' y9 z3 }DINGBU:=IF(DDDQQ,REF(H,DDDQQ),H);{顶部}
9 M8 I1 e4 [. B& oDINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);
" r+ k  j! f1 U3 Z* tDINGBU1:=REF(DINGBU,DDDQQ+1);
* q) b6 F0 N) ~8 WGDCS1Q:=CONST(DINGBUTSQ);9 a" S  |% ~3 c: y
DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);
2 u) F* M: E1 R: v. l8 f% c4 c) EGDCS2Q:=CONST(DINGBUTS1Q);- w$ T) I  z6 e7 `
DINGBU2:=REF(DINGBU1,DDDQQ+1);
. m+ ?2 T* x! ^( f4 t1 S0 eMM:=IF(CURRBARSCOUNT>GDCS2Q,0,1);
: P+ i6 {/ d( W2 j高点压力2:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORGREEN,LINETHICK1;9 q" s- P) U3 v" B' c5 s9 w
AA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1);
8 h$ ^" x# e' |& QQY1Q:=BACKSET(AA1Q,LOWN+1);# J0 k+ D( c) G4 n$ d
CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);
8 N2 J# Q9 T( g0 u( h" X4 jDD1Q:=BARSLAST(CC1Q);
/ {, ]) K- U  a; C: L3 @DDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);0 g5 ^7 I3 n9 G' C  N& i
YDB:=IF(DD1Q,REF(L,DD1Q),L);
- i+ @: `. c% E' \DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);$ n+ N6 _7 b2 ]
DDCS1Q:=CONST(DDTS1Q);- K  Y% X  p$ A& i
ZDB:=REF(YDB,DD1Q+1);
% D# V6 t# X+ YDDTS2Q:=REF(DDTS1Q,DD1Q+1);" N* _  p# s" y* A6 H
DDCS2Q:=CONST(DDTS2Q);) o) X) [6 [8 B' H3 \1 D" @6 O1 ?
低点支持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, 2025-8-24 14:09 , Processed in 0.428577 second(s), 26 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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