|
源码如下!!
3 T' P4 R4 ]& y& j2 j0 s. o/ Q{M 1 30 3}
- a8 k0 p0 W: [' v8 P5 O: Y0 ^3 E. ?& b( j% w
VAR1N:=1990131;
' P7 Y; ?; T) i* K9 }U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);5 f) _, }" o" Q! J! n. j2 [4 S
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
6 O3 Z( q \5 \3 S8 x神偷线 ((DMP * U1) * 100) / TR);" x( B" p. g5 o) I' y, E! e
辅助线:=((DMM * 100) / TR);
) l# i! X# }6 g( R9 j动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
% s4 g( T) X, q: yADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2); P0 A9 x3 d4 f5 d* U8 _
VAR1:=MA(LOW,1);+ h/ _8 h% ?7 F$ W
VAR2:=MA(HIGH,2);
& o# i' n2 E5 m5 F4 b5 G/ G( U) rVAR3:=MA(CLOSE,2);) ~& K) ]0 ^+ {2 l Q4 o: v
VAR7:=REF(VAR3,1);
( f1 T0 `/ {; a( y2 @& k6 o8 u【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);: |# r& a& p- C) V/ h! r
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
3 Y& R- ?' ]; i2 a5 n2 v2 x& R2 A短底:5,LINETHICK2,COLORBLUE; ; X0 n3 | h: D5 H8 v4 ~. A& ~7 |3 o
短顶:43,COLORGREEN;
2 W: }$ n$ t) x1 G绝顶:60,LINETHICK2,COLORFF00FF;4 H {- o% i1 A
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
) c. j7 \6 o) F# c. r6 B* L e* d& k1 cFILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
: [$ Q5 o. q: e# \5 z5 Y; ]9 T+ X+ P2 G. U3 b
# k3 ]/ I x9 O通达信版
; }' Z) L2 H" q S, |: d# _{M 1 30 3}
+ l- U) U, b$ s# s( QVAR1N:=1990131;
* H4 S; U" G8 g( { F* TU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);, a2 z2 h n! X8 M' P3 ], j. `
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
: |9 Y. m: a/ d3 h, a; Q神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
! R& p" Q! e& H, I: ]% P辅助线:=((DMM * 100) / TR1);) D3 P4 O2 J* e0 J. C/ S
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
& u8 q% R9 p4 l* X3 SADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);* L# E7 d# q; P! ?4 A
VAR1:=MA(LOW,1);$ E2 [# w! x! W8 d! e. b/ f: _
VAR2:=MA(HIGH,2);4 r/ l# C# {) ?1 b3 v" ^) V
VAR3:=MA(CLOSE,2);7 [/ a' L- f' \; w6 R3 C
VAR7:=REF(VAR3,1);. @+ x: d$ P/ B9 H
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
! M* n% [# o2 i+ B( j, c4 \! r& N3 l) l# t) a( j$ B0 m
短底:5,LINETHICK2,COLORFF3300;
t& I3 @$ K' F5 C8 m短顶:43,COLORGREEN;0 a' o, l5 t( \+ ~' |
绝顶:60,LINETHICK2,COLORFF00FF;
0 Z( @9 b7 c# e% tSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
7 D" s- S* n! i! K2 {STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
0 Z- ]$ I! \3 g3 |% f8 H神偷线:神偷线1,COLOR00FFFF;
, J, H$ r+ t) s0 n# I- D7 U5 l预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
) l/ T- q. C; M, L/ l/ j3 q: [" A! P
! J8 S" K7 d3 i" s* {8 h" A+ ?' Q' G2 t. @# Y* ?
飞狐版:
% N! g; M' c9 I# [' R/ Rinput:m(3);
3 c' u, _# s2 g8 }2 G: u2 g: nVAR1N:=1990131;5 |- ]! e- K _# g2 z
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1); }4 J$ }9 h! S" j, `6 w- J0 I3 J& d
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);7 D; C" @. u7 z+ w' v- C3 A( e9 }
神偷线1:=(((DMP * U1) * 100) / TR1);1 T/ T* G \. |5 `) d% ] o
辅助线:=((DMM * 100) / TR1);" r2 t2 S; y; S$ J% G7 b
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
( U [# c, W7 S4 j' _ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
6 w6 }8 T0 M2 R# _: Y4 f. GVAR1:=MA(LOW,1);
$ q( w6 o3 d' W3 c6 J. \VAR2:=MA(HIGH,2);8 I0 |+ ^" _8 o6 y
VAR3:=MA(CLOSE,2);7 L6 M8 `7 l' E; b1 }# q
VAR7:=REF(VAR3,1);
1 Z3 @9 o4 }# S% y: u【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);+ K% ~9 j$ V: e/ h
* e/ }) J! S( y( h/ r: `
短底:5,LINETHICK2,COLORFF3300;& `- F8 T f- O4 }) k* [; s
短顶:43,COLORGREEN;
* j- d P5 n% W/ C T1 R8 [绝顶:60,LINETHICK2,COLORFF00FF;4 X5 l4 H" r) x
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
# F9 D' L' [* u) ISTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
( I: J6 B. ?0 h! }& I" n7 ]# D神偷线:神偷线1,COLOR00FFFF;' c) F, Q; ]6 {) c
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |