|
源码如下！！
; t; t: L2 g1 n0 Y{M 1 30 3}8 [4 S+ @7 K* f- j! X. l
6 {- K6 z5 s; i1 bVAR1N:=1990131;
8 z9 w# a9 B' c/ F. Q6 Q' x" qU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
~( f: l, R7 F( [$ D& UDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
& {2 B3 i) m& ^( b/ r2 a$ y神偷线 ((DMP * U1) * 100) / TR);
1 t& M# H$ e" y# A! f7 L7 W7 I$ r% r辅助线:=((DMM * 100) / TR);
: w) G7 o6 K) v4 p4 a动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);* W$ C* X1 M! K. ~" g+ U
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);# V9 O# p) n& V f/ G) f) a; x% q
VAR1:=MA(LOW,1);
$ z# S) s1 c+ p: ]VAR2:=MA(HIGH,2);" N# I' o0 B4 S B
VAR3:=MA(CLOSE,2);8 `6 t! p8 \ D# ]4 Y( s
VAR7:=REF(VAR3,1);
$ v% R- U3 u% b9 v- H【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
) s8 X9 }; Z# I9 `% _4 @预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
) Y R& `9 h, e$ i2 N短底:5,LINETHICK2,COLORBLUE;
4 [, g# K' `" d& W- M短顶:43,COLORGREEN;2 m* n, V) h# f. h1 [: J
绝顶:60,LINETHICK2,COLORFF00FF;
$ Y2 T6 p. w% ~' O2 P6 [" MFILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
C# k, ~: f% w B8 F6 _/ [FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;4 X+ D* x" i4 W& H8 S! k3 v
3 P8 J6 p; V2 S9 l n5 V% {
& `- e. |7 G; ]通达信版
! N( ^. x9 j( r {! F( B{M 1 30 3}% r3 r. N% |! C6 S0 e( A
VAR1N:=1990131;- h9 ~, j& O# ?. A' X
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
' a9 E# i' [. W/ g) L7 C+ Z/ r! ]: PDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
' o5 ?& h2 J: `9 z5 O2 ]神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
( g* Q/ r4 W: A& k# f6 o+ |2 h+ F5 `辅助线:=((DMM * 100) / TR1);+ X0 V/ m' Y, U& N
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
; W, r/ j3 H2 y6 A$ w0 J X4 kADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
; v! n9 Y9 u% X+ ]" P- ]9 zVAR1:=MA(LOW,1);# e5 c9 X1 O( o! F- k6 W
VAR2:=MA(HIGH,2);
2 Z h4 b9 V9 |0 a- L0 F) ~VAR3:=MA(CLOSE,2);
# ?2 l) E9 v9 w) E eVAR7:=REF(VAR3,1);' E& v# s9 N4 f$ L$ _0 y( _
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
# {- K, ~: @* C0 p1 k; h8 p( K9 m* U. m8 N$ S
短底:5,LINETHICK2,COLORFF3300; " \( V0 D, G: [2 E
短顶:43,COLORGREEN;
9 q9 E- \/ R, ^6 G+ ^* J8 J9 `绝顶:60,LINETHICK2,COLORFF00FF;
) Y; c' Y, _$ N/ p% U$ p$ HSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;" S7 Z# _0 v; Y' }0 O3 z
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;" B0 y1 e9 i. ~ Z
神偷线:神偷线1,COLOR00FFFF;, {7 J/ v7 g9 R7 X- D0 | a
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
6 G2 C* |0 ^, c% J. ^2 A: @. e8 Z7 m0 U4 K/ m& r& [9 k. [7 k
% x) O! e: [" r" Z' ?飞狐版：
5 d+ T: s) [+ S1 |& A* S# Ainput:m(3);
9 s# p2 G$ q6 V4 W" eVAR1N:=1990131;! e/ f9 u4 m, D6 {& t
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
9 A7 J3 G' h+ _: d: A9 }, T0 BDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
5 S b: P" B; d5 W" }' T7 K8 V* m神偷线1:=(((DMP * U1) * 100) / TR1);" v& V+ i. S) F
辅助线:=((DMM * 100) / TR1);8 p5 ` n! p7 |1 [! i) l$ I
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);* k5 A M- u/ G7 x3 n7 W; Q- P
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
5 X. a1 `5 J3 }) S3 NVAR1:=MA(LOW,1);! h: q n$ c% F
VAR2:=MA(HIGH,2);# V; _& Y2 P. Q6 Z
VAR3:=MA(CLOSE,2);0 u$ o) z4 |3 V) x6 i8 u
VAR7:=REF(VAR3,1);& v4 p3 ^, }6 U: d/ t. A, j
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);6 m3 p/ S7 {! m1 [
& m& N \ U4 o; v7 p8 W( h
短底:5,LINETHICK2,COLORFF3300;8 b+ P; Y# j7 n
短顶:43,COLORGREEN;* l, k/ h! ?- |0 A/ ~* d
绝顶:60,LINETHICK2,COLORFF00FF;
+ W9 t' P' @, Q# l. F, @ C( x4 }STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;8 k) z" Q4 Z# z( }: I0 I m
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
" l ?. g% p, u6 }4 U r神偷线:神偷线1,COLOR00FFFF;3 n! r! b; ?# u$ p& J' Y2 l6 e
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37