|
源码如下！！
4 t$ h. R- \+ @' \8 `! \# d{M 1 30 3}
# o/ {6 p2 P4 g) V# r" G1 D2 x, Z7 ?. N/ |" |' }. c, t
VAR1N:=1990131;9 Z; h- }" c H8 B; a, R6 S/ T6 f
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
( V7 y4 h4 M7 B$ k) P' B0 kDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
4 u7 {2 m; E% z1 j( d8 w神偷线 ((DMP * U1) * 100) / TR);3 K3 T9 I! L1 W8 d! v4 h; j5 ^$ i9 g
辅助线:=((DMM * 100) / TR);
) U$ v9 s5 O# m" W4 @9 W, D* k4 O6 [动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
4 T4 K0 ]6 T/ i: C2 k% bADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);- r- A4 V; Z5 E" m) E0 _
VAR1:=MA(LOW,1);; J* p( b E- @+ H6 g# Y6 q
VAR2:=MA(HIGH,2);
7 f# ]5 W: c# z+ `7 ~VAR3:=MA(CLOSE,2);
; g! W. L6 n. wVAR7:=REF(VAR3,1);
( }2 k1 n+ ~( \+ X8 {【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
& u. P, p) X+ u: z预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
7 K8 K7 d! s) ?( A短底:5,LINETHICK2,COLORBLUE;
0 ^* [ S: S+ p7 Z$ ]. D短顶:43,COLORGREEN;3 P8 a( d3 C% x
绝顶:60,LINETHICK2,COLORFF00FF;' e4 c b* h# q- e, ?
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));1 Y9 V" i$ Q2 p. _3 y0 _0 r
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;6 }2 W( l4 H$ Q* c5 k! [
U" E4 z* U8 j) x& c0 W8 Y" r8 G
' f' |0 l& t' `
通达信版2 L; @1 Z8 [7 G. F+ f! `8 i* B9 C
{M 1 30 3}: p" L7 s q3 I4 `! I# M; l: E
VAR1N:=1990131;9 W9 l% }$ X! I+ q# G2 z( g* G
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);0 h$ Z5 v- M+ \+ a
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
) P6 J1 E6 `# V. P, v神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
2 ?7 r# V8 x, \. g l辅助线:=((DMM * 100) / TR1);& Y' Q( U: C3 |* q" c; i
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
; U0 ? m q0 y: _, f0 I; jADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);: J$ B% p9 O( u3 ^6 j7 h
VAR1:=MA(LOW,1);
! U1 J5 K; J( g4 I+ [VAR2:=MA(HIGH,2);
2 F" P3 Y) x# W4 ?5 R3 T2 g" VVAR3:=MA(CLOSE,2);
# m# M% o4 [# {% p" p8 c- S2 _+ j# BVAR7:=REF(VAR3,1);
1 D3 a6 [7 `! U# {【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
, u9 l9 y& E! F1 Y( i: c$ @4 Q
/ E' S' D4 n% h5 n4 W! E短底:5,LINETHICK2,COLORFF3300;
% _' x( c- W, j短顶:43,COLORGREEN;
3 q7 M# q8 R6 f+ F0 O( q! `绝顶:60,LINETHICK2,COLORFF00FF;) g6 [/ V9 r) _& } n% T( `0 Z
STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
! _, o. S* M% `+ x; T9 d( a0 W: dSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
( r! i9 s) X& p e; Z- V. n神偷线:神偷线1,COLOR00FFFF;
- l' |/ ?2 b+ D, f4 \- [: p4 k预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;( a6 H+ G! p( d+ ^" d) W
! W6 j% a+ [' B. v& l- p: _
2 m, z4 b: s; w" t9 l. k飞狐版：% R/ T- I M& G. H+ Y$ P
input:m(3);: M' V0 f' k% b' t$ ?
VAR1N:=1990131; g/ K* _/ g% W
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
, J/ P+ q( ^( p9 TDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);& j9 D- L" y" j
神偷线1:=(((DMP * U1) * 100) / TR1);
( m- q3 Z. B, z- }0 n# N* d7 k @4 ^辅助线:=((DMM * 100) / TR1);
" y; B1 q4 i. E4 ^( e" u+ D动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);9 B0 ?7 R; v8 A: \: B- n( ]! Z
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
" h& }8 n- B9 e% N( Z# a4 IVAR1:=MA(LOW,1);9 g; l1 ?; g' S o- K
VAR2:=MA(HIGH,2);
a; K( N% |2 Z% r! V: ]$ h0 J& UVAR3:=MA(CLOSE,2);6 F: u4 u; m! `7 c2 Y+ s. {
VAR7:=REF(VAR3,1);
7 }5 T( q$ Z* R【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
" V+ G4 Q0 Z/ {- |7 y# I& Y/ C
短底:5,LINETHICK2,COLORFF3300; V0 z8 {. B9 l4 @+ B# }
短顶:43,COLORGREEN;; E; x' V" w( }2 I T
绝顶:60,LINETHICK2,COLORFF00FF;5 u8 e, Q. m2 P5 ~" A
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;) h x( ^0 F9 ~9 L# l$ e4 N. e; k
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;1 o6 t3 [ K7 I% K0 h& s Y
神偷线:神偷线1,COLOR00FFFF;
; ]9 |; W% y( |+ G2 ^预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37