源码如下!!
. E. i: T* `3 L2 B{M 1 30 3}
1 v+ h) v, e& o3 U$ U) T8 Q& E5 o0 R6 c1 z- }9 @
VAR1N:=1990131;
3 v V" P9 ]% p- u* {" S% d. PU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);/ U _) \7 R! @8 x) W, N; l
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);, s6 z- s7 n6 M: Z
神偷线 ((DMP * U1) * 100) / TR);
7 ^3 r% j3 s5 M4 o* b辅助线:=((DMM * 100) / TR);8 g* C7 \/ g0 l
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);$ [0 |3 p; ^9 S& M# {! i5 P
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);+ V' R& u9 Q2 B6 }9 U$ `6 N$ `
VAR1:=MA(LOW,1);6 Y! Y+ ~0 J* A3 Q
VAR2:=MA(HIGH,2);
; R/ m4 }: P( ^5 q1 pVAR3:=MA(CLOSE,2);2 O# u- P, U; A( S0 \
VAR7:=REF(VAR3,1);8 V; W% L" }9 ^( ~
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);" E4 Y2 v) ~$ b! H
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; - x% ?1 K2 F$ s; @6 |0 B( g
短底:5,LINETHICK2,COLORBLUE; * f1 m' i& {5 S" x$ F% Z9 i# x
短顶:43,COLORGREEN;
7 t$ G4 t% v9 {# R8 M绝顶:60,LINETHICK2,COLORFF00FF;+ O2 \# g- p+ G6 `% F7 P `- o
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));2 M {) G- F) c: M
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;0 T& P- p" L, A9 X: F! u# A2 q
$ m$ J/ H8 K) E6 d) Q, r+ j' M+ T: d3 _5 E( l8 A" T- S
通达信版
& o- q# n- {! \0 _{M 1 30 3}
8 q7 }1 `/ I1 [; JVAR1N:=1990131;: `* u8 }6 I' S/ M1 P( V9 I/ P o
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);+ w% W2 S* X. |, k4 P6 X, H! ^9 C
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);! j7 N, z! A2 m
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
1 q, n& ?+ M, x( `6 Y: J) H辅助线:=((DMM * 100) / TR1);
5 V) y- s- n6 O# T; ^! A动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
4 f0 B# I6 y! p$ N5 wADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
* G" h$ k: V; {VAR1:=MA(LOW,1);
6 o& G# N% z) }% [5 v7 h: GVAR2:=MA(HIGH,2);. U! h: ]- S$ j& k+ O8 t
VAR3:=MA(CLOSE,2);9 x: [- U% Y3 r- p& U
VAR7:=REF(VAR3,1);
9 m, I! Z( ?% ~# ]1 o. H【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
& T, Z5 T* q; m2 C8 N9 I
* ]' M3 C( u: e8 c2 P8 }! O短底:5,LINETHICK2,COLORFF3300; 0 s2 _" s1 h( Z8 l3 `% w
短顶:43,COLORGREEN;
( V3 `% [5 ^, o/ }1 {绝顶:60,LINETHICK2,COLORFF00FF;
4 G# i% E6 W& V( \# \" F4 S6 x/ {0 _2 D5 ]STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
2 y2 e: W; X9 H* b9 cSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
7 t$ Q" y I! w) W6 U( r神偷线:神偷线1,COLOR00FFFF;, w( A! H" O% u7 E
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;* A* q" U4 h* c3 I4 H/ Y$ i
* E5 o4 U- A/ B1 T% v v. i
7 D2 K. i! V( f8 x! }飞狐版:
1 X) f" l }. j M+ i$ `input:m(3);7 p* X, R% e+ B q' S9 f3 C- D5 p
VAR1N:=1990131;
# h. [5 p' d/ H) H8 O4 I% kU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
* |7 E( A! U/ h. e$ tDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);" a7 |9 A8 T4 k+ r4 k+ j* x
神偷线1:=(((DMP * U1) * 100) / TR1);+ e: o% L: p# Q! N* O$ q# e" v% G
辅助线:=((DMM * 100) / TR1);
% Q+ ]- ~* A4 p* ~& {动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1); ^. a* i$ d$ b* |( |: a9 ^
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);" g" N5 M% g: }$ q; `5 c
VAR1:=MA(LOW,1);
% L/ Y2 |" w" Q; fVAR2:=MA(HIGH,2);
! Y4 R4 r0 D7 A" j+ cVAR3:=MA(CLOSE,2);
/ @7 F, h3 i- a# `9 N$ UVAR7:=REF(VAR3,1);
1 ~% F& u! ~" @- n$ o【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
0 v" v0 d# i5 T: D% P: p6 Z
& H% z2 J! n: \0 s& M/ U# S) ?' K短底:5,LINETHICK2,COLORFF3300;# f$ h8 u) {" }! i# J
短顶:43,COLORGREEN;
3 B7 O0 l7 C8 [3 A0 ?绝顶:60,LINETHICK2,COLORFF00FF;
: T$ l$ H7 G% r4 j7 D) L9 h' ISTICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
$ h( f8 \) X3 v! Y+ M! y8 ?, tSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;9 h9 J9 A! n# V7 {4 T
神偷线:神偷线1,COLOR00FFFF;
$ s) t2 l, ?4 d' D: f3 \预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |