|
源码如下！！3 P j7 Z6 e9 m
{M 1 30 3}3 W$ r* O7 o( c. S: h" n# g
& u1 J2 p: K/ z+ x3 g; I2 ~* @VAR1N:=1990131;
5 ~5 y. b4 i: l- n7 LU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
6 q: w" @2 Q# W: zDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);7 O7 g* z. c: n: T' E) {
神偷线 ((DMP * U1) * 100) / TR);
/ E6 e( a2 X8 g( o辅助线:=((DMM * 100) / TR);
' f* S9 q6 ^$ N k: s动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
9 s: l! ], G* Z! t' GADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
2 v! R3 g, B- TVAR1:=MA(LOW,1);
2 K& H( q$ H' U( E8 {VAR2:=MA(HIGH,2);; d. M1 T1 V+ D+ Q* ?7 m2 |2 L
VAR3:=MA(CLOSE,2);
. ^. Y/ h% E* J1 QVAR7:=REF(VAR3,1);
6 |* U& D [) {0 q3 X- x【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
4 t! y- d# c. Z0 p2 s3 U+ v, }8 L6 m: g预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; " p# H: w- {; z) D3 r& z
短底:5,LINETHICK2,COLORBLUE; : L8 i w5 k/ P, ~1 P! g
短顶:43,COLORGREEN;* ]5 m6 Y. p5 S
绝顶:60,LINETHICK2,COLORFF00FF;. J. d5 r* ?, } f" D" X, m# A( Y: ^
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
. l% |# f/ t$ T4 XFILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
% X3 E; B' f+ `
+ C% C% C5 l$ a2 f4 H7 h2 x5 O N, J+ M
通达信版
4 v+ V9 v; \+ e) l. c. h/ S{M 1 30 3} ]' ?1 P0 }3 d# ] m3 _% f3 X h+ z
VAR1N:=1990131;8 D, ]. D2 r1 k% n( W
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
8 x7 i# s4 r" m: H( _2 ]& vDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);+ k, U1 W! s& @. T. E4 o+ j( k
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;1 E5 k! t: m9 b
辅助线:=((DMM * 100) / TR1);) B: Q& J# s, j: z9 H5 M
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
9 E4 t2 K8 n2 M: }- B4 xADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);5 p' G b" S7 I
VAR1:=MA(LOW,1);+ o g. J0 }" j" o
VAR2:=MA(HIGH,2); U, H2 y. u: q# Q+ z$ w3 ~
VAR3:=MA(CLOSE,2);
! h5 h8 ~% A. i- ?2 @VAR7:=REF(VAR3,1);
. ]1 ~) o% r, \6 A$ m) [" z# D, H【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
* j$ m( |7 x( }! P
: A) d1 O1 L" p y6 O5 U5 ?短底:5,LINETHICK2,COLORFF3300; ; n5 ]1 k1 Z9 M8 g
短顶:43,COLORGREEN;
) D% E/ B b& N. w( U绝顶:60,LINETHICK2,COLORFF00FF;, i& a, w* ^8 }. h
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
2 [% }5 z) V9 \8 c9 `3 @0 PSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
7 Q) W+ v9 V5 ]9 ~9 W" W% @9 t) y1 _5 q; i神偷线:神偷线1,COLOR00FFFF;
1 J. ]# o* @& F P" _预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;1 J1 C' b" r V$ l4 Q- ^! A
5 k3 P& B2 y" a) ~- d$ T( P! [# h2 o8 T1 B1 x: D
飞狐版：
& _' R3 v# J5 E' Minput:m(3);
& H2 \8 T; z8 j' pVAR1N:=1990131;. j& l9 Z: g+ I0 m8 Y$ S Y& W
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);$ E2 ?0 F* p9 a( Y# h+ T( b9 s; T
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);' M2 M, g4 R6 ?* p9 O7 E4 M' T
神偷线1:=(((DMP * U1) * 100) / TR1);( u- s7 _4 u8 d# ~7 T- \; D
辅助线:=((DMM * 100) / TR1);
; G+ g+ b. a& Y; v+ T4 B/ {4 m' \动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
* a/ E5 p4 T* h5 s# N4 u+ |8 LADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);* w* w: D1 L! B" t( m8 q/ J- H
VAR1:=MA(LOW,1);
4 P; u X' m1 m1 `0 ZVAR2:=MA(HIGH,2); \4 P0 A, j) J8 ^2 w
VAR3:=MA(CLOSE,2);
( l2 ]6 a8 b- Y# \$ F% b3 L* cVAR7:=REF(VAR3,1);* n3 h, }, x' {5 f' F% Q
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);; D& d' z. _3 C; X! X& P4 ^; b
- z* }! k& u) z6 J+ ~' x
短底:5,LINETHICK2,COLORFF3300;
4 ~: b# r" ]; @3 u, q8 f6 A' r短顶:43,COLORGREEN;
$ W" A6 _) M, ]2 E( M* G绝顶:60,LINETHICK2,COLORFF00FF;( {) D4 Q: [5 |" {! f' r" C6 N
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;; a$ h& o6 i9 Z9 W6 v
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;7 r* I8 g5 V6 C; f% t
神偷线:神偷线1,COLOR00FFFF;; v5 p# ~% u$ P" k# x8 g3 [6 y
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37