|
源码如下！！* @8 ]. F9 H: O
{M 1 30 3}
( j' a+ a3 X& A E- u: o" g: P, P: j0 [0 f, l
VAR1N:=1990131;
4 N# \& ?- |, ?9 B9 e1 AU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
8 x5 A( b" z8 b% X# K# cDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
- J/ g0 s5 O0 p神偷线 ((DMP * U1) * 100) / TR);1 d2 @& C3 k% @7 g6 Z
辅助线:=((DMM * 100) / TR);
& O0 L- v+ i2 O1 V动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
/ ?/ E7 G" [/ yADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
9 [9 G+ a7 b& w7 u) b$ rVAR1:=MA(LOW,1);
7 d+ ~/ D# b: ~3 P3 TVAR2:=MA(HIGH,2);
8 v1 y# ~$ k: ? B1 p8 L2 B" ^) AVAR3:=MA(CLOSE,2);
, g) S5 w* T E4 g' Y' h( V2 jVAR7:=REF(VAR3,1);4 G. A. J+ u/ j" ^( Z* e
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
8 T, y% i, U" {# o预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
4 U8 V' n4 z2 ^6 b* R- ]/ U短底:5,LINETHICK2,COLORBLUE;
; ^0 F8 N8 q+ L; i+ w+ `6 R8 C短顶:43,COLORGREEN;
! m3 c. W$ S h% Y3 j! J) i绝顶:60,LINETHICK2,COLORFF00FF;2 T: P! l5 [$ G# c7 c0 w
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));% A- m H6 u9 G. s4 q
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
. e9 `7 l# Z9 J Q; ~. f) o7 Y; e7 m4 {7 w5 s! X0 z) s' O
! f; g7 i% @2 z M6 x
通达信版+ q5 } g, c6 k; i& v# V. H
{M 1 30 3}
; U3 b% I \3 [. j# x' s4 ~3 \! L+ vVAR1N:=1990131;6 W9 v, A+ D& m" }$ W ]) c6 e
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);. |# W# _2 v9 Q. S/ a* a& S
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
5 p2 C/ t0 j/ n3 i) f& Z# M8 [; X4 G- o神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;, r1 N1 f! f, L3 c; O
辅助线:=((DMM * 100) / TR1);9 e6 p+ O& Y8 @
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);7 X# ?# y! L* b5 s6 p
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);6 E9 j, s) o1 \ S' e* g8 ]2 @ b
VAR1:=MA(LOW,1);
! ?% S* S; i$ U5 GVAR2:=MA(HIGH,2);
1 [' e( L- }' V. p+ S) T5 w0 MVAR3:=MA(CLOSE,2);
7 y) c" `; M9 j0 I4 dVAR7:=REF(VAR3,1);
- g2 w4 c0 H! z/ V/ _) M【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
% ~! ^: k( I& }0 b* k* a8 f6 g5 o B- N
短底:5,LINETHICK2,COLORFF3300; ( ?5 r+ N/ i& W
短顶:43,COLORGREEN;
3 ?; g/ z9 E. g绝顶:60,LINETHICK2,COLORFF00FF;
" ?# X8 @" l4 J3 J0 g+ y) r ~STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;
6 @" W+ x' _: {4 v$ RSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
) N- ~8 B5 T( |% o神偷线:神偷线1,COLOR00FFFF;! j/ t; ^6 x! z) b5 s) J
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
+ U7 N X3 I' i
2 d; _& {! _4 S/ J% n+ y* a; s @9 V# A/ o! t6 r# F
飞狐版：7 }" [$ v3 i1 L4 a" n
input:m(3);
% u! [. o* |6 |* m- oVAR1N:=1990131;$ t2 S! x0 w7 X$ J
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
' ~3 C+ X, ^, u5 B7 g9 v' wDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
8 {1 u; x4 Z- q5 r6 a5 P3 T7 B神偷线1:=(((DMP * U1) * 100) / TR1);
1 j5 j+ J- V: e" i y8 v辅助线:=((DMM * 100) / TR1);! F( b0 N( ]1 R) l8 f+ Y
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);/ r/ `2 ]7 Q- A- @+ b6 H0 V
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);0 q/ w$ o6 x s
VAR1:=MA(LOW,1);
( Q$ m: u- {: C: dVAR2:=MA(HIGH,2);
1 Z. ~& {# u7 U4 L N |/ CVAR3:=MA(CLOSE,2);
6 [$ }5 [7 K" `' o' f! z% QVAR7:=REF(VAR3,1);
! w% M9 v! }- E# Q n: E【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);7 D+ i5 U6 f" ?: L. a$ K
: b( _4 d/ Y# {( @4 s( X& e
短底:5,LINETHICK2,COLORFF3300;1 a9 s% h% d3 m8 S) Z
短顶:43,COLORGREEN;" c; r) L- s p, O
绝顶:60,LINETHICK2,COLORFF00FF;+ I' ]) d0 Q# e$ ?; q; w
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
I) T) |6 r/ i3 E4 d% bSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;/ E! n7 `6 X" [+ ?7 q8 B: M) e9 K9 t
神偷线:神偷线1,COLOR00FFFF;
k& W4 e4 F/ @0 t6 R; x预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37