|
源码如下!!4 E Q7 Q# ]5 s U. l# Y, i
{M 1 30 3}6 F' p# g' L! Y1 k1 _, @
# @3 v/ W' f9 T/ g( }. Y1 yVAR1N:=1990131;
; Q; j& ?% c# z7 W2 dU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);8 N, L3 b3 ^6 y. D# y) a& r* B
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
* P7 g* h* A$ p" @+ y! ?神偷线 ((DMP * U1) * 100) / TR);
' [" Q; f/ o. ^: q: Z9 I& N辅助线:=((DMM * 100) / TR);6 r7 U; k% F0 s# l
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
3 V+ P( X5 [& N* T. h) g2 CADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
% M5 g, {- S* {9 qVAR1:=MA(LOW,1);
( D, a8 E7 A2 h4 SVAR2:=MA(HIGH,2);
* x/ }% _3 W9 A. _6 ?" sVAR3:=MA(CLOSE,2);( l; x* b! l# O1 k
VAR7:=REF(VAR3,1);: t+ M4 M# [; _" C6 ^, M( y! N
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100); y" B. R5 e# \0 s% q" w7 k% s1 w
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; 8 n5 D! F# F6 T3 ?6 ~6 r- W+ L
短底:5,LINETHICK2,COLORBLUE;
* J, c ?3 ?, v1 F! I3 t" i短顶:43,COLORGREEN;
P' O5 `6 e( V- T* G2 o绝顶:60,LINETHICK2,COLORFF00FF;3 `3 j) V5 p1 Q* Y
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));1 V% w8 m6 u/ ]2 {- T1 H
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;$ S1 Z4 j- z$ V; V6 d! j
% q$ R S) r5 g% _
* n6 b1 z" v- n; F, G/ v0 I9 k- s
通达信版
; F2 B: Z+ b( z0 e# w2 @{M 1 30 3}
" h) E& x! f; \! h) H/ ZVAR1N:=1990131;# d; d2 S9 I5 M1 L7 g4 J! o) T
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
8 U/ R2 ^ O' n, w8 RDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);1 S2 n% C4 A K5 J/ q" l
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
|' [ [; s- v辅助线:=((DMM * 100) / TR1);
+ x5 n. G9 e. Z. s7 i! g* M! y动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);2 p2 m5 |2 y: }5 [4 O
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
6 o# p% n' `. t. r7 V* u0 TVAR1:=MA(LOW,1);/ H8 V% A7 X2 D1 _' X) S, G
VAR2:=MA(HIGH,2);) H( i$ D% _1 g2 a
VAR3:=MA(CLOSE,2);0 y) Z2 h; O& x3 I1 F; Z8 O- `
VAR7:=REF(VAR3,1);* i0 k: P R9 h+ K
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
& L( j- ^ Q | A" F8 [
9 u" j2 E9 q# }! q9 J短底:5,LINETHICK2,COLORFF3300; 0 \% K" C+ ~) l5 v
短顶:43,COLORGREEN;
' I0 I, E u1 k P绝顶:60,LINETHICK2,COLORFF00FF;
, v3 k, ?% J* X7 G$ @) B9 vSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;2 j t q: N; O/ K: L9 s* @: B
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
# Z9 J: ?( g9 }8 U5 e* X/ w) f神偷线:神偷线1,COLOR00FFFF;+ M( ~0 t; x/ m G1 V- K) D" _8 [1 s* \
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;1 n' a$ g# X- ~3 o( m" a: v
9 }0 x/ H7 g/ l/ a5 F& h- _7 ]& e$ n- L
飞狐版:
; A2 L$ J2 W4 T& a$ X% \! w3 M* Xinput:m(3);
- b2 T( T3 m$ ]# j u' y8 [9 E; UVAR1N:=1990131;
8 U6 x1 {7 B! _6 OU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);! o: G6 W2 U2 k/ Y7 ^5 R) X$ L' J& H
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);. A9 ?/ @" ~# p8 Y# k
神偷线1:=(((DMP * U1) * 100) / TR1);* s8 F! g% q( m% E
辅助线:=((DMM * 100) / TR1);
2 _* [3 p0 @& n2 D3 k7 k" d动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);( X3 i) D0 H3 B! B' ^: G8 e7 D
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);: w d4 P" D! F0 |" d6 j. S* T
VAR1:=MA(LOW,1);
~! J& z0 ]' n8 z+ E1 w/ }1 ]VAR2:=MA(HIGH,2);9 o( I% P0 J" r W% a- t# F: f( G
VAR3:=MA(CLOSE,2);( D1 l6 `% I5 o
VAR7:=REF(VAR3,1);0 @+ h( C. Y7 g& s @) `
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);3 R. b; t, l) M0 J5 d! v4 Z# t
* [( R1 l& n4 J! G; W2 z9 @
短底:5,LINETHICK2,COLORFF3300;; U9 z: Y; c7 C, w* J: Y# h0 u
短顶:43,COLORGREEN;
0 b' A) S! [2 n/ c# s* }( Y. H7 d绝顶:60,LINETHICK2,COLORFF00FF;6 x! L4 z; Y7 N$ B7 e! h9 B
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;! K. H5 V# T5 _) _" @% G# K- X
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
* T+ m$ b6 ~- y4 w, X4 P神偷线:神偷线1,COLOR00FFFF;0 S1 H8 A8 w, Q4 F3 d+ Z6 v
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |