【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
9 S. O3 \. i8 e. d * v* ]) ]" D X& L6 G
0 D c) `" R* Z- V
# {) m" {- g2 ^7 P1 s" E源码如下:- \. x" q7 ~/ d% W0 _" y5 v
 9 P. A+ I% P0 d: T
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
/ w+ @1 c3 {* c, ^0 p" R# `3 R$ fSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
`, y( U+ Y; H0 ^STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
6 ?* N! b* X, @3 g: ]3 K7 H8 w% zIF(趋势>50, 趋势,DRAWNULL), COLORRED;& D3 a7 K; G4 H! q$ \) G) e
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;6 v& F' \- e+ o9 S0 C2 h/ w7 A4 p
K:=SMA(RSV,3,1);$ m: @& i; V/ k* F2 S
D:=SMA(K,3,1);4 ?. P; b* W! |+ ]. F
TYP:=(HIGH+LOW+CLOSE)/3; `% `( D2 i2 C
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));0 }6 g/ @, s. ~; W/ y
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);" z5 O( z+ k1 V
DEA:=EMA(DIFF,6);7 E/ n# Y: K) }6 F
MACD:=2*(DIFF-DEA);
& C5 E: v) G. M2 A/ L7 D转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);4 k$ v6 ?# `( a% }4 P& J
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;* ^: e1 V* [- `! e
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
2 o! i" ^* G' X G顶部:90,COLORYELLOW;/ s7 j& n6 o" `8 p4 x
底部:10,COLORCYAN;
: G0 n* m8 t; g6 c/ Q& C' p6 X判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;6 W* I l! a, ^6 k
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
5 c; R2 b; \; s8 J8 }0 uIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;- g n) A+ g$ J6 `& @
DRAWICON(CROSS(趋势,判定),判定,1);) ^- ?+ s2 ~5 D9 \) L
DRAWICON(CROSS(趋势,顶部),顶部,2);
# s" H9 z. C- g. B0 k# G2 x5 w1 qLC:= REF(CLOSE,1);
f# K: g& `$ |1 R! i- cRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
1 h2 n5 p9 F% L! bVAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;5 G: Z+ i1 r, G u! U4 r
VAR2:=SMA(VAR1,9,1)+100;% o8 X' Z% i/ a7 K
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
; H7 K6 y% u) Z; BVAR4:=SMA(VAR3,3,1);
; |# Y- f. z) t! uVAR5:=SMA(VAR4,3,1)+100;5 Y$ h$ j2 D5 l
VAR6:=VAR5-VAR2;
# B V* P$ N+ u3 y" ]趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
0 T5 o, z9 ?% E+ yVAR2Q:=REF(LOW,1);5 b% b' K$ @0 P, k$ O6 ^
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;8 e6 r# q2 f* o+ v, A3 @$ N; t3 x- Y
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
0 l" s! J" P$ \3 k% p/ R" I% R7 |! k8 sVAR5Q:=LLV(LOW,30);
1 o4 l% S, K: N1 EVAR6Q:=HHV(VAR4Q,30);
) u1 }7 w4 Q( ZVAR7Q:=IF(MA(CLOSE,58),1,0);
( f1 p# s& `' vVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;$ z; ~* M2 C, T" k
火焰山:=IF(VAR8Q>100,100,VAR8Q);5 [/ z' f# k7 e w
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
3 H d4 c$ u1 e/ W) Z5 j( A- F- O0 fSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;! Q- M1 I9 A0 Y
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;0 U7 I. E7 b) C9 C
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;) N; Z% [$ P& }- Z: c* T
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
! @& t9 G% ^" l5 dSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
) k0 g7 H+ [2 P3 ~1 l: w( @STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;) K2 D( ~( `7 [' s( s& C
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
, J3 D/ U6 J4 k: _% fSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
9 I% s: k* K% c# N% aSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;8 ^3 s- i% h* d3 a3 r
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;- d1 |/ f8 B) V0 z' s
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;1 ~$ A9 U' j1 d0 Y1 ?7 W+ g) F. J
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
* d# F8 i1 Z% X4 USTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;* O5 s6 Q, L. T
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;- |9 C. I! ?3 p8 }
逃顶:=CROSS(82,RSI);
' `. e$ X- |% V$ jSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
* r' T& C z4 s% x. F, G) nSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
6 r+ T! A8 k3 Z$ v6 i# t* cSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;6 w7 o" z) e9 q0 O; X8 _0 m- F
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;* _5 J3 G% }+ n1 l) o2 f
D1:=(C+L+H)/3;$ x" Q% W4 f' T$ E& L9 T
D2:=EMA(D1,6);
/ c; Z) G1 R6 k7 e) \D3:=EMA(D2,5);6 |4 H8 I. c' x/ `
BBUY:=CROSS(D2,D3);
) g+ [$ f$ g7 @, |' i风险区:80,COLORFF85FF;
, |. _1 C; ~, j" I' q平安区:20,COLORYELLOW,POINTDOT;
& n* R# h" T- \% P, r天线:100,COLORFFFF00;
( A8 k* P) S# {强弱线:50,COLORGREEN,POINTDOT;) {' |7 [' Y8 |9 V
DRAWICON(BBUY,(LOW *1),1);
0 w5 A( N! I' M+ O% bVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;4 I1 R4 v' L- b b
DRAWICON(CROSS(82,VARR1),HIGH,15);
, n5 C* l# B& YDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;4 r/ U0 T {7 w5 d; W
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
: _% _: _$ b3 a9 _% i, s* C时间:2015-9-4 20:07
! z6 G% V" } J& |3 v# V7 o股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |