|
源码如下！！
* m0 g) K" J3 H1 ~0 i{M 1 30 3}
7 H' \# q- c$ L5 ?' _
- b% Z2 B( y& |. g3 ?! EVAR1N:=1990131;
7 W$ M# b: m8 j6 x9 Q* w$ bU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
( i! [! ~8 m' t! `8 SDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
1 t5 v" w$ s, ^2 E$ t5 V4 w: G神偷线 ((DMP * U1) * 100) / TR);
( _. c8 ]+ g1 f辅助线:=((DMM * 100) / TR);
0 G4 j: J; W% n& i( B动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);( K! @; R& ~7 i2 N3 Z/ Z% r
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);9 ~% @& m& A* m: ~$ G
VAR1:=MA(LOW,1);
4 O* \/ l) A9 [VAR2:=MA(HIGH,2);
4 }$ D3 w% A3 S, U( d tVAR3:=MA(CLOSE,2);% {+ d" H* f* O6 ?( B" E
VAR7:=REF(VAR3,1);% e/ I* @* U6 h" b
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
5 z0 \6 b+ ]# Z' ~' A) e+ s预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; * B' h" ?) Q! E' [# m
短底:5,LINETHICK2,COLORBLUE;
- y' i! ]5 H$ O0 b5 U短顶:43,COLORGREEN;
7 l ~! U) H5 G* j1 q: C绝顶:60,LINETHICK2,COLORFF00FF;
9 f* Q" O4 ^/ }5 z" b) L( rFILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));- x. y. x. a' H/ U3 G! P4 f! N
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;* Z- k$ y4 b4 W. N5 `. q
[4 W, p1 k$ C a! a1 _0 N
0 u" q7 b- x2 X# u# m- u通达信版
+ d: z& V* {# n3 |6 O# }- H R{M 1 30 3}' \9 D* z% h- s% z* }, t! ]
VAR1N:=1990131;
5 m! O' U7 M6 J6 yU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);1 E0 o- l# G1 J+ d5 X4 E
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);1 R0 x8 c# }; t- ]3 f3 B% }
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;6 R7 o0 |, H9 v6 n. G' `" n
辅助线:=((DMM * 100) / TR1);% I- d% l, @" }0 F) e
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
& l+ C7 _$ M; ]' VADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);0 t! p/ x+ R: i& a
VAR1:=MA(LOW,1);
9 z8 b# R3 k$ fVAR2:=MA(HIGH,2);
4 R; P; o" _9 w1 @% Q. R8 QVAR3:=MA(CLOSE,2);
# h% C# D7 m# IVAR7:=REF(VAR3,1);3 Z& o$ G3 F& K& T* W* j
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);7 s7 `8 F* { ~1 J4 x. V
3 M: ~+ C ^ r
短底:5,LINETHICK2,COLORFF3300; ; k- h* T- H( ?' A
短顶:43,COLORGREEN;
" C& w7 D1 w: J9 f/ C绝顶:60,LINETHICK2,COLORFF00FF;
5 x& T& x) w7 V$ A, c: WSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
, B5 W3 i# ~5 P# |% ]STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
* v' @& Y' u$ s8 K神偷线:神偷线1,COLOR00FFFF;
: E5 P2 c& [0 f' R5 o预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
/ v( u/ ? u3 _/ n: D& h/ ?
0 `* ]/ |5 x0 c5 z8 ~6 ^5 }% V4 x0 ^; O" O& r0 p9 p g
飞狐版：
% P( I6 K5 L6 ?( l8 [7 ainput:m(3);% W! l' B, W4 g7 b9 E
VAR1N:=1990131;& L9 c( E6 ^( @; o9 D0 W
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
) \7 o( t1 \% G8 |, [DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);2 \' N" [" q+ ~) ~7 G
神偷线1:=(((DMP * U1) * 100) / TR1);. D$ i% }5 d9 o% V
辅助线:=((DMM * 100) / TR1);
* {2 f a1 X/ Y8 i动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);5 \5 n3 ~3 H2 y! c5 j" F) `
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);, f0 H5 }/ k s. E
VAR1:=MA(LOW,1);
* |0 A/ x. G" B U. ?4 k/ u$ N# KVAR2:=MA(HIGH,2);
_9 E8 w3 D7 yVAR3:=MA(CLOSE,2); T+ z9 k* Z7 T/ c* @) |
VAR7:=REF(VAR3,1);2 i6 `: c d6 q, Q* n; Z3 Y
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);% F* P, W$ H: s0 N4 D ?* F
3 f9 b9 J( ~7 g" W4 F5 J
短底:5,LINETHICK2,COLORFF3300;
& Z0 d/ }. o: A' s! U5 ^短顶:43,COLORGREEN;$ |+ x1 K& [4 b7 @
绝顶:60,LINETHICK2,COLORFF00FF;
- m9 [7 F! e6 U9 [; h! [STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;$ j5 v4 u! n. R3 a3 F9 T
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;+ b3 s6 ~" z' F8 |, ^# ^. M! C
神偷线:神偷线1,COLOR00FFFF;
# r4 r9 `1 N& Y* y( {) u5 w* J: _预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37