|
源码如下!!
, q" _: ^4 x) f. ~( }% P# f4 d{M 1 30 3}7 f8 ]4 x$ V' `5 j1 t0 h9 f
( i6 A6 |* F/ V" JVAR1N:=1990131;
9 J1 l) U0 X( }1 bU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
3 s( Z i9 \0 X# Q5 q7 XDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);3 ^8 l, _0 {, X
神偷线 ((DMP * U1) * 100) / TR);
4 \3 i- H. q; `0 G+ [' ]辅助线:=((DMM * 100) / TR);2 y3 H6 K3 T7 ] R0 `7 U- C
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);4 b$ b% g8 e' k3 {. K! f' _- k, a, P
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
. L' g8 u& X; F. `& S% \VAR1:=MA(LOW,1);7 k. i b- \+ x) v% F* \
VAR2:=MA(HIGH,2);
+ Y! |! `/ l1 y- l- U4 IVAR3:=MA(CLOSE,2);: L! y% E, f$ S$ J* Q- p/ F
VAR7:=REF(VAR3,1);! O- W( A) m9 Z7 E2 X5 E F
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
; X' l& H1 E7 c预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
) u/ h& D* L1 J3 X' h. c& b! _短底:5,LINETHICK2,COLORBLUE;
( z: L7 s+ Q/ V' A6 }短顶:43,COLORGREEN;9 n+ ]6 [7 O: D
绝顶:60,LINETHICK2,COLORFF00FF;
5 |; R8 E. N+ X' W9 F2 OFILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));* x+ k; D8 Z. h8 P
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;5 t% i5 c+ \8 \1 n/ s. C0 _
' w* w7 {) A0 i, D
$ D7 w5 M! |3 F2 J
通达信版
' |) W) d* V7 d4 ?' H) B{M 1 30 3}
7 A1 U, H& |+ Y- t/ B2 a% J* G, GVAR1N:=1990131;1 l; u- V- e5 R( |0 }) [( F) i9 k
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
+ }9 j0 r9 `9 S: D1 o* P( xDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);- S$ o2 ?: Q/ G
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
% u9 x5 r/ y0 F+ k: Y辅助线:=((DMM * 100) / TR1);( l, B0 ~' X, D$ B2 U
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
$ j- i6 T5 G+ [( s. \) |ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
6 m' `0 U$ b$ \" kVAR1:=MA(LOW,1);5 m H5 }1 B+ V
VAR2:=MA(HIGH,2);
2 g8 n; K2 @4 X! l5 z& R2 ^& [; GVAR3:=MA(CLOSE,2);
. O; Q" h0 s( g. u6 l, h; sVAR7:=REF(VAR3,1);( j L/ J) R2 I3 p, s- s
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);$ E2 \0 o: B I0 U% g+ S: M
5 U8 C+ s# f, d3 @5 W9 C
短底:5,LINETHICK2,COLORFF3300; # ~3 S: n0 P. x
短顶:43,COLORGREEN;
7 n1 \: {: L( m I绝顶:60,LINETHICK2,COLORFF00FF;
/ p8 ]0 x! K0 T; SSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;1 W5 \* q, e$ @
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
; X$ A7 P7 _* P. g9 p+ ?神偷线:神偷线1,COLOR00FFFF;1 Q0 m/ c% i# ^+ t2 s- f
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;- ]% ?" ?5 b$ g1 N- E
/ s6 m% \3 h4 f& T/ k: ] E; v: w L- _& T t1 w
飞狐版:) [+ ~/ Q8 d: x! T# k: W' a
input:m(3);
/ S1 @8 y8 E* _0 o/ G3 N& q5 sVAR1N:=1990131;
: H8 }. _( L) i& S9 V/ b% f. Y1 N* cU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);. Y5 e" Q2 r2 G& i' H. s
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);& Y, y, [& @, c+ ~# X6 ~
神偷线1:=(((DMP * U1) * 100) / TR1);# F4 f3 v9 x6 P9 D; y
辅助线:=((DMM * 100) / TR1);' r$ @: P, G2 v) {
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);' X3 ?! Y1 \3 v+ O; d u
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
) v, N6 }. J9 [3 x! AVAR1:=MA(LOW,1);3 ^ _7 A- R1 F" g
VAR2:=MA(HIGH,2);
+ d& y9 N0 r; I: l: NVAR3:=MA(CLOSE,2);* N. \2 e9 g2 A% s3 z3 \
VAR7:=REF(VAR3,1);
# a# C+ }- Z5 {% S【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);! ^, n0 ]3 S$ @( l8 ~
2 e+ i! Q8 w* ]+ J2 M/ w* B
短底:5,LINETHICK2,COLORFF3300;! D1 ?0 n6 R0 ~& s* T2 h
短顶:43,COLORGREEN;& _, o. y4 E& A/ p3 l I& y
绝顶:60,LINETHICK2,COLORFF00FF;
( {: v5 a9 ]+ ESTICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;" U2 z$ A3 g& u8 f( d9 F; k
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;) U" k! @$ E/ p: K
神偷线:神偷线1,COLOR00FFFF;
$ y! R% s0 R% y: e j: |" ?" ~预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |