源码如下!!
( |& d, f* G4 N$ y. R5 D1 R0 a{M 1 30 3}- f2 ?& f* K9 q
3 @5 u* ^) L& p& V, z
VAR1N:=1990131;
3 c% b' h+ x* K# }U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
3 w. O5 E1 e" J/ E4 HDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);, w; i' W7 s3 f$ E4 ?
神偷线((DMP * U1) * 100) / TR);9 {3 |* b6 D( n
辅助线:=((DMM * 100) / TR);# f9 b0 X! [9 ~0 l9 \
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);+ X$ ]( w, ^& @ G
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
2 K& d5 B' O2 u' HVAR1:=MA(LOW,1);5 H) x( `; S( P# b/ K
VAR2:=MA(HIGH,2);+ r: S! Q. ^ K. _. m# ?9 c
VAR3:=MA(CLOSE,2);- h( s' L0 t2 v' n% ^. p; y- g
VAR7:=REF(VAR3,1);- p+ [: @" K+ y( _$ B+ d
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);0 c8 ~9 o& F8 P: v! w4 K8 v) z: j
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; , }, c# n1 B* H2 w& @) b' Q
短底:5,LINETHICK2,COLORBLUE; 5 ]( }' a! _& c9 a4 D8 x
短顶:43,COLORGREEN;
/ h+ n5 R7 |& x* S2 ?+ H1 Q) j绝顶:60,LINETHICK2,COLORFF00FF;
; K* r% y6 g' BFILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));+ U6 Z( @3 H1 B k# d
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;9 |0 H3 e; t$ E1 K
8 w3 K" M1 x4 X( c% `0 N) C$ @
2 U& {' [/ e k
通达信版& H4 T, o) @9 E9 R& C
{M 1 30 3}& q$ J- s" r$ @/ R/ {. m5 j- Y
VAR1N:=1990131;0 I( H P% q2 n, y4 `
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
3 N) g; x% V; e) w) K kDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
. ]9 o' t& N6 Z5 c0 W4 N7 I神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;& h- _( l2 U3 m) \3 R- m5 L
辅助线:=((DMM * 100) / TR1);7 O7 `0 f1 O7 n, G6 I! V6 w& s
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
2 B# O: R5 x( N/ i( W4 iADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);- ?* m6 V* j, Q, w
VAR1:=MA(LOW,1);
8 M" [ U! W% u* l7 tVAR2:=MA(HIGH,2);
) G) n' h1 n" e( u$ J3 t7 qVAR3:=MA(CLOSE,2);
) e$ C& z# m z. lVAR7:=REF(VAR3,1);6 \5 h! | b* I
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
! ^5 \- ^4 J$ y& s3 Z' F! `' P1 R
短底:5,LINETHICK2,COLORFF3300; ) a- W; P! [) l
短顶:43,COLORGREEN;( O* @2 K# |9 z
绝顶:60,LINETHICK2,COLORFF00FF;
8 c1 z4 {7 R7 O# v* bSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;! j5 s' }# A, w2 }, p8 |
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
% G1 N4 `& U B0 [: p' b神偷线:神偷线1,COLOR00FFFF;! }3 B/ X7 N3 h& a; B' U5 s
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
( ~. X# [! p& B6 F
0 y; E/ u1 q. _5 \5 j. }; D( O" v% u9 C* n' u: {0 L* `
飞狐版:
3 Y/ j$ [ B/ P( ?input:m(3);
/ m1 ^2 `$ ?- Q& ~- c4 tVAR1N:=1990131;( w; K3 F4 x! F' v( F2 |7 v; L
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);1 c- S- ?9 d; F3 k. ]( n y
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);1 D0 m! @. x; A! ~8 {# ?9 I* D: M
神偷线1:=(((DMP * U1) * 100) / TR1);6 X; f) O- H0 e0 C1 P5 ]4 ?
辅助线:=((DMM * 100) / TR1);1 h- q, B9 q8 U: `
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);" O) s! a+ ?+ h( |
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
, D& X: j7 w% o* r1 v8 p) IVAR1:=MA(LOW,1);' L: c' S" \& a, P
VAR2:=MA(HIGH,2);3 e4 T3 S; B& q7 @* ?4 o& m- \4 ~
VAR3:=MA(CLOSE,2);
" l% h8 \& h2 R9 \+ \1 DVAR7:=REF(VAR3,1);6 q' N6 ^# Z$ u3 `# D+ d# s% R% O
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);" X# K1 @& ~5 l% A6 b( c
1 g0 O9 }+ v2 |8 ~# U w/ \
短底:5,LINETHICK2,COLORFF3300;
# i& M$ r. \7 o6 E$ ?短顶:43,COLORGREEN;
1 I3 ?+ S$ z! m绝顶:60,LINETHICK2,COLORFF00FF;
/ J |9 A% e& J9 w9 FSTICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
7 y# @% G, D; ^4 Z0 J. dSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;( Z& m8 w+ x& X8 E# m
神偷线:神偷线1,COLOR00FFFF;% R7 s, z/ w; ?, e, W! Y/ o
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |