|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
1 q& z1 T6 I4 I3 O- J* q. k; M/ I& ] 
- f' p# O6 i$ J) g- F
- H2 G. ^* j6 f& R- n/ A, V: n+ ?/ p& x q1 ]3 E
源码如下:7 c- X! _+ v! C2 A7 o2 T* ^
 : P* u$ s( A$ R, C7 L6 N
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;( ]9 ^ m5 f: f
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
) a" G- [9 n& u% i) M* GSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
4 h; J# k2 {- }) F5 A# K5 pIF(趋势>50, 趋势,DRAWNULL), COLORRED;3 T& _ s0 f0 K" C: {
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
5 h: b" x# Y$ Z5 f7 D5 g- jK:=SMA(RSV,3,1);9 m6 g& A0 j: R2 q0 k" O- E
D:=SMA(K,3,1);
" P* }$ i9 [2 [5 O: W3 UTYP:=(HIGH+LOW+CLOSE)/3;6 q B; a( V4 G F, Q% s! h* Q. ^
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));; E2 O" z/ `6 K1 @& g
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);. m: d: f( e# b! A) H, d( n
DEA:=EMA(DIFF,6);( B$ I# p6 g# P- R, z4 h+ t; B
MACD:=2*(DIFF-DEA);- g! c0 Y( u0 R2 W3 w
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);$ i! k; m9 p8 a6 p$ F* X Z
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;
: |1 C( N" F7 {6 [STICKLINE(转点=0,50,50,6,0),COLORCYAN;% W* a2 z$ q& v2 F( O$ \
顶部:90,COLORYELLOW;
4 D1 E" I3 p8 `底部:10,COLORCYAN;
* }+ r1 u) B8 j0 Z/ F3 A判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;. g' d! _1 F3 h0 j8 k2 R
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
D4 Z5 y/ C2 Z1 U/ }IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
# H/ d- x. c' P1 M$ y9 jDRAWICON(CROSS(趋势,判定),判定,1);: i9 D; a" X: B2 f
DRAWICON(CROSS(趋势,顶部),顶部,2);; B- `- I/ V, I: ^7 S# \
LC:= REF(CLOSE,1);* C G8 \5 \0 t- V1 _
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
7 N! S4 I* k6 f8 {6 E8 q, s, K3 WVAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70; L" Y/ }# ~+ B- ^. J
VAR2:=SMA(VAR1,9,1)+100;) m$ n! P. F7 C
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;4 V1 Y3 _# N- A9 Q
VAR4:=SMA(VAR3,3,1);
4 H) v2 U+ i6 O; X! iVAR5:=SMA(VAR4,3,1)+100;, w+ m( W% l, k. ]0 C
VAR6:=VAR5-VAR2;
: L" I( y3 w* q# o B! ] Z( w6 z; i趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;$ L0 f# w: K. o8 y
VAR2Q:=REF(LOW,1);
. k) C$ U; i# a( c- OVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;; R2 Y7 x1 c1 B% s+ ^
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);# n2 b; w7 u' W! ] p; t4 X
VAR5Q:=LLV(LOW,30);8 k5 K8 J9 h1 w* L
VAR6Q:=HHV(VAR4Q,30);) ~/ \+ x P) ^8 Q+ m
VAR7Q:=IF(MA(CLOSE,58),1,0);
9 b0 o' G' x4 n# i* A" R; bVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
' V# M2 l" Q( @$ Y$ a; X J7 A火焰山:=IF(VAR8Q>100,100,VAR8Q);# p) U: z5 _1 b$ {: @/ S: H
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
" s/ ]( g& W: a) m/ ?STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
' x o) g5 x# A% `0 wSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;5 n5 e" X) j) B, ]
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
* O! w5 g$ c% y( D6 n& i& ^STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;6 ?( }' T: A! }( x6 c
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
9 K4 V' m, g, ]* w6 wSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
Q, Y0 X$ @* \! O2 ]. _& J _9 a4 FSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;5 ~ j X' s2 \7 e
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;- D3 f* E, s) b9 F' D! t
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
; D$ D# I+ G* C; USTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;7 ?/ u1 K( n" m, s
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;+ I& h3 [% ^1 ~) k' g- }) Z
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
3 K8 v2 o5 O7 c9 zSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;$ Z0 ]1 U" P& i% R
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
9 Z' D# w2 X' R/ \, d6 ?/ Z" e逃顶:=CROSS(82,RSI);$ |3 p5 h9 `# v
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
| l7 H3 I" J Z: ISTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
8 n7 _( ~( E1 C' c$ p+ c, ySTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;- G8 t, M' i* N1 U7 c/ N) u1 K! m
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
5 C( f T* k. s- M$ HD1:=(C+L+H)/3;
& v9 {0 u2 I. |8 K. I. zD2:=EMA(D1,6);
8 ^; e* Y3 w1 | d# ~5 p0 y, gD3:=EMA(D2,5);% J6 W7 b/ O- E9 h8 E, R- V2 c
BBUY:=CROSS(D2,D3);+ L; J) G- P- Z( W4 [
风险区:80,COLORFF85FF; Y1 Z k# S2 o( ~% z- `( R+ O/ j
平安区:20,COLORYELLOW,POINTDOT;$ @( X2 F9 [( R. m; X4 U
天线:100,COLORFFFF00;( O9 g d! y* S8 a9 D+ U
强弱线:50,COLORGREEN,POINTDOT;/ P+ Q9 M6 }. e* Z
DRAWICON(BBUY,(LOW *1),1);3 R" y- s5 c7 o1 R4 M6 w; P
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
& W; |0 n7 y/ z2 x7 F3 @' ?- }DRAWICON(CROSS(82,VARR1),HIGH,15);& ~5 z2 I& Z7 f: o) J1 U# l. N
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;) Q5 U3 R1 p" f$ [7 S a
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
" u$ K" M) Z7 O9 B时间:2015-9-4 20:075 j0 \2 | i+ l0 }0 v: k. A
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |