【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码* n3 @* n( H1 p: [6 o
 % Y6 z+ S8 G8 k* A2 ~# ?
# t+ f# a" ^% x
+ V6 K1 ^) d. G' K
源码如下:" g; F3 ?% L) M- L
  h u# M f8 N
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
6 X% Z b0 ]/ T3 [, VSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
p% x+ r C- q; gSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
0 A3 o: X0 n8 L6 g- n. q" o' wIF(趋势>50, 趋势,DRAWNULL), COLORRED;- v1 _9 c* k$ E1 Z5 W6 {# `. Q- L
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100; P- H* M- U1 n6 S- [
K:=SMA(RSV,3,1);
4 i/ A6 E5 G9 E4 K$ f- Z7 H* S: OD:=SMA(K,3,1);
0 o0 V: o( q% cTYP:=(HIGH+LOW+CLOSE)/3;
/ O( Y* ?* s9 L pCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));5 s8 [! {* V; P3 ~, ? k: J7 F
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
1 ]1 m$ Q! H* A2 U" Q/ c1 N( `# {( FDEA:=EMA(DIFF,6);
& X0 ?/ s9 v/ vMACD:=2*(DIFF-DEA);1 R3 u* \8 Y+ d1 b; T. W/ i
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
7 X3 o0 n$ R/ k: \STICKLINE(转点=1,50,50,6,0),COLORYELLOW;4 d6 E& u+ e' T' A$ j* Y
STICKLINE(转点=0,50,50,6,0),COLORCYAN;% F4 g [2 o2 U- j9 `7 r! s
顶部:90,COLORYELLOW;
0 E' ^6 v; z. v+ w- H& Q% \% Y底部:10,COLORCYAN;
. e) `8 L J/ J, H$ [判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
3 }0 W/ V( \1 P1 EIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
4 X) o" u# O5 I2 F# c/ NIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;) X+ w) ~) h6 q1 I: _4 l( b8 b- w
DRAWICON(CROSS(趋势,判定),判定,1);7 q1 I; A8 b/ c/ J8 A) a8 q" o
DRAWICON(CROSS(趋势,顶部),顶部,2);, d; O7 p8 G6 t5 S" N
LC:= REF(CLOSE,1);) S. _9 Y) a) |) p$ B9 i
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; i- `' l% C' x
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;- v& [/ H2 _0 F* S& r
VAR2:=SMA(VAR1,9,1)+100;. q, v3 Q& o# E8 l; R0 y
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;2 x7 S, e) U E# ^7 o. Y; k
VAR4:=SMA(VAR3,3,1);* ^! n. o; N7 l. f' M
VAR5:=SMA(VAR4,3,1)+100;1 l1 V# I- ]' @; [5 L7 ^5 s/ M
VAR6:=VAR5-VAR2;
& t( Y* h) v% M! t, E9 x+ F. ~趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;7 M" z _$ T; I3 J7 N9 w: L! n' T
VAR2Q:=REF(LOW,1);6 f; x$ y( p: @7 N2 ^
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
$ j- S( }% M; Y; S! X3 Q7 g2 yVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
E& f7 o* e! [- e1 aVAR5Q:=LLV(LOW,30);
* i8 u# z" Q6 O/ T! m& j9 ]VAR6Q:=HHV(VAR4Q,30);
: I8 r- J6 ?. L/ [VAR7Q:=IF(MA(CLOSE,58),1,0);' n4 N5 P+ T( m0 T( v G
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;/ q9 ?; i' L, T3 j/ ?8 L. D
火焰山:=IF(VAR8Q>100,100,VAR8Q);0 B% y4 l. X, f; O7 [3 }8 d) f
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF; G0 {3 Q2 c$ N' B: H2 M2 b7 m
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
% j u; W/ b& p0 s( w7 c! w4 ^STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;% N3 s7 Z/ ]0 M" T3 u' F
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;. k6 v! c# t0 x
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
' t3 M, j. b. o. W) x5 |0 o% W9 wSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
+ O# r% B0 U% Y' ^& RSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;6 m9 d" G; Y: U& A- H% V2 ?& Y# D) k! Q
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;, G; B' I g" i9 s. g" {) N
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
/ q9 B: Q- U. Y' z# E( O$ FSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
9 z/ L+ @; S1 M, @! P' tSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;7 p2 d& U, @# z0 i9 r
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;+ k! p4 k6 W/ |' r9 D: K
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;1 ~4 i8 x+ Y7 V3 M' R4 x) i' V
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;1 ]; [$ u: A* J& ]
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
3 N! U* J1 n7 B& Q+ P! X6 |. @/ U" Z逃顶:=CROSS(82,RSI);
+ l5 w% u* \. P" N4 ?+ ]. H; _STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;6 y% C; t3 ~/ e$ P1 \4 V0 }: r4 ~
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
. p4 {5 v+ B! TSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;2 P. s( s) ]% Q' p; g
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
' r1 ^% m* ~! X+ U" _D1:=(C+L+H)/3;
& m% ^; Z2 z! DD2:=EMA(D1,6);
! l2 [8 ~$ h% _& h% M: pD3:=EMA(D2,5);7 L T7 e* N( a* a
BBUY:=CROSS(D2,D3);
$ a$ e. X, u B1 P6 Y5 u风险区:80,COLORFF85FF;% e `$ J7 }) Y/ c
平安区:20,COLORYELLOW,POINTDOT;
# |; U) b' [5 x! z" A) z3 C( l7 x天线:100,COLORFFFF00;7 ~$ r3 v: g# u1 y; {
强弱线:50,COLORGREEN,POINTDOT;
, v, J* a# o$ A- o' oDRAWICON(BBUY,(LOW *1),1);
1 l, {$ z0 i* t5 S4 ]6 ~7 cVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;- ]1 Y- C6 w) ` D, A: I! L0 U1 Z8 I
DRAWICON(CROSS(82,VARR1),HIGH,15);
n% a( U/ h! J, y" O; d* UDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
5 L, R- ?9 e. x. k" x% B+ A" A1 _9 b{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
0 c- ?; ~3 [, D7 m% n时间:2015-9-4 20:07
$ X' h- f' ~7 E0 O股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |