【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
* a( U$ e8 `* p- Q* v g* k( w7 a ! Z8 U2 N" d$ \5 t c% O
( z8 F K. H$ K% r! o
7 Z0 m, {! Y: g6 K2 O5 C
源码如下:
) P4 _& Z% W" v2 k8 M% [ # g9 U9 i# j! H W2 |, H! ?/ m
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
$ v* E; }% T# P; `! ]STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
. s4 z E$ R) `7 I( c. oSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
. h+ y2 \, m$ i3 t1 Q+ M# hIF(趋势>50, 趋势,DRAWNULL), COLORRED;, H. ?3 T. O# W8 b8 q
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
" @. j* p6 R( K! F3 fK:=SMA(RSV,3,1);
) r3 m# l6 b% e0 Z9 iD:=SMA(K,3,1);5 G3 f4 b( Y, Y8 ^
TYP:=(HIGH+LOW+CLOSE)/3;
) m! e1 J# V! m- o% O9 }" i7 l1 YCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
4 K9 K3 z8 f/ \; `9 n* BDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);8 b, \) y7 j) \* {: R
DEA:=EMA(DIFF,6);
5 h; o9 O0 h! }: y* E; l/ f4 I$ AMACD:=2*(DIFF-DEA);+ d. M1 W" ^% z, G' P D8 n
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
' e8 y" ]" O% C9 RSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;
5 b3 @$ g7 j7 \+ G. LSTICKLINE(转点=0,50,50,6,0),COLORCYAN;( [5 Y. }) s5 K& Q0 m; ^
顶部:90,COLORYELLOW;
- Z# O C; F- L: U! g6 i$ L底部:10,COLORCYAN;
- o& t' I2 t) ~8 G4 w' w5 n判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;3 @0 y. E# f6 \
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;1 g' b) r$ s0 T/ `
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;) q$ I9 g. o ~
DRAWICON(CROSS(趋势,判定),判定,1);
: ~! U. d3 M: S; p7 S, p. q; ^7 oDRAWICON(CROSS(趋势,顶部),顶部,2);
; K/ H& J- V$ l+ I5 ^LC:= REF(CLOSE,1);
. O0 C8 ~6 f1 G7 [RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;, t7 |' s* q/ ?' t
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;. Q5 h4 g9 N+ f/ {
VAR2:=SMA(VAR1,9,1)+100;5 ]4 b2 E- o$ Z+ A; C
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
) C X6 g' p+ ~VAR4:=SMA(VAR3,3,1);
% I( t& D% [1 l# i$ nVAR5:=SMA(VAR4,3,1)+100;7 ^% s8 J+ k* c. k; [' S
VAR6:=VAR5-VAR2;
/ ~5 K2 a; h9 v3 r& v' t趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;( T7 z! k, i4 }4 N- P
VAR2Q:=REF(LOW,1);+ y. X; c- I& Y+ K8 s! n8 ?
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;, V3 F0 G0 b' w
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
' F8 ^! E% s, V2 ^VAR5Q:=LLV(LOW,30);5 y; J& |5 h G
VAR6Q:=HHV(VAR4Q,30);& P! W7 b( V0 C7 ]7 S4 `* F( G
VAR7Q:=IF(MA(CLOSE,58),1,0);. _( V6 Y( D1 M
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
! Y% l5 P. K* l8 X+ @ M3 \8 h火焰山:=IF(VAR8Q>100,100,VAR8Q);
- t/ Y s$ D7 Q% S1 K0 PSTICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
' G# {, R `( y7 U \8 R& HSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;% s! N( D4 v6 P2 H$ d$ F# R
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
: |( n! c F* w& }' ZSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;& x8 U4 c x! v0 @
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
2 y( z$ s0 R1 I# ~STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
% H" P F2 @8 x% S% @# r8 h0 }. DSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
4 Z) @7 h% F/ S- e; ]% K" d" C( PSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;+ w% c8 e% b/ M3 ?7 S
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
O. X5 V' g& I }- uSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;- ~: l0 X3 B) S" G) c% @
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;' P) k6 [1 o9 L
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
# ~' ]1 L9 [" e# y; l: TSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;" V4 S5 O9 m1 ^& H
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
3 w/ N/ r1 ^0 v+ j! U! YSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;, ^; P; q( ~; D# I* {% a* t
逃顶:=CROSS(82,RSI);' N9 K i5 Z$ b1 d9 d2 C/ V
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;9 T0 w- o1 U$ ?6 [* T
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
* f7 y3 p: ]2 S& x9 FSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
/ | c, I* r3 v) U( }$ d# p# b" kSTICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;% }+ R/ a2 F! q
D1:=(C+L+H)/3;
8 _' ~7 U, G. E3 ~. kD2:=EMA(D1,6);& v, C+ r2 B8 q8 H3 f1 w: |- B
D3:=EMA(D2,5);8 F% T' B: z0 Q2 Y, }0 }8 U- P
BBUY:=CROSS(D2,D3);
% J, p+ b( k. Q' |/ N, O风险区:80,COLORFF85FF;
7 \+ o/ p$ Y" Y- x s2 ?1 d* w平安区:20,COLORYELLOW,POINTDOT;
# e- [) q; q$ I" X* f: \天线:100,COLORFFFF00;
5 L, E. ^2 k2 t, Z/ Q强弱线:50,COLORGREEN,POINTDOT;
) {' w* V: H3 a! Q, RDRAWICON(BBUY,(LOW *1),1);% t7 P# U9 K; j& T
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
$ v, Z1 \: N5 @% Z+ ~, sDRAWICON(CROSS(82,VARR1),HIGH,15);' U. E" O- K: ]6 y5 @: l0 h& W
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
+ e% |' |* U! G* P! [& N$ D{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
& c9 [' D0 t( b5 B5 m* w& T时间:2015-9-4 20:072 j4 ~' V# L3 k' s1 {: h
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |