|
源码如下！！4 ^' ~! V+ \( m( g/ F3 M, H! F
{M 1 30 3}5 @, b7 S# h% z( ~2 y$ u
% `% A2 H- K0 f8 w# DVAR1N:=1990131;
+ S6 ?% O8 k8 j7 c2 y- y* dU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);! J) A' Y0 b) a" O& [2 v
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
) |; @5 `9 G b, c/ e* j5 F神偷线 ((DMP * U1) * 100) / TR);
- Z' a2 N2 ^, E+ v* [' A! I1 [辅助线:=((DMM * 100) / TR);
* H) |) I x" r$ R0 e, X, Y9 n动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),M) * U1);
* d9 d: o2 |( t, u0 y9 A! GADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);/ I1 c- Z3 A- S( ~
VAR1:=MA(LOW,1);7 X6 |' e; G3 k# M* z
VAR2:=MA(HIGH,2);
& I" @* P& B2 _8 z: ?, f& cVAR3:=MA(CLOSE,2);
/ _5 T& G4 T5 z9 c+ bVAR7:=REF(VAR3,1);2 u! ?0 B1 [6 d% K, w5 J; Q
【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);% n& e' k5 A9 x$ P0 {$ W1 {/ x
预警:(IF(((动向趋势线 > 88) AND (神偷线 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; * n" X1 C$ M6 D: O! c
短底:5,LINETHICK2,COLORBLUE; F6 f5 ^, h. a9 Q( S {6 b
短顶:43,COLORGREEN;
& R* s% ~4 }$ F& t4 Q" T绝顶:60,LINETHICK2,COLORFF00FF;5 \& ~+ D2 ]3 h1 w
FILLRGN(神偷线,短底,神偷线=短顶,RGB(255,0,0));0 r, D" d C1 v
FILLRGN(神偷线,绝顶,神偷线>=绝顶),colorgreen;% |5 ~% F0 y4 P0 g' {$ o) L
6 Z i4 w( E5 p" E4 n4 y% d" J6 M' Y% W2 V% \
通达信版
; [: ]$ l# M; S% U{M 1 30 3}0 p: `% _9 f% O8 O# W x
VAR1N:=1990131;
- p9 B. }8 [2 V- a1 ZU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);
) ~$ K8 `% l; I, w5 g) O* k' [0 b' SDMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);
& B* Q8 w; k: u$ A' R神偷线1:=(((DMP * U1) * 100) / TR1),NODRAW;
9 R" h6 n+ L( f' C7 @辅助线:=((DMM * 100) / TR1);
# n9 L' F5 l% {7 T# l动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);/ {/ X* B& U6 z- ^, _' B3 ]. n
ADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
U/ f K7 k# p8 x4 ~3 Q W4 @+ RVAR1:=MA(LOW,1);
6 ]9 g7 |8 d7 Q3 OVAR2:=MA(HIGH,2);& O3 n, _1 Y( g9 d( B
VAR3:=MA(CLOSE,2);5 Y" b& W9 @7 a9 \! R& x( K. ~
VAR7:=REF(VAR3,1);
1 }+ ]1 C( l& N& c+ s7 q, _+ `8 t2 V【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);5 n/ [# o5 U' T$ \- N) ?
6 \5 ~" t( o8 i1 Y2 J" R( F
短底:5,LINETHICK2,COLORFF3300; 5 `. V( \& c: B/ c- V- j
短顶:43,COLORGREEN;" G% y6 u; w' y8 J3 a! i4 i% n
绝顶:60,LINETHICK2,COLORFF00FF;
# j: Q) e3 y& {4 j) MSTICKLINE(神偷线1=短顶,神偷线1,短顶,1,-1),COLOR779900;4 c5 F8 i! Q7 B* X
STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,1,-1),COLOR0033FF;
, v1 h, Z! g- R& O5 y1 t+ l7 k神偷线:神偷线1,COLOR00FFFF; t+ C: T/ ?0 d0 d+ H: I7 V; G
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF;
q: c/ h; D, f' o0 G1 n$ C5 z; @8 r5 Q& C6 i* c
' |- ?( ^( v' N H" M飞狐版：
$ d: t2 ^* P) w/ d) K* ?7 G8 q9 ~input:m(3);
7 j. X: V% x2 x r5 y) x4 \1 QVAR1N:=1990131;
" l8 ~6 T @1 n1 _& wU1:=IF((DATE 0) AND (HD > LD)),HD,0),5) * U1);" `- s4 i/ |" T$ D7 p# X+ \. T% g
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5);3 O- C# \3 F; b0 r& E
神偷线1:=(((DMP * U1) * 100) / TR1);
# T8 ~' p( { w( X2 }$ Z辅助线:=((DMM * 100) / TR1);
- c/ q# F" i* M9 L$ l+ Y* ~6 F$ L动向趋势线:=(MA(((ABS((辅助线 - 神偷线1)) / (辅助线 + 神偷线1)) * 100),M) * U1);
4 Y$ N8 m1 Z$ j8 F2 X3 {6 F4 @+ H& DADXR:=((动向趋势线 + REF(动向趋势线,M)) / 2);
" [7 B _& q0 z8 ]- R& LVAR1:=MA(LOW,1);4 r' s' U$ H, k& v2 M- p
VAR2:=MA(HIGH,2);
2 m8 }4 V6 u0 g7 Z& _! b( OVAR3:=MA(CLOSE,2);
2 F- U2 R+ V. J- y1 _VAR7:=REF(VAR3,1);
7 J. {2 q& B" ~4 \【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100);3 O! u" Z' {$ a/ v
+ i4 y7 ?5 f: M6 B U8 Z1 [2 c短底:5,LINETHICK2,COLORFF3300;
2 | a% X- J1 d& F6 k; W& R短顶:43,COLORGREEN;
' _) g `: P: _0 O& y- Q绝顶:60,LINETHICK2,COLORFF00FF;0 m: d& j' U8 m. G1 u
STICKLINE(神偷线1=短顶,神偷线1,短顶,8,0),COLOR779900;
. ]( V# L( S% {STICKLINE(神偷线1>=绝顶,神偷线1,绝顶,8,0),COLOR0033FF;
' R5 K# i) e* J) J) y( O" ~神偷线:神偷线1,COLOR00FFFF;4 M1 a% o5 n+ N4 o
预警:(IF(((动向趋势线 > 88) AND (神偷线1 < 5.8)),20,0) * U1),LINETHICK1,COLORFF00FF; |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:02:37