源码如下!!& ~% v7 ?4 b; ?0 E7 o
{M 1 30 3}: B( [1 l3 ?/ P ]
1 V2 J3 M0 }. O$ L& u- o. T
VAR1N:=1990131;' M+ K$ e" z, i" t* n' M
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
+ D+ ]' N7 P% P+ N; c9 {4 ODMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);6 z. ], @- c+ u) c% X9 O9 g! P
神偷线((DMP * U1) * 100) / TR);
, Z8 K5 |( K$ t! N) n辅助线:=((DMM * 100) / TR);' A9 X% l$ G4 w: p9 b$ O8 h6 B
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
# j3 W/ h1 y% B0 N+ S+ i' i: zADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
7 f: I6 K& G# B* lVAR1:=MA(LOW,1);
2 t) H9 F7 T/ I; Y3 r- GVAR2:=MA(HIGH,2);
7 x9 }, ^( b7 J# O3 N! k. p8 KVAR3:=MA(CLOSE,2);5 b' ~' V8 l7 i2 e7 t! x3 s' l; m
VAR7:=REF(VAR3,1);
6 k6 l0 X+ s5 K {【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);* L9 W" n' X8 U8 j! _. K& o( Y
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; ) B( w8 A- {$ @. d( l' Q2 D
短底:5,LINETHICK2,COLORBLUE; # A1 L0 k" @& O7 k
短顶:43,COLORGREEN;( V) a4 B$ ]) j2 o, @
绝顶:60,LINETHICK2,COLORFF00FF;
6 p m$ S: h# t `9 ]) XFILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));( u/ I; j' I$ w p/ t
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;/ R% L- J, s+ d, o& N5 h
2 n- @$ Q( [7 W" J9 ~1 ?$ I( b i+ z: ]
6 b4 s4 @) R( s. N通达信版3 z2 v2 j8 i4 }/ [/ e) ~- U2 Z: ?) ^
{M 1 30 3}
t# H& s \( F. pVAR1N:=1990131;
! l6 O& ]; ^1 T) W# JU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
: H e$ r( L/ [0 |# D+ V1 P/ Y* uDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);7 ^. Z7 ~9 u& m/ V
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;9 Z, W$ r2 Y2 T$ _7 @. j. r* d. H
辅助线:=((DMM * 100) / TR1);+ m+ u$ T- z0 Z" {' ?+ G2 y r
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);! e- |1 U2 U( @+ w, L7 j. v
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
# M3 w: }& y5 NVAR1:=MA(LOW,1);
- o* V1 n* [& ]" P4 m4 aVAR2:=MA(HIGH,2);" k, Q% g) z# ]6 ^; K
VAR3:=MA(CLOSE,2);
5 a: Z0 b7 c! l% ]3 [VAR7:=REF(VAR3,1);
( H- p8 N4 Z/ j9 I5 i【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);% X, @" L3 C8 a9 _" s: ` _/ @
8 R/ f' _1 ^( ^* _5 l5 h, O+ l6 K
短底:5,LINETHICK2,COLORFF3300;
0 v% N* h2 y: o短顶:43,COLORGREEN;3 b- ]6 v* b- |1 e5 j9 S0 o
绝顶:60,LINETHICK2,COLORFF00FF;0 I( x I4 P5 d* a
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
6 ~3 `, P2 T2 M# oSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
: l6 X9 g% J0 P+ y$ f2 b9 O0 X% Z神偷线:神偷线1,COLOR00FFFF;
) h: K1 O( A# S4 ~+ ]3 m! i D预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;5 Z& k A J, ]4 m/ n* E, T$ x
( H2 D) T4 U L- H: s0 i
+ ?$ f9 `" F7 W' v& |3 {8 w! j, I飞狐版:
: Z1 `- O- X9 l1 }- r' B# [input:m(3);
/ k) e" a5 j' { \1 O8 N. y# G$ s4 x' }VAR1N:=1990131;
( j' d( K! q/ m2 jU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);" r( N( ?+ Y& I) G3 p
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5); p' B( K4 F- D9 O& u* V7 P
神偷线1:=(((DMP * U1) * 100) / TR1);
; P6 T+ h& y8 K3 b! M/ e' }辅助线:=((DMM * 100) / TR1);
, Z" W6 l3 |! b) L; X! Q动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
+ z' p6 E4 h- l% NADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);; T, f3 C9 {6 P2 X
VAR1:=MA(LOW,1);
& Q9 ?! h4 }+ J2 }VAR2:=MA(HIGH,2);9 e4 I( m4 `$ c
VAR3:=MA(CLOSE,2);
1 z$ ^$ w# N$ `, @VAR7:=REF(VAR3,1);3 p+ ]( V2 E% n& C' y' B1 N
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
# A: i# `, K+ H( {' i# c* \5 B8 H6 K/ q1 u
短底:5,LINETHICK2,COLORFF3300;
( V+ }* a7 L% t短顶:43,COLORGREEN;
B8 h) k8 b/ m j: m% c绝顶:60,LINETHICK2,COLORFF00FF;) Q. y2 I" \$ P$ A% x
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;- u! c2 O" A/ n$ E+ j* m) l j9 ?8 V
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
+ }, ?* p6 ~8 F# O. U神偷线:神偷线1,COLOR00FFFF;1 ^! S, q. I( e
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |