|
源码如下!!
w% r! ^ Y P3 ~{M 1 30 3}
3 b+ n3 S% q+ }* Y2 S3 M" M6 M u& X% ?- d
VAR1N:=1990131;
+ }/ u1 A! |6 C1 kU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);9 |5 L7 s0 F+ ?: N2 v
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);9 N$ X( }5 |' l( _
神偷线 ((DMP * U1) * 100) / TR);4 i7 H9 r4 `! K( i5 F3 c
辅助线:=((DMM * 100) / TR);( T. ]5 o# J) J% O
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);! a0 s7 M: h5 F3 ^
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
4 e& t. e7 r2 o4 L+ d) \* qVAR1:=MA(LOW,1);' Z+ J8 o: b0 w _+ \0 U
VAR2:=MA(HIGH,2);& ` Q* Z. S3 Q) p. }7 }
VAR3:=MA(CLOSE,2);
# j: X5 r5 n5 i2 [+ kVAR7:=REF(VAR3,1);& P0 W7 Y: U0 o8 B% M
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);0 R, p: B( l% b5 F3 O& F
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; $ D, T. @+ B _, W" w- _3 A' y; d
短底:5,LINETHICK2,COLORBLUE; , X/ l6 f7 g% o) x& M
短顶:43,COLORGREEN;
0 _1 T( r2 B7 B绝顶:60,LINETHICK2,COLORFF00FF;& _7 J/ a4 y, M, Z
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0)); b+ q7 J; N) u3 C
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen; A% f. p% W" D) y- ^2 q
+ M# q4 W" I3 ~
" l% u7 B" j3 O v
通达信版
- a$ c2 Q( D3 r{M 1 30 3}2 V0 o8 D, Y0 ^% E% n3 R2 W; i Q
VAR1N:=1990131;
: P! O1 d s6 E; ?: p7 pU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);/ e3 ?% {- W% m2 ~7 m) o# C
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
+ a( t6 k9 Z& v3 K# l+ O神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;1 r% p' D0 U- f$ \: |( Y6 O
辅助线:=((DMM * 100) / TR1);3 H" k. p# y6 B$ L1 \' h
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
r) U: \% T8 G2 }; H4 {* KADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);2 a( @7 b- l _! [) T
VAR1:=MA(LOW,1);- f8 s9 ^8 }% Q" q$ U" [5 l
VAR2:=MA(HIGH,2);
9 z$ w$ F. M2 [' I# U+ c ^8 OVAR3:=MA(CLOSE,2);
$ h+ `2 |1 ~- P& S, y: R3 v; }* A9 n7 RVAR7:=REF(VAR3,1);$ C+ M) i! \' d8 C
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);& W4 a: w1 @7 x8 @) m# n
3 E' b/ r" w: o% y( O5 f* H
短底:5,LINETHICK2,COLORFF3300;
. ?- g8 R" u, W s2 I短顶:43,COLORGREEN;* Q: J. |4 \! X. m# b+ o
绝顶:60,LINETHICK2,COLORFF00FF;) ?4 J( V. I4 M; X) e
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
3 V8 i% c4 k. r5 `" E0 O) @3 ASTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
% i; @3 i) G4 B8 R( I0 R8 f神偷线:神偷线1,COLOR00FFFF;
j& S6 i C, ~; D% V2 d预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;& w' C3 Q9 R- a; i8 b7 |
" e3 X9 f* l& C+ S, \4 g/ s6 P( h
" c* `- z7 L# l! p飞狐版:
7 a# V% d# g1 H9 P) ^' Minput:m(3);
* L% W4 H0 }" [4 z. xVAR1N:=1990131;
?+ n/ B$ M- MU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);# o9 f3 o: R0 _% B0 k
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);. e7 J: ~6 g5 H8 j8 t
神偷线1:=(((DMP * U1) * 100) / TR1);
; P5 V6 z! u* V5 u) R, [辅助线:=((DMM * 100) / TR1);. |& |: I. ?' C: L: G0 ~
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);: g" u, k' g8 |& g( a
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);3 L$ g. l7 b9 m' U7 M; U8 Y
VAR1:=MA(LOW,1);
$ k: N* w5 n, c1 R2 W- `8 \9 pVAR2:=MA(HIGH,2);! X% p; ~1 b" n5 b& Z; w3 a4 o9 f* u
VAR3:=MA(CLOSE,2);
, \ N1 n$ r8 c- T( m8 G' aVAR7:=REF(VAR3,1);2 y. a$ s1 d" X7 b2 r$ H W
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);2 B% P+ }* L1 c( U: {7 q& t! l
$ e8 W9 T% l7 r" z" F0 Y短底:5,LINETHICK2,COLORFF3300;- V2 Y; H4 c( P. l Y
短顶:43,COLORGREEN;$ S! X8 [- Z, B/ q& S& S0 T0 X
绝顶:60,LINETHICK2,COLORFF00FF;
! S* e1 E% b! v& N) s/ @) ~STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;0 j: s, i, R- ?8 u5 Q- d1 H# n5 T
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
9 K2 q) w- a$ x" w# V+ r神偷线:神偷线1,COLOR00FFFF;
: ^' s; @+ [1 l5 T5 {# \$ Z8 K# ?预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |