|
源码如下！！& k' J5 ]# e( [. J" X
{M 1 30 3}5 U% E) P: e- }4 B) Q1 @" X
4 x( z& S5 r, Y0 ]( b$ uVAR1N:=1990131;
: _4 s7 C3 _7 C# x1 F- f* b" E) oU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
* r' d& O0 X9 m' T4 tDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);, Q! p, y# {- d* _9 j- ^8 u
神偷线 ((DMP * U1) * 100) / TR);' }: k4 T; |! z
辅助线:=((DMM * 100) / TR);
( w S$ r& v7 M5 J( H动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);1 {7 H* }) |& `6 r- R$ u: N
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);1 h, d9 f: ?5 b* U
VAR1:=MA(LOW,1);
- [+ V# w$ C: o' G+ VVAR2:=MA(HIGH,2);
( L" @$ L/ `, @; F% C4 |1 P* O j" sVAR3:=MA(CLOSE,2);' x. @) Y/ L3 |2 L
VAR7:=REF(VAR3,1);5 q$ Q2 f* L0 A$ L4 }5 K
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
! L. \9 m5 L+ \( u预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
; g3 N( }; a: `1 H1 n8 E短底:5,LINETHICK2,COLORBLUE;
7 i- H( v( d& B# T( H/ g( X短顶:43,COLORGREEN;
. F/ v* X2 i! E* m0 G8 m$ N绝顶:60,LINETHICK2,COLORFF00FF;; j, k* G6 J/ P( p2 R- v3 _
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));4 s l# e7 `" y; Q/ _
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;: U3 q$ }5 ?1 x5 v0 @+ C
1 e1 k+ a" ?+ e& D+ E7 H
* u; s" m I9 L
通达信版
# m" z6 L! j/ W# |{M 1 30 3}
- X4 C/ v+ @( a8 w7 u+ FVAR1N:=1990131;+ ^* G6 }6 d! F2 Z" P, \# _
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);( e3 X$ N8 A) m$ b2 C3 ` Z/ O
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);2 I( v8 P* {4 _$ L8 |: c( o
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;7 z- l+ b( k7 l/ N* x' ?
辅助线:=((DMM * 100) / TR1);9 }9 U2 m* T) X/ O, L( Y6 p" \
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
4 d# |! i! Y$ j- e0 U0 F0 P6 e9 T6 kADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
0 P6 C* b' N" o2 t: GVAR1:=MA(LOW,1);
( P% Q, L; Z8 w# q8 f# dVAR2:=MA(HIGH,2);' ^$ {8 _3 v, N0 q [0 a/ ~
VAR3:=MA(CLOSE,2);
$ s& Z4 v9 E4 j+ l `VAR7:=REF(VAR3,1);, z% i- `( `% Z0 p4 C
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);* M' G, Y, P' j& o
; H7 n) g& G$ }; B) A
短底:5,LINETHICK2,COLORFF3300;
! l! D0 Y/ P7 y4 M3 G, C+ v短顶:43,COLORGREEN;
8 O0 W: |$ P3 k7 A; {, j绝顶:60,LINETHICK2,COLORFF00FF;9 Q5 B$ \/ s6 d1 D' `
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900; b7 z* a% g2 F, g# C5 f
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;% x8 X' J3 `1 \6 ?& f6 S& J _2 L
神偷线:神偷线1,COLOR00FFFF;
; E' n/ k7 z( }: z预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
! I5 ~7 Z" b# C; o7 U9 c9 Q
) `0 j/ I; @) Y- m
. H% p0 Z1 @; V4 l9 |8 V( x, @飞狐版：
* R& x- x+ [5 w3 T/ ^6 @' zinput:m(3);
' L: X% z. ?6 \$ I* Q0 i5 | j2 F5 W5 OVAR1N:=1990131;" D8 h7 f1 g5 W7 O# I K& {) C8 K
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
; g W; y" f) |+ p$ q9 ^8 ?/ A0 ?& r: WDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);7 [ f$ E# q( d8 |- W/ v
神偷线1:=(((DMP * U1) * 100) / TR1);- W% W1 l. C. R* }( s j
辅助线:=((DMM * 100) / TR1);
0 R8 K7 Y6 ^+ K2 M- ~1 k0 b0 O+ a9 q动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
' W: o7 p$ a6 Z0 f1 j, ]ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
d: k a6 ?3 d' ]! N. ZVAR1:=MA(LOW,1);# W1 H( P, ?, [0 ~. a5 l$ ?
VAR2:=MA(HIGH,2);8 r: [; b0 ]0 l# s
VAR3:=MA(CLOSE,2);3 A+ E, ?9 g8 G0 y+ i9 e! T+ P* y, C
VAR7:=REF(VAR3,1);+ Q- j. M2 o8 u/ E
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
" Y, }' s$ ]) @; J5 W4 ~8 I9 g) K8 S
7 t9 |( j( X2 a6 ?7 `3 e7 E8 y. _3 Q短底:5,LINETHICK2,COLORFF3300;
) @, A1 c0 C7 [. Z短顶:43,COLORGREEN;2 S2 H# z$ w9 q2 V9 ~3 i u
绝顶:60,LINETHICK2,COLORFF00FF;
& d8 w+ ~1 D5 D7 L" l6 J7 i6 o% uSTICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;0 [# t. d) T' w Y+ R: A
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
; ~2 ]7 @7 n; @, k& i: R神偷线:神偷线1,COLOR00FFFF;4 d v$ k2 H6 @: B4 M7 V
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37