|
源码如下！！: J/ \5 u+ S% r' C# g7 e
{M 1 30 3}) x6 h' C" d& ~2 w( p u! P0 h
% u: d+ b$ K9 y& i' @# E4 O
VAR1N:=1990131;7 l3 E$ i' ]6 _2 ^$ L. S2 F6 q7 N
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
' g T$ p& A& S* c0 L% UDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
/ ~$ |" @ R2 i% \1 W% I神偷线 ((DMP * U1) * 100) / TR);9 G7 Z2 R; G5 h& G) O, a* o
辅助线:=((DMM * 100) / TR);, Y% ^ T) W. D, ^
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);. H6 j4 f( R* f$ j: m1 @: {
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
& b7 F5 D# k6 y' v8 a6 m: {VAR1:=MA(LOW,1);. _- P9 O# _$ Q' j
VAR2:=MA(HIGH,2);5 `' s9 U: N( m; s3 i+ Y
VAR3:=MA(CLOSE,2);
4 Y h7 G- e2 dVAR7:=REF(VAR3,1);
' I/ w3 A+ n. ]5 n【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);& P1 A3 g6 j: x6 n" j3 B
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
- N$ |6 E o7 C' s; f0 q& [! a短底:5,LINETHICK2,COLORBLUE;
1 F/ B! J" d& G" u u短顶:43,COLORGREEN;1 I3 E# Z5 P' k0 w2 ~
绝顶:60,LINETHICK2,COLORFF00FF;5 L7 I% d1 g) T4 Q5 W9 N$ ~/ ?$ q
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));( B5 f- N" ?1 z0 [4 V) g
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
5 A- _: N) m1 e% b( v" Z% o" R- L S/ w
8 e+ A o- V6 q通达信版
# Y+ o2 P+ U& L0 b* ?; c S2 N, N' b{M 1 30 3}6 g8 q X+ D, H
VAR1N:=1990131;
9 s. g; e/ T) i8 |6 |U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
3 S" e& E; ]1 n4 K6 p4 I8 `9 q' aDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
! @6 H: Z9 t3 G+ t$ z' |0 h神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
9 I/ f. ~9 v1 v) w& X辅助线:=((DMM * 100) / TR1);
7 V; Q3 l; M2 o; M3 N动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);! X1 Y. P' y: v* h) [& w B# r
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
. k: l; V p8 N& q; j- s& Y/ {. nVAR1:=MA(LOW,1);# g1 f. [* @" {# |# L; s. q
VAR2:=MA(HIGH,2);
& _6 e/ W9 V! ^) C IVAR3:=MA(CLOSE,2);
: E% c; t: r& K1 |$ {0 \3 BVAR7:=REF(VAR3,1);. X$ h9 m; n7 W. q; v8 F- p/ g$ q6 u
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);$ _7 h; T- [3 r4 ?
( s( H) y% x7 d
短底:5,LINETHICK2,COLORFF3300; : s6 ?$ C6 P& K+ M
短顶:43,COLORGREEN;8 J" q# H. N1 n; a9 `
绝顶:60,LINETHICK2,COLORFF00FF;2 O8 _' d/ T% p0 W* ?2 F( W
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
& q9 {" r: P2 z |, K6 @STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
: n9 ^0 ~0 H/ M% w4 a神偷线:神偷线1,COLOR00FFFF;
6 L6 u' E/ Q- z1 T) J" [+ @预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;; A1 O3 M- z( b; d
/ s( ~+ H/ `/ m
7 L Y( N( f* i2 E& Q3 v- T+ o' T飞狐版：8 }1 ]4 V5 \+ g1 j a' E0 E" `
input:m(3);3 `2 M4 l4 C7 x& E" o) k
VAR1N:=1990131;/ t: [+ D- z V1 P' n
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
0 @) K* K5 h. D9 A) f- }9 F A _) _DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
- ]+ k. f2 u9 i- d1 m& ?神偷线1:=(((DMP * U1) * 100) / TR1);4 U# Z. z$ j: j; g0 _; w2 m
辅助线:=((DMM * 100) / TR1);
& v/ E- |& [( |* h动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);7 J# z1 c9 |! }# |' b* y
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);8 Z9 u6 P' T( @8 o1 ^, B6 y
VAR1:=MA(LOW,1);
# f; u9 v4 a& M, QVAR2:=MA(HIGH,2);
) w& ]! @4 K. }4 VVAR3:=MA(CLOSE,2);; j+ B+ V) J( k/ }2 c6 m$ L
VAR7:=REF(VAR3,1);+ B. L1 D" | q z# [4 r
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
6 J! ]9 _. K6 m; c. M) [. c* q6 g* \$ l! n5 ^: A
短底:5,LINETHICK2,COLORFF3300;
, L0 W1 D* N- J1 t. O9 t8 T1 Y% P短顶:43,COLORGREEN;
9 t% [% F+ v* n9 \绝顶:60,LINETHICK2,COLORFF00FF;8 n! |5 A @* N
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;' J- K: X ?3 |$ }, v
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;1 C. J$ i7 t8 b6 }9 v& I9 h) Z
神偷线:神偷线1,COLOR00FFFF;
! d: t4 y+ f- q, \预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37