|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
1 f- f& g; _ q s4 @5 Q7 o$ C 
& b) U |6 D& d
& Q; k: x' L1 @* v! X1 v: |6 k
# W/ b+ M' _1 J; X源码如下:
1 e* g+ y+ M* n. c$ D 
1 P5 k: Z3 i; @趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
& p2 w/ J; j, ` ISTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;, B$ c3 g1 k6 G, I, a: f
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
' |0 t. n9 G3 S4 Y c6 w8 BIF(趋势>50, 趋势,DRAWNULL), COLORRED;
2 _0 z, y8 k8 T4 a* ]RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
2 s# N V- }6 V1 eK:=SMA(RSV,3,1);
2 H' x8 N7 m& l; Z4 a: @ [D:=SMA(K,3,1);
" j3 e# a1 e) j# \% B: T$ p! WTYP:=(HIGH+LOW+CLOSE)/3;9 |/ p3 j) j1 K; }* J! P, t9 g
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
+ f; v" v* L A* f4 m$ ODIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
$ v) M5 n5 ]) ]DEA:=EMA(DIFF,6);7 u8 ?% y. A# {& C# p
MACD:=2*(DIFF-DEA);' W: j9 D* {; P
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);1 t' ?/ k/ P7 o) G# f8 n$ t
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;
. V0 m; u' Z1 k- d$ v6 \+ ISTICKLINE(转点=0,50,50,6,0),COLORCYAN;
! L: z, s; ^* r$ o顶部:90,COLORYELLOW;
?$ N; N/ V& e底部:10,COLORCYAN;
t9 j7 g- X6 R判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;4 n3 G# W6 y9 V9 R: M- N
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;* A9 s4 h7 ~2 @- h. e1 n7 x, M
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
9 i4 o$ P2 q) p. XDRAWICON(CROSS(趋势,判定),判定,1);
3 ~' S/ Q, C1 A# v, J) y0 MDRAWICON(CROSS(趋势,顶部),顶部,2);
) ^$ X$ O3 }4 k0 Y4 gLC:= REF(CLOSE,1);
2 w9 d8 t! W" M$ xRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;( y$ I, w" A9 Y; X/ l
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
0 m( v1 o$ `" |& x0 P# U% p# E8 mVAR2:=SMA(VAR1,9,1)+100;
* h/ l- L/ a, [, O7 x1 T' rVAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;4 u' W8 e, V; O6 `( g6 ^0 E
VAR4:=SMA(VAR3,3,1);! a* ?* P1 I$ y D% t1 U" w$ W
VAR5:=SMA(VAR4,3,1)+100;1 _1 H1 b$ ~$ N# U0 i, K
VAR6:=VAR5-VAR2;4 V; ~+ l. e3 C9 |- o
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;# D- l$ v t8 E3 s
VAR2Q:=REF(LOW,1);
5 H6 ]& R7 R) B8 NVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
/ T; T4 T$ Q6 O: q, K5 a$ @; N. SVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);7 t1 ^) r' Y! I7 d; D) J1 Q. F
VAR5Q:=LLV(LOW,30);
7 W7 X# E7 H( E$ f, T0 f7 L2 A% yVAR6Q:=HHV(VAR4Q,30);
1 n, U' |2 M9 U6 D9 L9 aVAR7Q:=IF(MA(CLOSE,58),1,0);/ A. r. z+ w- |: h$ b4 |
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
5 h2 N: A6 X7 n. q& v+ L: ~/ j6 G6 \火焰山:=IF(VAR8Q>100,100,VAR8Q);6 h- K$ U3 m' f( r
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
* N& S( o+ a% h9 hSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
4 a3 j2 x/ b5 @% HSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;+ c" n* g" B% }' t
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
+ y. Y. q9 R' g7 W% cSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
( b& G+ |: @% i$ @& e% R, @: R# bSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
) k* F0 ]4 z" y% ^ U! YSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;5 \2 ^' @$ L0 k& n
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;& |, O0 ^4 ^5 w7 e9 \, G7 y
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
; _' @) }( t& c& L# P) rSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
2 [( a. u2 E& x9 M, w, [STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;. q- P1 J6 B* e# K6 K
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
9 s/ a) r8 Z1 P7 t7 t8 wSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;- l6 q. x4 |8 t; J/ A6 B# R0 Y6 r9 r+ g
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
2 w6 L9 f- t, x1 a( ESTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
( Q1 z+ B$ @4 o9 v+ b' v H逃顶:=CROSS(82,RSI);
$ i; F+ Y4 z. ZSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;1 q: E8 i+ f( t) L) p0 {
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;0 n5 R( X. I0 v' Z: O4 J
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
) {) j7 i+ d! Y. F: q- Y$ _* _STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
$ {2 ^' G; t# ^D1:=(C+L+H)/3;
' D9 Y# V; n8 ?/ y0 uD2:=EMA(D1,6);5 |( G* f& ^* d# k2 K; o: T
D3:=EMA(D2,5);
, C' b' c( A9 B, ]# E$ YBBUY:=CROSS(D2,D3);
( Z s5 K7 ~/ k4 d1 q& L风险区:80,COLORFF85FF;
2 j, L Y" K, a' S5 I$ i7 y7 z平安区:20,COLORYELLOW,POINTDOT;# h8 ]8 z9 i- H# \: E
天线:100,COLORFFFF00;/ L7 ~6 g1 Z* v6 ^
强弱线:50,COLORGREEN,POINTDOT;$ d) {5 P2 U0 u1 `( r& s0 ?
DRAWICON(BBUY,(LOW *1),1); n- j0 p5 r5 } }9 i! s9 m
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;6 r. h, }4 |. u5 `
DRAWICON(CROSS(82,VARR1),HIGH,15);+ \0 V- q, v' h
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;3 a: K( I1 I6 Q, }% W
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)9 {; E$ Q( A5 }0 G3 R6 {
时间:2015-9-4 20:07: B' f' J8 P( E0 X! \8 T f
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |