|
源码如下!!4 j7 f( N& W( _6 ?" l" K
{M 1 30 3}
9 j6 W; ]/ |8 h3 }% y0 _4 X% B" Y+ a
VAR1N:=1990131;
0 s9 [+ B+ z% b* _U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
" I# s% d, K# j- g2 W+ g2 lDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);, R1 l5 s; g7 V0 S+ f, W
神偷线 ((DMP * U1) * 100) / TR);4 v0 i8 W8 v* A& h* w+ {
辅助线:=((DMM * 100) / TR);
; u2 I8 H$ W, k动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
& G: p0 g& n+ A: H/ T1 w, GADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);4 Y) _' M, W. p# I4 c6 X$ F0 j& Q
VAR1:=MA(LOW,1);
8 T/ j3 W2 l8 L; g3 z7 Z' ZVAR2:=MA(HIGH,2);3 E, z5 R) @' H0 \$ F a/ P
VAR3:=MA(CLOSE,2);
' j$ @5 y3 e6 S V) ~# IVAR7:=REF(VAR3,1);+ x$ R% ^* L8 h
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);8 R* j! g6 m$ Q9 i/ u
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; ; O' O4 v7 ^' y. I. S; t0 |) r
短底:5,LINETHICK2,COLORBLUE;
4 W& \, s. |! u: C/ P短顶:43,COLORGREEN;
+ S/ g% @6 A0 r绝顶:60,LINETHICK2,COLORFF00FF;% S8 |! U. }9 ^4 b+ G0 D
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
( f6 `1 n" y! fFILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
. m% }( [# s" M) y, L4 g2 d+ ]2 ^( U1 Q* q
8 R! B( y4 D' L# F
通达信版# z- y& Z" P# a$ x" b
{M 1 30 3}- v% m/ [7 n% v
VAR1N:=1990131;1 j4 e8 W# q! h- d0 Y
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
$ J- @7 q8 |; l+ D- \! W& y2 ~DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);0 p) K* w, t5 f6 X' c% P# D
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
; R D; J0 x2 A$ P& K0 r+ B辅助线:=((DMM * 100) / TR1);6 A& {5 w: }- { N: k+ z
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
, n' Y& m3 L6 A2 Y) AADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
( O7 ]7 ?7 M* }/ I Q( o( DVAR1:=MA(LOW,1);
: N# @/ Z" W1 \- k+ T' B7 |VAR2:=MA(HIGH,2);
* i; T P. u+ _3 L* f2 nVAR3:=MA(CLOSE,2);
. g* |& a% T* y* r' W6 ~, YVAR7:=REF(VAR3,1);* H/ E w+ g3 x' u1 P1 H
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
7 ~& y" @2 h. ]+ V% L* a- z6 w _7 e4 o' ~# {
短底:5,LINETHICK2,COLORFF3300;
& |( G; n# f2 N' s5 C短顶:43,COLORGREEN;
7 \" ~) t! H7 n3 W* B5 e! e( h) \绝顶:60,LINETHICK2,COLORFF00FF;* k4 S% p1 P# n; D
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
% T; e; `2 \8 S" x; t8 SSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
3 M6 \- ~0 w9 Y3 W神偷线:神偷线1,COLOR00FFFF;
# k/ y* |2 m- X预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
4 l* H- h+ ?8 {# A: o. B' G
! F- L1 t. ^$ v2 j# j! F. t
8 Y6 j b! s% M0 h飞狐版:
6 S \) z8 W% X1 \input:m(3);
' \( w/ k* f1 ]) q9 I! V9 A; XVAR1N:=1990131;
d% X8 k/ \8 o3 g8 AU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
2 o& ~& G3 [7 F* S# y+ d, mDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
' |1 y7 I" P) d神偷线1:=(((DMP * U1) * 100) / TR1);0 `; t* R" G3 F3 \. j, ]; |- a" U
辅助线:=((DMM * 100) / TR1);
, q7 b7 i7 i. ^( j( |动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);, B) _. Y( ]3 l: O$ p
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);/ I& V9 t9 |% t6 V3 h. F
VAR1:=MA(LOW,1); c! s9 x% f l0 W/ T! S) }) l( @8 X
VAR2:=MA(HIGH,2);
" X1 s3 i1 @3 Y/ C6 ] w: y! aVAR3:=MA(CLOSE,2);4 [7 U, x/ Q, _" V: P
VAR7:=REF(VAR3,1);
6 _% e0 d9 k" I* d8 I' |8 c! S【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
+ l* B6 U! y) F, C$ C) D
( o- g& B7 r# \- T短底:5,LINETHICK2,COLORFF3300;2 Y5 r' d1 X% C- l) }$ D
短顶:43,COLORGREEN;
S0 B% `& I0 T& B' }绝顶:60,LINETHICK2,COLORFF00FF;- |; k2 R8 K i- U- ~) ?
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
2 R# z0 J. \3 U1 y1 w8 l7 MSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;9 K3 M' h* z7 o1 |
神偷线:神偷线1,COLOR00FFFF;
: A# k0 y7 y; @* r预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |