源码如下!!: M5 Y$ }6 u' G/ z7 h" i* l" H
{M 1 30 3}
9 W% Z- g9 o5 w" B2 C: ^9 O5 P G' X l4 J8 _7 ~+ p+ _1 T& [
VAR1N:=1990131;9 e7 P9 i4 J8 Z" G
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);- E$ m: ]) o; Z% V' i1 t
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);1 S# k& R+ _' R# k( S. Q& A
神偷线 ((DMP * U1) * 100) / TR);
: @5 a# h# [0 }( Q# _2 I辅助线:=((DMM * 100) / TR);3 ?; }0 G, M7 i J0 h
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);% e- |2 B9 U7 l. w& G
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
. A7 O) P( j4 J& H* j/ Q) ?VAR1:=MA(LOW,1);: ^$ k3 w- L" m) g: l' i
VAR2:=MA(HIGH,2);) m2 h' q3 B6 U% }! G, E
VAR3:=MA(CLOSE,2);. Z7 v+ T8 W7 \; `5 Q- H# c% G
VAR7:=REF(VAR3,1);. V+ [+ Q% S* i9 Z! ~
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);2 e+ z6 u5 p; ]1 h- A
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
0 \9 h# w5 V' p' x* ?5 R+ f1 h短底:5,LINETHICK2,COLORBLUE;
- | X5 V4 Q7 Y0 |4 V短顶:43,COLORGREEN;
! E+ g- \4 O5 w5 D绝顶:60,LINETHICK2,COLORFF00FF;
+ R) \1 ?9 i! {0 h5 T1 s! }6 ~FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
' U9 i" N. ~/ r5 ~FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
- g1 h( z! t8 [
% f9 d: L' D }8 b3 V. {" u
. c0 o4 e$ u+ a3 H' r l1 ^通达信版
. U1 T1 f" Z) B, w2 X: T+ D{M 1 30 3}
3 p3 T; o2 P) uVAR1N:=1990131;$ P+ B) w' }9 Q$ i5 n
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
H6 U% O* g1 P% y4 NDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
3 z! A( U3 |9 p" W( @神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
E; T6 P, l. ~5 w' u) N辅助线:=((DMM * 100) / TR1);
+ I0 j5 m( K4 l1 W动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);# h2 P/ o% A: a9 Y( [+ j) ~
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);9 j1 U1 v+ m8 B
VAR1:=MA(LOW,1);
! d' b% s- T+ ?: O, P$ dVAR2:=MA(HIGH,2);
4 Z1 ]3 `' P( n5 _6 @: N+ ?VAR3:=MA(CLOSE,2);
4 U3 G1 K8 V9 |1 q% @5 I1 gVAR7:=REF(VAR3,1);4 m$ @5 v' O4 b
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);# X4 h3 O9 Y9 X# M+ F
9 x5 `+ Y; F' w. J/ e& R6 l短底:5,LINETHICK2,COLORFF3300; 3 y: P2 R" s7 q" q0 _$ P- _- K/ x
短顶:43,COLORGREEN;
]! [; c1 F8 F' x8 m' m绝顶:60,LINETHICK2,COLORFF00FF;8 p7 u: x7 t( W, s4 {( \
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
( p; P3 a9 T" P7 KSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;) T" S ^$ h) ?* u) D) {
神偷线:神偷线1,COLOR00FFFF;$ Y, q# n! T" Z
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
7 K3 O! W% C9 U3 U, k, ^. B* j( c8 L- D3 Y; F
7 R1 Z! O1 u8 }飞狐版:( y S/ `+ M1 l* h7 ^5 j, M
input:m(3);/ F' w' v" e A7 ^5 q5 |4 h
VAR1N:=1990131;; B% ]) Z9 L# m$ B/ e
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);2 X, \* f) B, J* f/ h
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
3 N" o0 q* q. `" H神偷线1:=(((DMP * U1) * 100) / TR1);
# M+ j4 ]/ O- J8 D+ i {辅助线:=((DMM * 100) / TR1);% F3 m4 K" J E! w2 l
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
/ a. S! A" j, K- o4 XADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
0 c5 D# ], o0 k, Q E2 H' |VAR1:=MA(LOW,1);
$ c6 t+ b) c1 \VAR2:=MA(HIGH,2);
6 ~( T* D) e) @% c. bVAR3:=MA(CLOSE,2);7 T1 q0 v( u3 y0 G. Y! ]
VAR7:=REF(VAR3,1);) n/ ?, ^4 L. d4 M4 D/ J
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);' b+ G& E/ `, x( U7 c7 R- E
6 f1 u) M9 p% {9 M/ x4 c+ s. {
短底:5,LINETHICK2,COLORFF3300;- }, K7 n4 J: p6 Y' j# x
短顶:43,COLORGREEN;' m" e1 q/ R$ s; H
绝顶:60,LINETHICK2,COLORFF00FF;5 S* l) H" |3 y6 S3 Q# e* d, @. v
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
. T9 K( e9 K0 W, p a4 aSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
1 \0 R! q. d1 Y8 K' y" K2 N$ y神偷线:神偷线1,COLOR00FFFF;
; R6 d% W4 P8 p预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |