|
源码如下！！
+ C/ Z( X3 N" ]) m) O{M 1 30 3}4 U, I4 P4 r1 O1 z% g- d0 }
, M0 r* `6 B7 j8 ]% D
VAR1N:=1990131;; L! G: U6 Q- H) g2 f- X
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);3 q! f0 p: w% E% B
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5); Y1 \3 T+ M1 V! M) @
神偷线 ((DMP * U1) * 100) / TR);
0 e C. y: K0 U, o辅助线:=((DMM * 100) / TR);
! P; W" q/ ]# O' \' i7 U. q: j动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);' ]' z' v; o e+ F( f! w# c
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);5 d5 l3 P% F& Y! M8 w7 W
VAR1:=MA(LOW,1);4 B6 c9 B: P/ J* ^$ i3 U
VAR2:=MA(HIGH,2);
% L1 z! f L; c/ ]1 Q& p! \VAR3:=MA(CLOSE,2);
4 u3 ]0 T# |' _' X& o9 e- U* b6 FVAR7:=REF(VAR3,1);' M1 F9 U$ V* ~# O% z, r: k
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);1 I; b! f. Y# J* u! ]
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; $ o/ _+ h; k- t! d
短底:5,LINETHICK2,COLORBLUE;
9 T# b1 d$ ]* r' M- z8 }- r短顶:43,COLORGREEN;* U& ^" z; N. m% B& D
绝顶:60,LINETHICK2,COLORFF00FF;
9 H+ j9 U7 l2 p( s& F" |FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
/ V! O) d; N- W6 a8 t! |FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
9 p" D" m* Z3 e% C9 ~- v/ B5 y- w% [ F/ @; }* v
! x, J. `3 E5 @! V: I
通达信版
+ {: B: ~( S/ A- d% P6 n( ^; G{M 1 30 3}
9 s% E6 N" `6 S8 ?$ `5 N+ b9 K& PVAR1N:=1990131;
3 l7 @0 l2 N3 Z9 S/ M4 s9 aU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);/ o9 p- k" S/ b+ i5 S7 {! n9 G
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
# j8 P$ b s& Z4 O/ O神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;2 E F p7 S/ |; T2 J& w
辅助线:=((DMM * 100) / TR1);
8 L& }+ n, H7 |6 h7 W! c0 `6 Y动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);* y) M( M9 a! V5 v4 f8 ]9 c, V
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
! ~" Q* y) c( ]6 u* I( xVAR1:=MA(LOW,1);
* O" k% k) ^! e# z6 X8 e5 GVAR2:=MA(HIGH,2);
# F8 ]% W$ T/ R, j. S" w8 U8 V0 dVAR3:=MA(CLOSE,2);) Z& V# z% K @1 C* o6 H
VAR7:=REF(VAR3,1);
2 V* {" G4 s" D& P/ T, n# ?【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);3 z7 H$ |6 D* O1 j' E/ z
! ?+ B( T5 j; G# J! r( O
短底:5,LINETHICK2,COLORFF3300; : q0 i' v% ?, U6 U! r/ J. P- u3 U
短顶:43,COLORGREEN;
; f, M- W; Q4 x8 ?绝顶:60,LINETHICK2,COLORFF00FF;$ V) j6 R. Y+ A5 V) M( z/ N7 s# A
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
' E% z% t0 J3 u3 d- @STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;% O: C/ W4 y2 ?0 P3 ^
神偷线:神偷线1,COLOR00FFFF;
2 a: H2 l0 ?' o) ^/ a, R3 o5 o. }预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;5 x, G9 O$ y$ z1 x
2 E# g4 ^9 E% M. Q9 d" r. \4 k
5 W5 N& d2 r2 e2 ~/ J飞狐版：9 \! E4 \3 e L1 p/ E
input:m(3);, u H. a. u* C, W9 _
VAR1N:=1990131;) } O% s. U; L
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
% P( r, p. D/ {3 @DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5); k) _- A7 [# Z: k4 `5 C! D) E
神偷线1:=(((DMP * U1) * 100) / TR1);
9 c. D7 C F+ Z, @" M: Z/ }辅助线:=((DMM * 100) / TR1);
- Q) {( h- Q7 h# q/ ~- h动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
- r# h, N6 j, ~; p; \; sADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
* v6 E3 a8 g! W7 CVAR1:=MA(LOW,1);) B" B) T! {# G; ~3 W P& R2 r
VAR2:=MA(HIGH,2);
1 M9 j8 m$ T, ]0 p' _4 v% HVAR3:=MA(CLOSE,2);
8 y4 X h$ X4 O3 e0 K- X& BVAR7:=REF(VAR3,1);
; _2 Y8 M$ \. e4 b) b& I【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);" H* ~+ J1 ?" F, Z; f
9 Y2 k# T7 h) V6 z: S3 m3 l/ G
短底:5,LINETHICK2,COLORFF3300;$ h: E( X. S; b0 J$ w0 O" \
短顶:43,COLORGREEN;
) c& R {/ L. D# a绝顶:60,LINETHICK2,COLORFF00FF;4 I/ R( W5 ?/ r
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
5 Q# I8 q; N c2 OSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
) R6 z/ h q# r( Z, K神偷线:神偷线1,COLOR00FFFF;
# k9 B5 I+ [- f# L7 E预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37