|
源码如下!!
3 K$ E2 {7 E# B3 P{M 1 30 3}, p$ j3 q3 t5 Q3 n+ r! }9 j
0 ^% p: y! ~+ i* e$ H* W" BVAR1N:=1990131;
9 J( K% b5 z, j7 B, b' F; PU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);* ~- R5 ?, R* r
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);( x9 c/ I. [$ V
神偷线 ((DMP * U1) * 100) / TR);; {( O0 D. d1 |
辅助线:=((DMM * 100) / TR);
* t3 ]4 D$ s1 `9 k3 L动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
4 f: ^ f- a* e: rADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
9 p- r. r! s# o zVAR1:=MA(LOW,1);$ _* l6 _2 R7 C. K/ q
VAR2:=MA(HIGH,2);
0 K6 N: q. q- Q" A6 Y% W6 NVAR3:=MA(CLOSE,2);# o6 l8 J. P- \
VAR7:=REF(VAR3,1);2 P0 U2 @6 Q4 Q {' u# _
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
0 q7 J% K; E; f, J# P/ ^! H3 x预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; 8 ], t+ c, p8 ^6 s5 V- d6 u# j
短底:5,LINETHICK2,COLORBLUE;
7 W; i% `1 H. g. p0 N$ k短顶:43,COLORGREEN;
. T8 O3 I' {8 w; _绝顶:60,LINETHICK2,COLORFF00FF;
$ k: `1 l2 w( w8 Y5 k6 v6 N3 iFILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
/ O+ A" n3 g B, H; E1 eFILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
3 A! Z6 M: p# Y9 t7 }
: s6 K: e" l1 g K* n! {/ F) ~/ p+ |) |" M; e% H+ `! |: t1 l
通达信版& i# q+ f, C6 e1 _: N6 N
{M 1 30 3}7 H2 T3 \/ u6 W" L1 B& H; W$ w
VAR1N:=1990131;
" X; N1 H& U4 ?& v+ A) a& mU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);- f( D s* ?% C" r1 G0 T/ |
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
. Y7 \: R( {, }5 @. ~. f神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
) z g, k& a7 o0 ?; }8 Q" w辅助线:=((DMM * 100) / TR1);
3 K/ x$ r9 r2 ^: h5 z" ~/ b动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
1 n1 w5 h' x7 u" F0 ]: dADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);1 f8 ~2 Y9 m* H# Q$ T( P
VAR1:=MA(LOW,1);
/ [; R4 W1 d+ U k HVAR2:=MA(HIGH,2);9 _" c2 a q6 q/ V5 M' e
VAR3:=MA(CLOSE,2);
0 Z# Y# @& `' r1 n& cVAR7:=REF(VAR3,1);; @! j; K5 K1 m3 Y- a% W- n
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);6 t) t2 H6 l) e
- x6 t: l$ \! L) d, Y7 G
短底:5,LINETHICK2,COLORFF3300; ! V& r' j* o8 @
短顶:43,COLORGREEN;/ ^9 n% }1 Q! t$ E5 x/ Q1 G$ L
绝顶:60,LINETHICK2,COLORFF00FF;
9 V' W( t, U1 T! ?STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;4 y& _0 N4 E9 U8 T8 S% F; D
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;9 _8 U. A* P# @0 b. U, U
神偷线:神偷线1,COLOR00FFFF;
3 v* l3 {3 v2 O8 I& p# |预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;+ ]1 B4 k7 U, u& t6 Y
) _6 y% |& K0 o4 ]
* A& ~4 A D3 L6 z0 M( j' c$ a9 l" b飞狐版:
" k! c" W, R# S4 P! ~8 minput:m(3);+ a' \7 w) N1 N9 [
VAR1N:=1990131;
s1 {1 P& f* W- c1 @$ \4 k8 y5 gU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
/ v, o4 U# k _+ |( l* tDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
2 e& \5 l: ^4 s! f3 r神偷线1:=(((DMP * U1) * 100) / TR1);
6 c v& T, V/ p8 ~: Q- f4 b辅助线:=((DMM * 100) / TR1);
; O- p, W5 z1 T% n动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);: c, D; _+ U; l: X! ^) V( p' i
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);& p" Z' d7 _; u, d* v( Y6 O' Q [
VAR1:=MA(LOW,1);5 h+ X; a7 l5 | h- C
VAR2:=MA(HIGH,2);& g* i+ v) v! u" W
VAR3:=MA(CLOSE,2);
3 V9 v" D; o9 c1 R( RVAR7:=REF(VAR3,1);& c `" H* I1 X" {: P) i1 A
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
4 N: O1 _" x6 F$ v6 w6 g
e6 p8 t( b6 z# X+ o短底:5,LINETHICK2,COLORFF3300;
i9 q0 M6 r: C |% T& m8 a$ p) |; M短顶:43,COLORGREEN;
6 @% w6 r6 ~" A- `# h绝顶:60,LINETHICK2,COLORFF00FF;) W. a& @% {' U; [1 z+ C4 h9 R* q% t
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
% ]6 U7 c5 S0 ]+ Q$ KSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
! W8 o' y' S& r神偷线:神偷线1,COLOR00FFFF;' a- D# u# L: u0 o9 z7 P9 V+ E: T" x2 G
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |