|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
6 W. {! R9 T) s 
: R/ w& \ f% H% |
7 Y) a% J' e5 w4 I4 }6 s/ F' M1 s" P' s9 _9 ^0 \
源码如下:+ R! N2 r2 u+ H: [* T
 / T% {9 k: S$ T
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
2 Q# e) @" R: ?6 x* M b) f1 ^STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;3 G8 c { I0 \6 K. j2 b, ?
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;" O8 M* L5 f( f+ H# u$ `
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
" U2 r- P; q" TRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
/ u. H; `" K2 I7 ~1 fK:=SMA(RSV,3,1);4 p. l# ^0 ?' r+ e
D:=SMA(K,3,1);
; W: k) D$ v6 Q( Z; N# qTYP:=(HIGH+LOW+CLOSE)/3;
6 [7 a2 U9 o f/ ?CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));# x$ X; i2 S! U5 ], A1 v4 ~" Q
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
. m; x4 S: `* C2 I vDEA:=EMA(DIFF,6);+ {! O/ x a3 T7 j: G
MACD:=2*(DIFF-DEA);
: X$ g# J; W3 x: E转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);( Y5 e% q% c; C# b9 `: U/ G
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;8 C$ m' T6 u6 y
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
$ Q+ t; y% k5 K Q7 U0 o+ R顶部:90,COLORYELLOW;
0 Q5 p. h. u; z/ ^4 J底部:10,COLORCYAN;5 C6 z' T0 x/ |' p5 Z9 ~2 t; ^
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
/ A! b$ }0 {7 J" CIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
. E' w! D; t1 \IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;- H2 c' j7 a0 Q# u1 g
DRAWICON(CROSS(趋势,判定),判定,1);; _; r2 W5 y) B8 K9 j# L/ @
DRAWICON(CROSS(趋势,顶部),顶部,2);3 r. @/ [# j# O6 _1 K' J
LC:= REF(CLOSE,1);: N6 k4 {6 z6 {# c
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
7 U% A- t0 C9 f7 ~( L7 q9 k& ]VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;6 i9 t. j, Q1 b( c
VAR2:=SMA(VAR1,9,1)+100;
; P H8 {! x/ @) `) t5 CVAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
7 N) k$ j. p" v, a* w5 y9 AVAR4:=SMA(VAR3,3,1);
; ^, I* {# e) d; l4 @$ TVAR5:=SMA(VAR4,3,1)+100;
$ G* I+ }/ {% v% j; FVAR6:=VAR5-VAR2;
- f3 M7 o+ J! i( S趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
% l- X7 Z3 {8 H8 Q; N# JVAR2Q:=REF(LOW,1);
* c1 w2 n5 p0 \( I7 D6 GVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
9 ^# _3 c- p4 p6 W. o. u' z+ kVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);) ~3 ?; m4 C3 I- ^4 D9 G4 L
VAR5Q:=LLV(LOW,30);
# ^$ j% `9 @ }0 o! z$ EVAR6Q:=HHV(VAR4Q,30);
% P8 x' O' E: B1 c9 bVAR7Q:=IF(MA(CLOSE,58),1,0);
5 q3 K: s, y4 @, TVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;4 l" b: `9 B" H/ s# g, s8 r
火焰山:=IF(VAR8Q>100,100,VAR8Q);3 p" c; V( A4 E7 ?; d2 B2 Q* ^; F
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;( ^, }+ Y# ?8 e' F4 W
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
3 z. [% Z/ G$ X" v2 ]0 i1 VSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;# t+ z( w$ d, H/ m
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
; r% v2 r8 d$ k" y- e0 i$ Y$ OSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;: [6 _7 ^7 M. o$ K+ R, I F9 p
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
& z4 q4 h7 R; F$ C+ ISTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
6 J; g. h6 m' BSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
5 p3 h7 k/ F; A4 Z/ U3 dSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;+ i9 j3 W- D1 g9 ?/ w6 z [5 A
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
0 s4 Q7 e# [0 X$ Z% gSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
' k' ? ?( O( K; Q( xSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
+ E$ ?* q% Q; e' I& L# sSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
% K% g! A1 b+ W P: R6 l8 t! {. I) Z& RSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
3 C' P0 d" [$ T/ g. n4 M* s0 b2 |STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
$ }2 Z9 w. J, z: `" E4 p* x' a; t逃顶:=CROSS(82,RSI);
1 K2 N( J7 K" Y6 E4 s2 p2 ZSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
2 `" V! ^) b- W: vSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;5 D' p& L2 E4 U! ]0 }
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;9 Y8 }+ P3 A# h
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
: d) S& i/ k! `& y+ L* Z4 ?$ N" gD1:=(C+L+H)/3;5 X/ u2 A; t5 M& P# N* K$ N
D2:=EMA(D1,6);
/ v( e5 A- D% _; t! n7 CD3:=EMA(D2,5);$ k4 q8 p7 }+ C$ r5 B, y
BBUY:=CROSS(D2,D3);9 x$ p$ F1 Q$ a; v) e/ M
风险区:80,COLORFF85FF;
: _2 s4 I: p, M5 E# e$ g) ^平安区:20,COLORYELLOW,POINTDOT;, H" a0 J& k8 S0 d+ @- W& P
天线:100,COLORFFFF00;3 T6 }: R" N& m* ~
强弱线:50,COLORGREEN,POINTDOT;# o& o- `% Y. b) X' ~6 F
DRAWICON(BBUY,(LOW *1),1);
& m" C# o+ P6 j8 d2 ]9 zVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;' Q8 r+ \ j# a
DRAWICON(CROSS(82,VARR1),HIGH,15);8 p) h; R% o5 ?5 l: g: R
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;9 j/ m& L. C# t' K
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB); T, o, T9 C$ G! b3 M, Z; \+ G) T
时间:2015-9-4 20:07
1 N1 u; }$ _- F3 W. Q+ T: d股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |