【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码/ y4 Y6 K- w4 w, b
 
" Z' c x X; }! d: v% w% s! d& a% b3 `
( C- d. f; t' ?8 w( D+ Y, M源码如下:$ a) g' P o) D5 i z
 0 B) ]& g9 x& ?# t
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;6 n4 o& G7 x1 N
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;' P' Y% ^$ \; G3 \4 K5 q
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;/ A! t) c* U7 E# v% K$ e1 ]
IF(趋势>50, 趋势,DRAWNULL), COLORRED;6 E+ `7 A0 }; Q' B7 ~
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;4 h2 N. M* X6 X% E V2 u0 D- Y
K:=SMA(RSV,3,1);
: D% R3 @* e! U/ R q0 ]D:=SMA(K,3,1);
2 h' c6 h9 z4 ]7 e" CTYP:=(HIGH+LOW+CLOSE)/3;
3 a; R$ d! i; p' X* nCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
" k! U* Y3 k& Y3 j% \# @DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
1 v+ I; G; z! e4 B# p( H( aDEA:=EMA(DIFF,6);! k* K! }% l/ _( c+ g. F2 b* B" |
MACD:=2*(DIFF-DEA);
3 r% h4 l1 e6 U( ]' k2 n V0 g6 Q2 p转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
" c0 A# g% a7 V. q2 j4 v+ sSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;6 ?- ~; B$ p. J1 f) Z3 Z4 J
STICKLINE(转点=0,50,50,6,0),COLORCYAN;4 v- v' b2 Q0 @- A4 c, k
顶部:90,COLORYELLOW;
0 `3 E; N$ w% v6 ?底部:10,COLORCYAN;5 F7 H; q, B, y
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;7 d% W$ l$ ~9 T3 G
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;0 h! g% @) S8 B. t$ Z
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
7 I# v( m2 c( J1 y- ~* ]' {1 F3 xDRAWICON(CROSS(趋势,判定),判定,1);4 `1 Z! v" X' L9 G
DRAWICON(CROSS(趋势,顶部),顶部,2);& k; x6 a! P: L/ d; J
LC:= REF(CLOSE,1);
]7 {8 [! h4 D ]4 m! |8 P+ }& lRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;# ~+ q4 W. b/ v: [1 z# v
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
$ M8 _* z2 g3 L# zVAR2:=SMA(VAR1,9,1)+100;
) t% W7 l! U8 ?3 KVAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;( i1 U' _! [6 }1 [; w4 W5 X
VAR4:=SMA(VAR3,3,1);0 X( V2 ]- d# k4 N w
VAR5:=SMA(VAR4,3,1)+100;
7 A, A0 i$ I1 Z/ r4 E/ k( lVAR6:=VAR5-VAR2;
! T* y9 W+ B3 g6 h趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;5 {0 C+ `6 C" c8 A1 r! y
VAR2Q:=REF(LOW,1);
" f# R' d9 J* ]1 Y3 b& EVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
: B: N C8 {. L3 }3 `9 P7 ]; QVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
" a: j2 B' I" b3 VVAR5Q:=LLV(LOW,30);1 c* c9 r8 L' f9 `
VAR6Q:=HHV(VAR4Q,30); r; U" k% U( W' N8 u
VAR7Q:=IF(MA(CLOSE,58),1,0);. I( Z' M$ P0 k6 K% ?: o* l/ F
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
+ Z+ F- D2 ^0 q. A3 y+ ?7 H火焰山:=IF(VAR8Q>100,100,VAR8Q);- P+ D0 A4 `/ M4 [
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;8 L& Q6 B- V7 _ ^8 i* a1 Q
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;$ j: |; _7 l' j" w) O$ R A
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
) @# @& Q. H1 K& y1 d- \3 ]STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
4 z8 P6 \4 q$ k% _. U1 PSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;1 a" @" Z" {7 _$ j( a5 ]
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;0 l8 b0 h' s2 O& q
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
5 R9 \+ d- R% rSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;3 l* M5 D: G9 ]" w
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;7 X/ g$ d, F2 {) F( E
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD; @: y) x' s/ {5 X/ Q* S& e0 O& I! s
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
5 s+ Q' S* F( v8 w0 \STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
! v0 T2 y) z' w u. n9 _$ E8 bSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
: C$ m9 J5 K- C$ {4 ZSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;4 O- m0 H; [7 N4 J* O$ S( ?
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;4 f$ B# O5 k* d, k% a7 C9 P
逃顶:=CROSS(82,RSI);- ~+ n6 X3 q9 n/ \' L4 ^1 T# E
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
8 z& Y1 z" q/ D- G( g; RSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;# x( j/ U( }0 O, ]% r) @# u+ l
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;8 x: O" H, }3 G4 ^
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;5 U8 L8 d/ h5 @) T4 u
D1:=(C+L+H)/3;4 A: x( D! p; p* O3 X
D2:=EMA(D1,6);; M9 i0 P* n* K4 |
D3:=EMA(D2,5);
: i5 T+ G, I& `9 _( {& BBBUY:=CROSS(D2,D3);
& P) U% s" p. E X风险区:80,COLORFF85FF;) `" O" \% M" M$ D4 ~/ k& z
平安区:20,COLORYELLOW,POINTDOT;
( X6 m+ O4 I) n; K天线:100,COLORFFFF00;( M3 j' }) C1 E5 K6 O
强弱线:50,COLORGREEN,POINTDOT;2 P0 A9 z$ ?( M( m! g7 w9 j* G
DRAWICON(BBUY,(LOW *1),1);
x' @) B/ [" k& N J% a0 g/ `VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;5 Q% b3 f5 }7 Y5 r( q
DRAWICON(CROSS(82,VARR1),HIGH,15);
! f* R+ o% s) {& ?DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;! E8 J6 d: i2 P' K0 S: n, i
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)0 |2 {& Z" z; e- Y& [, C
时间:2015-9-4 20:07# o/ B2 s, s+ d: A5 A6 H6 R; C
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |