【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码' b* Q" }( v$ ^/ Y$ ^( x5 ]0 Z
  ]% g( g1 C; A
! Y6 ^0 X; K. z! F- Y/ [! c
8 t. x2 W9 M5 O; k( T源码如下:" e" N, b+ J6 |/ o
 
; |- P' D0 i: L; O6 t7 B# O! o趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
5 y/ ]+ z& ~1 Q1 G4 U& s% s2 GSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
1 D; o2 h. P1 O+ h2 a* nSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;$ H1 h! M0 F P) _- B
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
8 N3 |" U) R6 K9 F3 zRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
; \) @; V3 F4 j6 }K:=SMA(RSV,3,1);( Z+ z, M* H: p# h& E! @
D:=SMA(K,3,1);
/ I+ M* O$ V! g* i% TTYP:=(HIGH+LOW+CLOSE)/3;. h- S/ l0 k0 C, l! j7 M
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
( d5 M7 d1 p* d; L4 bDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);8 ~8 A. i1 J, G# n, f! |
DEA:=EMA(DIFF,6);
& T: B" W# r3 `( PMACD:=2*(DIFF-DEA);
- L+ x) `: V- s9 [转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);$ a q. a+ k" Y
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;& Y% z/ p& C4 p; W, _6 `7 t
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
Z7 |! U b# d$ S顶部:90,COLORYELLOW;, l$ {9 q8 B/ I& Y J+ C+ t
底部:10,COLORCYAN;6 U' n/ u) j+ K; Z" g
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;* \" f9 k' l$ S2 z
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
, f# @$ F- J( E4 ^IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
1 M9 H/ a0 [ h8 C) g0 m" ], WDRAWICON(CROSS(趋势,判定),判定,1);6 B( p6 x: c; _ g- A( ]
DRAWICON(CROSS(趋势,顶部),顶部,2);: U4 c( X( ~ z% `
LC:= REF(CLOSE,1);
4 A, l+ _+ C" {. v0 w: [RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
* q$ v8 D; ?( m5 S* @9 {VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
3 V7 [$ _- t5 o) VVAR2:=SMA(VAR1,9,1)+100;0 D4 V6 G6 l" I4 B' K! Y
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
# s) @* X! Z. _/ P) k9 RVAR4:=SMA(VAR3,3,1);
% ^$ ~7 O- P* P7 N/ T: ]VAR5:=SMA(VAR4,3,1)+100;
4 u" L2 |" N: K FVAR6:=VAR5-VAR2;; i3 U8 Y' i$ _
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;& Q" y) \& C& C# D
VAR2Q:=REF(LOW,1);1 J/ z S2 n4 c" r! v) T
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;0 }# Y t$ w a5 ?9 w
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
$ \3 b9 {$ m) @6 X, {1 ]* M" SVAR5Q:=LLV(LOW,30);
: G7 _' ~( C+ a+ J) I+ X' MVAR6Q:=HHV(VAR4Q,30);
5 Z: D4 |& u: v& wVAR7Q:=IF(MA(CLOSE,58),1,0);! ^: u+ J/ u1 b; l/ b) o1 s9 {
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;% `! M/ T5 m1 D
火焰山:=IF(VAR8Q>100,100,VAR8Q);0 L9 C0 z/ D+ g+ U
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;! M, i8 m$ S, }
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
, @' V) q. R$ w7 bSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
: E6 {8 h) F' A( e( p0 p( k% KSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;7 ~# \9 ~; M& r# {- B
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
4 B2 f6 N- V$ d* K, fSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
! S5 H4 g! [, U& F: nSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;$ E5 d7 T. H( }. t& d
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099; K; c- _. n9 b" p. h ?+ B
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;; I7 `; r0 F5 W3 y- Z3 T5 |1 R
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD; }. J& I( y: @0 V: F! @
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;1 b" `- S/ {$ e) \
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;# K/ Y" J5 R' h! D! y" q
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
8 d* S9 o3 a y7 w5 O. e4 {) XSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
T+ @) x( ?: F9 [; X+ e5 BSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
8 k s6 V' r8 Y3 J8 N: q( k$ |5 d逃顶:=CROSS(82,RSI);. I: r- s. v- {/ ~% }
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;' D; f. x# x6 b
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;1 l. G/ {" e: h% D
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;; B* Z) C+ D" s s' v) R
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
. R7 ~- U6 L$ e: p1 Z8 XD1:=(C+L+H)/3;3 t( o5 X$ ~* w
D2:=EMA(D1,6);4 T' f( P4 G9 h
D3:=EMA(D2,5);0 e6 W t& F1 k- G3 q. n3 b3 g
BBUY:=CROSS(D2,D3);* e j; M3 V& _8 b3 k4 h7 o
风险区:80,COLORFF85FF;0 a% `# a: B9 P
平安区:20,COLORYELLOW,POINTDOT;* ^7 P( |) \( c
天线:100,COLORFFFF00;
. j/ b7 b9 d: \* `7 P+ [- b强弱线:50,COLORGREEN,POINTDOT;
+ n0 x! t6 _. H/ R5 uDRAWICON(BBUY,(LOW *1),1);( g; o( o2 |3 r; z+ j. d
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100; p8 X" C% A5 g- V+ r
DRAWICON(CROSS(82,VARR1),HIGH,15);
0 K0 f1 a# s- E, Q7 KDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
9 p, A* T9 ^+ {7 c. I* S0 A{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)# M6 d9 B0 {* n9 \" O
时间:2015-9-4 20:07
6 \. }9 u; N6 U% _股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |