|
源码如下！！
! R3 r& g# H H& `3 t6 G$ Y{M 1 30 3}
% N7 { k1 |/ W8 r$ }9 D5 I; w0 E: o/ t$ _
VAR1N:=1990131;$ W% L1 {. |0 P& ]' |' Z l
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);0 P- o5 {- M3 g$ w
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);" i9 F) Z( c8 R' ]- ~
神偷线 ((DMP * U1) * 100) / TR);
5 K, o- X) {/ E. E3 {+ m& M辅助线:=((DMM * 100) / TR);
8 L+ I5 {7 o' I3 e7 O动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
6 \# U* k+ l/ {' D- E# F9 Q3 V1 `3 uADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
6 E" W7 v8 O/ GVAR1:=MA(LOW,1);6 k3 ~* v; ~5 B# _& H0 d& D
VAR2:=MA(HIGH,2);* P% i' m) u1 a: h. B
VAR3:=MA(CLOSE,2);
0 c4 O9 D5 Y4 n. f( p9 kVAR7:=REF(VAR3,1);3 ~8 Z Z, F3 g l2 ?
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);: D. t' D' G. A
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
4 @6 w S8 q/ Q; S短底:5,LINETHICK2,COLORBLUE;
6 Y' F& J8 z3 m短顶:43,COLORGREEN;
0 `) x2 l0 ^1 l* E7 y绝顶:60,LINETHICK2,COLORFF00FF;/ }0 q0 F% B4 `; }+ @0 w; v# e7 |
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));
( V- M4 N2 s$ V3 nFILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;
+ _$ _( L8 V0 j# a4 w& [
& m4 d% _1 S# \" o
8 r/ q) _: |. V; q1 o8 M m4 }通达信版9 o) q, { g* I. k
{M 1 30 3}
' o; g& ^1 b; J. \! X# X0 Q( [VAR1N:=1990131;6 B. N- W( a5 d/ W' d' Z
U1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
9 l) c4 s' N9 ]: H2 d5 m$ E+ BDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5); H* D$ Z8 m/ H0 k% f+ Z
神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
& O; A+ n! P+ k" Y8 X' m辅助线:=((DMM * 100) / TR1);+ o+ L" K$ e r! x
动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);" e7 \! M( j5 K$ K# D" K
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);1 n# D; J. j6 k1 n
VAR1:=MA(LOW,1);( t/ ~$ ]: X9 j8 ?
VAR2:=MA(HIGH,2);
/ L. F) ]! R( h+ H0 [; s2 @VAR3:=MA(CLOSE,2);* X$ B" Z) ]5 j" E( E6 i
VAR7:=REF(VAR3,1);
2 N7 X: C, ~% l- o2 J3 Z【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);: {. x6 y- {) b3 S8 T$ A- `$ m- {# g
- r$ j# j* U/ N' z0 G* A0 l
短底:5,LINETHICK2,COLORFF3300; 3 g9 d$ ~) ]6 u; X0 x5 w" `. a% M$ [
短顶:43,COLORGREEN;$ E, ? W) y7 z+ |/ l5 o
绝顶:60,LINETHICK2,COLORFF00FF;
@3 C- L/ U# @! }STICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;$ h; E7 }0 P6 r7 D8 U& u+ h
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
6 y( [; ^0 T/ O神偷线:神偷线1,COLOR00FFFF;4 E; a! H: j1 ?; N
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
, G. s Q, n/ m7 ?1 N5 H
) f+ L2 R z6 u/ K9 p: \8 s: d {! E0 q5 _7 r: d
飞狐版：+ a6 W; g9 [& e
input:m(3);" a& `7 _" K9 V
VAR1N:=1990131;
. P5 `+ |9 M6 O6 \; K. YU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
Y' j8 o; m* w* w. }DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
3 t2 P5 [* o. N# l5 d" @& t+ ?神偷线1:=(((DMP * U1) * 100) / TR1);
1 C2 e8 k9 M1 _; U) g& O* b$ p辅助线:=((DMM * 100) / TR1);
2 q5 ?9 }& l7 i/ i1 ^ {动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
* z! @/ M1 L9 x' RADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);; K, o/ K. R0 n* O2 R8 W: t
VAR1:=MA(LOW,1);
, H+ w) l* S" L* {$ Q6 a+ QVAR2:=MA(HIGH,2);
8 d! \9 [1 K x, U% TVAR3:=MA(CLOSE,2);! l6 |/ I$ x+ C3 q3 c
VAR7:=REF(VAR3,1);
3 S( n% g% I% Y【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);
3 |# K: h: e I" l2 |0 k
1 J& [- _' F8 V- n1 w短底:5,LINETHICK2,COLORFF3300;8 {6 `- |8 d& h
短顶:43,COLORGREEN;$ U5 C! F( V' V0 L
绝顶:60,LINETHICK2,COLORFF00FF;. M/ N2 u- O- A& G
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;' k% H+ M# }9 \2 Q
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;" L. v+ k# t+ e6 M- p% \
神偷线:神偷线1,COLOR00FFFF;
3 h# j; } c" J1 V; W' A! ?+ T预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37