|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码# c# D" z8 M* E: x& g! H
 
3 `& y' ?& D( R, c/ c( V. s7 B1 N& `/ ~4 l$ m+ ?
, C; z8 d4 V8 M; d4 e源码如下:
; i0 W1 x/ o) b2 z5 r 4 f/ `7 O5 t; j5 R1 j5 p
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;8 [) n9 f: @+ \7 p/ E9 K2 q# Z
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;& z$ C+ K) H: e; M4 M
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
- s$ s7 ?# {- D) i- c# R KIF(趋势>50, 趋势,DRAWNULL), COLORRED;& I* S$ o2 A2 J% R
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;& ?, K" Z% C v- B- L3 }* m. c
K:=SMA(RSV,3,1);7 R c8 o% p8 n5 A/ V& k n- Y4 O
D:=SMA(K,3,1);
- [4 N* r" J! N* o0 pTYP:=(HIGH+LOW+CLOSE)/3;# ?( t$ ^/ t. c, {" i7 y: H) b
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));" l3 ~# {1 M7 H" v* O
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);! ~( S8 p, c1 C
DEA:=EMA(DIFF,6);
; c9 v( t% p( iMACD:=2*(DIFF-DEA);6 Z8 q2 f6 R3 o2 W1 }0 L0 i& \
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);( k8 `5 ]8 \" V& j+ X0 u2 e
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;$ y: E N7 r; `; [/ E7 n: v; q
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
6 O& M! T3 \* }! A! X' d& O顶部:90,COLORYELLOW;
3 g: Q5 Z/ e4 X% e- v4 z* p) o; u5 c底部:10,COLORCYAN;
8 {8 e- C9 V* {5 j1 A3 N判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
2 o8 `* u1 T. [+ h/ ~* iIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;1 J5 t% q2 |9 y4 r
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;# m) e+ v! U4 o% K- J$ I7 Y
DRAWICON(CROSS(趋势,判定),判定,1);8 n8 {' B5 L' J; M& v6 y- Q; X
DRAWICON(CROSS(趋势,顶部),顶部,2);
4 R$ X( { s% W/ C( rLC:= REF(CLOSE,1);8 K f) G" w: j" {. Y0 I
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
b! t; v6 i5 w1 A1 [+ wVAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;9 l" x4 a, {& C( ?& e
VAR2:=SMA(VAR1,9,1)+100;! ]9 B/ e( `8 l9 x
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; k, i; _. ]% G6 u x9 R/ q
VAR4:=SMA(VAR3,3,1);4 n6 g2 O$ u2 {5 Y+ F+ X( Z
VAR5:=SMA(VAR4,3,1)+100;
0 u- t& ]5 G2 H. ?, A) Q7 m) I; LVAR6:=VAR5-VAR2;8 p, X' Z, r2 O, o
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
+ i0 e3 k2 _: A4 `VAR2Q:=REF(LOW,1);
" f5 A2 O& z& O8 e' N1 M9 u& }5 \VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;7 V* V; d+ ~3 b) u; N, w$ m( h
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
; s! n3 k$ U. U8 h" RVAR5Q:=LLV(LOW,30);
" l7 F- B1 V; y* P1 W8 hVAR6Q:=HHV(VAR4Q,30);1 `. a$ f2 g t; ^; o
VAR7Q:=IF(MA(CLOSE,58),1,0);
$ x, I! V p7 W+ Q+ tVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;; l, f/ h1 x# q# \! f* L2 V
火焰山:=IF(VAR8Q>100,100,VAR8Q);! @1 c5 p$ C8 u* i6 L9 a, }
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
" ]+ [/ p" t% F( O5 ZSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
( c2 _; R6 ^: ?. C( ?7 e1 o6 dSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
0 j2 x+ B9 W, k) F! J% x7 uSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;2 ^: _3 d4 N! I6 R+ D$ V; R
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;( d% a/ A5 [5 d
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;% \: y( p/ e7 `5 f
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
- |4 A5 w8 L% ]& W& D% N1 Z: PSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
: l' }7 \0 L- c$ i5 i" @& CSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB; M2 w: y4 N- M( L3 o. C0 e r
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;$ k2 E7 L$ U& j7 X- y" ?* S' \
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;" p- H$ S! Q4 x. L, W0 q4 `8 Q
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
! B7 ~: q: t, p) C: H+ W4 L5 rSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;/ s. Z" x! Q' N+ u
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
$ r; z' X/ w* i- DSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;5 x! J8 j/ B) j$ H: {
逃顶:=CROSS(82,RSI);
' E" T0 l9 A- R; b Z- V' r4 ~/ y- Q o* ISTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
) T- I8 W' z! u" a( U) KSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
, c0 K! J+ G3 X/ p0 uSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;: c6 U* {- w, z% [0 X# J
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;4 f, t3 s0 T/ D$ Y% j
D1:=(C+L+H)/3;
- e3 ?( x2 j y- |' m& i) r VD2:=EMA(D1,6);! ?$ t8 ~' Q# Y1 c! A% I/ n
D3:=EMA(D2,5);; K3 P5 [+ ^# @' c4 \* N
BBUY:=CROSS(D2,D3);
. Q) w1 |1 D3 r风险区:80,COLORFF85FF;2 g. s( f. x/ k0 Q
平安区:20,COLORYELLOW,POINTDOT;+ |2 L; P0 S9 V) Q" w
天线:100,COLORFFFF00;
7 f' O0 s: A I9 w" R3 H强弱线:50,COLORGREEN,POINTDOT;3 X3 u! Q# h9 Y5 z; F3 O
DRAWICON(BBUY,(LOW *1),1);: `+ G f; ]; @5 A* T7 j5 G! K
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
: [" _! E' R9 w4 i" \! zDRAWICON(CROSS(82,VARR1),HIGH,15);
) k2 e+ t7 L1 t$ Q, pDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;. s# u+ e1 f% @/ ^- H) a
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
# v I- J; o! b) j9 A6 f5 k9 S时间:2015-9-4 20:07" [- p4 e+ N3 u7 M1 S$ U
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |