|
源码如下！！4 J( @1 f- t5 y1 Q; n7 w3 j( v( T
{M 1 30 3}
3 p3 A) m3 L+ R- `: I8 z4 c$ ^- r' H& y y: O0 ?8 G
VAR1N:=1990131;# n: A [2 x3 x0 L
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
7 ]/ ` T* M; h( X0 z" Z1 mDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);$ c0 O4 F9 X1 \
神偷线 ((DMP * U1) * 100) / TR);
3 S9 `0 `1 U0 \$ V! q* U' M: Y- z `辅助线:=((DMM * 100) / TR);/ G v+ Q N/ U3 d* {6 u7 o, L
动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
) l$ A6 \$ t" PADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
) G1 y" C j% |% SVAR1:=MA(LOW,1);, \( S4 T( N' A, }' V
VAR2:=MA(HIGH,2);# W9 _' A0 t& @' G, L
VAR3:=MA(CLOSE,2);
# E: D/ ?- f* }VAR7:=REF(VAR3,1);+ C5 {6 W% H- G' K- Y+ v1 H
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
0 h1 i- w& B& Z+ ?( p; M" r. z预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; + u" j" j) J: P% x
短底:5,LINETHICK2,COLORBLUE; ' I; i' g* M! b5 q( C
短顶:43,COLORGREEN;) B3 `! e- h+ q5 a1 `: N
绝顶:60,LINETHICK2,COLORFF00FF;: F3 o; N9 A ` G: Q) y
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
# Y( B8 A/ K; O, q# tFILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
: i& H( b; _+ w4 J+ A' I
8 E/ F5 I a1 m& O) e( K4 P2 R( ^8 w. c: k1 n" p. ^, A
通达信版
- S& D. h3 Y$ g$ I0 q{M 1 30 3}
8 K U1 X( Q) PVAR1N:=1990131;
1 B# c o+ k* N9 cU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
( v4 {) q: ]' d* J- XDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);. N, B! Y& x$ h) {3 d
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
9 n, H, F' ?9 b. t. x辅助线:=((DMM * 100) / TR1);+ R* b! X; d- }0 u; a3 x
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
3 X1 {0 @. O8 q5 t1 @" H5 BADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
$ V5 I# D8 R; `- }2 H, W- R- E3 ]0 nVAR1:=MA(LOW,1);
' W) D. N6 k% _+ r' C; bVAR2:=MA(HIGH,2);, |$ S- x7 D6 h
VAR3:=MA(CLOSE,2);% b3 q$ j! \. a, K( j
VAR7:=REF(VAR3,1);
7 Z; O3 Z" J, V# [' B( T【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);: ^2 M$ M0 |# T) C
; E8 x2 Q [% X' L) B ^* `/ c$ k( T) U
短底:5,LINETHICK2,COLORFF3300; 4 V' `9 n: K8 q
短顶:43,COLORGREEN;
1 m" n$ Y+ ?' v, Q+ B绝顶:60,LINETHICK2,COLORFF00FF;
. y1 |; l! ?$ D% U" ~( pSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;9 |& e6 T9 C0 t" h* Y' G
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
; M4 \2 c% {! N G) l神偷线:神偷线1,COLOR00FFFF;
0 n$ b" s% N( j+ K( L* J预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
: U; ^: ~* |6 q% o) J" H! O4 K. W) V) q1 G; S% R; n
" u2 k; k0 @7 r- C飞狐版：2 c0 U0 u* t x$ Y+ | `0 T5 W
input:m(3);
. N5 u) p8 J0 P1 n2 _" t+ \VAR1N:=1990131;
- D/ H0 k/ U+ a1 l( e# PU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
; _- j- d$ m7 K0 N" V( CDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);4 _- g7 l9 y, X2 J/ s) ~
神偷线1:=(((DMP * U1) * 100) / TR1);
6 J0 {9 n+ b1 G8 W) r辅助线:=((DMM * 100) / TR1);
- U6 X% `; O( g& Y动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
* e3 \# P7 L2 P; ZADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
( x& t e% A$ O& a5 H, k. v3 UVAR1:=MA(LOW,1);
3 x1 n# K+ C( MVAR2:=MA(HIGH,2);( p9 ~* `, c: [: O ?5 l
VAR3:=MA(CLOSE,2);* i5 O- H9 Y# x! p1 z+ |
VAR7:=REF(VAR3,1);
/ Z8 V& C6 s! W1 u) G2 J! o. y- s【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
% L/ y, ~4 \3 k( W, d
- `1 @& z# n, Z* S& I短底:5,LINETHICK2,COLORFF3300;. T, R5 E) A7 t& ^7 V
短顶:43,COLORGREEN;
. U5 D4 j3 c- s* G: p! o绝顶:60,LINETHICK2,COLORFF00FF;
. b2 J' ~1 }! W8 ?! xSTICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
0 Q3 t9 t0 M6 z/ M! N2 F5 pSTICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
A, P* g% X ?, L9 `, X- x3 A6 T神偷线:神偷线1,COLOR00FFFF;* Y6 y5 r5 x$ X' i9 Q" k5 {
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37