|
源码如下！！! D& f7 J) r2 i# Z8 \1 z( A1 L
{M 1 30 3}7 a- p# w# p+ h% P
. R2 m, w3 N1 V3 S( L/ \
VAR1N:=1990131;
1 v2 x$ \4 y4 C# SU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);& {( r, O" h$ O' a3 t
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);; \) }5 ]% y5 T
神偷线 ((DMP * U1) * 100) / TR);
2 G% u& v0 |- }" F) P7 j; v辅助线:=((DMM * 100) / TR);
- ?, E/ @8 x% ]% `2 B5 R7 M动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
# p) K; T5 X% U; s( K$ kADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);2 Y+ O6 |6 O ?' Q2 s! D1 r; O
VAR1:=MA(LOW,1);6 J, R5 L& T& _. N, C
VAR2:=MA(HIGH,2);
, G) a! B# I: E7 [& kVAR3:=MA(CLOSE,2);
! C, ?2 j, h* `& a5 `! \VAR7:=REF(VAR3,1);
, }/ }( W/ k# P* G9 I5 E2 ?: U【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);; H5 \8 Q6 B6 F# v/ e# r2 v
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; - I: G8 F3 ]6 u# H$ {& I4 z
短底:5,LINETHICK2,COLORBLUE;
6 d8 ]7 n0 p2 p+ K" @; T4 w短顶:43,COLORGREEN;6 V0 l; {9 A9 d# E1 l( m7 d
绝顶:60,LINETHICK2,COLORFF00FF;: \2 `2 d/ @- a) ]+ R
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));: r+ F3 R5 l M7 B
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;. { \0 l6 M1 f
: x. [2 ^5 p& R, t7 S9 }4 S4 n( Z/ t5 `! x9 ]9 E" ?
通达信版
3 a4 k. q0 j' s{M 1 30 3}/ C; g7 I3 y3 d' A" H9 Z
VAR1N:=1990131;2 W: G* s# c9 _
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
" i* c6 x8 a7 y1 ^1 dDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);: q8 s2 p: k' F% N0 ?6 J
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
2 O( U" A. J1 s; T- F" ~- k5 x辅助线:=((DMM * 100) / TR1);
" o( f9 l6 J; }8 h v# Q- y动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
h! P/ x; T: d# ~; R6 \ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);5 W+ D+ `6 O# |+ Z7 b
VAR1:=MA(LOW,1);7 X; L( G9 H7 x1 K. \ d$ J
VAR2:=MA(HIGH,2);! Z- i* z* ~* @& |) Y v! d6 G
VAR3:=MA(CLOSE,2);
% U# I8 M2 C" w/ mVAR7:=REF(VAR3,1);
5 p$ e( I: s0 [5 m# h5 T; ^' x【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);7 F' m2 S+ z! z, z7 G
4 d# M n. J3 D/ v, m2 m1 [. R短底:5,LINETHICK2,COLORFF3300; 3 Y& S2 V( e2 z8 t( G% e9 q
短顶:43,COLORGREEN;/ g4 b! n3 Z" Y R
绝顶:60,LINETHICK2,COLORFF00FF;
# D; q0 d0 f# F& RSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
2 Q2 D S: q( k+ B! [STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
$ _+ N1 N: M, p神偷线:神偷线1,COLOR00FFFF;
( @3 v8 K5 R5 s, o预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;, W9 q7 @9 ] B. f. G6 w' O
& w" U% W0 Z0 S4 F
3 }/ Z9 f2 o1 `! x飞狐版：5 }- i$ ]2 Z: q, E% U! H9 l
input:m(3);
2 U% o6 g, v* w: m' qVAR1N:=1990131;
6 ~2 Z4 q6 _* X9 ]9 `9 n" MU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
: i. ^4 i( A+ Y+ wDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
! ~0 R- Y) [/ j% P4 j神偷线1:=(((DMP * U1) * 100) / TR1);3 _7 I# ^" ]+ {8 w3 s D
辅助线:=((DMM * 100) / TR1);
. f" }5 ^9 u5 S1 v5 d) w动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);+ l. j* c) o3 I! g" p+ K+ Z1 @
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);' y, D' I$ c: D* G# m: q
VAR1:=MA(LOW,1);
2 D) |3 D" c& k" ?VAR2:=MA(HIGH,2);+ T/ |6 D) E f. ~+ s; c2 Q
VAR3:=MA(CLOSE,2);
$ g( B4 r* u% C5 VVAR7:=REF(VAR3,1);& Y6 k' d3 p% O: {
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
, J1 n# E" {; d" M# E. O+ o2 q! v4 Z6 W G* a
短底:5,LINETHICK2,COLORFF3300;" L1 g7 Y+ e/ ^' `
短顶:43,COLORGREEN;; @% O8 B! k, q# F& Z; w
绝顶:60,LINETHICK2,COLORFF00FF;) w9 G, Z) r7 S
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
' V+ _+ L, P2 |2 _6 k1 USTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;9 K/ C7 f V6 |; i5 P9 F0 y; Y5 q
神偷线:神偷线1,COLOR00FFFF;
& e0 {. y5 n/ t8 K4 {预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37