|
源码如下!!
4 o: |( }: H, [+ P, l" C& ]9 f{M 1 30 3}
, H, |( J# c$ a3 l8 \
1 i# @, y7 f) Y1 h( o+ j# GVAR1N:=1990131;# j: S, o( Y. |, [& X7 _) b! m5 ~
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);9 L; G7 Q( {6 g+ ?1 v# j
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
" i4 Q) M0 X" `( }5 m/ [神偷线 ((DMP * U1) * 100) / TR);/ A& E+ _$ t' B S3 i
辅助线:=((DMM * 100) / TR);, K, g' e0 N$ ^1 C3 B- c |
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
; G' D1 V9 U" g0 T- \ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);6 K4 @2 Q4 i! W$ e" T& T! V
VAR1:=MA(LOW,1);
0 w( L6 ?8 y S2 d) f: XVAR2:=MA(HIGH,2);
2 P# W* A: U% k2 R3 fVAR3:=MA(CLOSE,2);! `1 ]8 j; Q! K! w* W
VAR7:=REF(VAR3,1);
3 T* k( F% ?! L2 I9 Z6 d3 h& z【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);# ` V# v& v: q2 F) P$ E
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
8 A: r1 q. g: p( W) E7 Y- G$ J/ X短底:5,LINETHICK2,COLORBLUE;
H' o4 I0 w/ d+ G短顶:43,COLORGREEN;% W3 }$ P; {7 Q( A" g
绝顶:60,LINETHICK2,COLORFF00FF;
: u, ~( o7 T! C) O- L, ?FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
6 P4 _" A& R/ ^7 H/ h# P$ J' |5 u2 lFILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;; G3 |: ~! }/ J7 i c( B. t
3 U! q+ h; ^( q) \9 R1 I
6 d+ c* b: s9 H3 ~/ k通达信版
& M. q6 \0 Y+ Q) G# B{M 1 30 3}6 r4 X$ w) _3 P" P4 h" ^
VAR1N:=1990131;/ \9 f0 N+ `2 x+ }
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);5 r& _, Y4 _& O- c" A, K
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);$ A* X! {9 e' Y- V+ Q* ?
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;% Y* E# D0 w9 x
辅助线:=((DMM * 100) / TR1);2 ^, D& B9 L3 G* n% N1 S
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
3 `3 k; Q6 H5 [$ K4 c" WADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);* o* w- g" i. J+ J
VAR1:=MA(LOW,1);" ?, [: Y5 p% H. c: N8 D' H
VAR2:=MA(HIGH,2);
$ l5 U2 R! o! ]1 e" _$ GVAR3:=MA(CLOSE,2);) \# n6 ~, D5 ~$ f/ a9 Q4 y0 i
VAR7:=REF(VAR3,1);
/ B; Q2 O7 |- L) C. O【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
4 [9 a2 r: u: U. a( V* w/ Y( c
2 q K) v3 \. J _9 i2 U9 Z# @' `短底:5,LINETHICK2,COLORFF3300;
% b; B4 [1 ~7 A2 O短顶:43,COLORGREEN;
* Y2 E( w( F' a# _* |( c绝顶:60,LINETHICK2,COLORFF00FF;
1 N" ^. _- |& g' R: e" HSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
& W* g& }( m. f5 v1 mSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;6 b' ~/ d/ D! l6 ~1 ^, n5 s b. m
神偷线:神偷线1,COLOR00FFFF;- g6 ]8 ~" C" U! Y
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;, |! O' l8 e( [" Q# K
: h/ n6 i4 Y3 r/ L* s
. `% Y7 i$ O, a
飞狐版:
) Q$ Z2 K/ z/ c# O* I) g, Cinput:m(3);- P+ f1 z0 D! t
VAR1N:=1990131;* v& R9 C: [" J
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
# d$ G% R$ s( }- Z+ ?# K ]1 qDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);& j/ L/ E$ ^. Q! \" q* q
神偷线1:=(((DMP * U1) * 100) / TR1);, Q6 @- r( K2 C5 w4 H( X
辅助线:=((DMM * 100) / TR1);" S! o0 x! e$ T* y
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);' O9 ?2 H. o1 l
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);) _5 l% A, m( K' L7 V' k: c, F& Y7 j
VAR1:=MA(LOW,1);7 c* l' J) s8 c" q) f! U
VAR2:=MA(HIGH,2);
3 C$ K) e# }5 r6 q3 jVAR3:=MA(CLOSE,2);
. w" x% d/ a. O% j/ V+ m MVAR7:=REF(VAR3,1);
9 [# }" M6 e1 C: T R, Q. l: t; D【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
% Q( V0 R0 o9 m/ r# t$ M2 h# U" A$ h! ^ x; R
短底:5,LINETHICK2,COLORFF3300;
9 z( r8 @ l( Z" r$ L3 i短顶:43,COLORGREEN;9 f; _2 i! N% o% ]
绝顶:60,LINETHICK2,COLORFF00FF;8 M+ O5 w! k* n1 X6 Y+ T
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
3 N6 d; i; L4 F. F) e5 `STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
' F/ U3 \3 z3 e7 _9 F: Z2 ]/ k+ C神偷线:神偷线1,COLOR00FFFF;9 R" _" N. O- J3 E& r$ f3 _# p2 j
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |