【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码7 G' a+ n1 {0 C e
 
r& _2 F7 K9 V6 q1 Q# s5 l
% ^3 A! e4 i0 E/ T
- X+ K. e4 Z# H0 M. v3 h+ K% S4 d源码如下:* K# b# e: C5 I) G; T
 
" Q- o; X$ q2 a: C. O+ X, C) `趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
" `) ?9 r8 u: ?STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
4 u0 ]3 y" `) K2 J8 Z% KSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;7 w6 B# m) ^% E5 M
IF(趋势>50, 趋势,DRAWNULL), COLORRED;: w8 A+ r2 M7 v. k8 n9 ^. d
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
6 M( @3 S* Y( X R6 tK:=SMA(RSV,3,1);
8 A2 c9 O/ o1 K, eD:=SMA(K,3,1);' H1 p" H2 f* ]! X/ O
TYP:=(HIGH+LOW+CLOSE)/3;' ^) h% |2 S1 l
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));: m6 Y2 t4 P& E1 R, d% G
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);8 G0 @( b; q2 z4 g! Q( |
DEA:=EMA(DIFF,6);
+ ?! z* A7 Z9 [8 {$ NMACD:=2*(DIFF-DEA);
, o1 ^4 F2 K* X7 D' s7 Q% @! E4 p转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);3 v8 S7 ^" H( F3 i) N
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;
; m! E+ {; ~$ k1 v/ k/ OSTICKLINE(转点=0,50,50,6,0),COLORCYAN;
& V s# x `! i9 j顶部:90,COLORYELLOW;) j3 L4 P. A. v- h5 X" h' @
底部:10,COLORCYAN;: P4 {, ]0 u/ W0 ~% b- H. _
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;# a% n4 w3 U3 ^2 u
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;! s' z9 h" V. p6 U* M% c
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;, o! R/ k' H$ N6 }3 a* b
DRAWICON(CROSS(趋势,判定),判定,1);3 l+ j5 j2 U0 w7 O& W( I4 Q" x
DRAWICON(CROSS(趋势,顶部),顶部,2);
1 J X3 F( @$ g6 ?: p) x! ALC:= REF(CLOSE,1);* v6 b' i Z! w2 I* k3 f5 n
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
' v$ m4 q' m+ PVAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
5 F U8 Z7 |: \. t; a* ^9 HVAR2:=SMA(VAR1,9,1)+100;8 Z. N v) D3 b) }7 E
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
' g- y+ B1 D' o5 L7 `# C& S% i( C# NVAR4:=SMA(VAR3,3,1);& e$ ?: U" h6 D8 @
VAR5:=SMA(VAR4,3,1)+100;
: C4 g4 f6 Y* p2 e& H+ |VAR6:=VAR5-VAR2;
/ i8 a* i$ T. u( z% s趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;3 ` }: Z% g3 z% ^2 h
VAR2Q:=REF(LOW,1);: p) s# V" v! S4 A5 j3 c
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
8 [7 m3 ?& m( c% i* L$ J& `' l8 sVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);2 Q8 {2 y$ P$ E" S5 G9 B
VAR5Q:=LLV(LOW,30);' J8 k# n* u# z) g9 ~
VAR6Q:=HHV(VAR4Q,30);
6 m9 h) Y7 ]7 ?+ D2 o: ?VAR7Q:=IF(MA(CLOSE,58),1,0);
$ c' ~0 s6 D% sVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;+ T+ d5 `5 e$ Z" ]+ D
火焰山:=IF(VAR8Q>100,100,VAR8Q);/ C% _' `1 r& L5 y( b* N9 Y4 g
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
& l: s c! M. ^1 r& `7 D9 f- H+ {6 ZSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;2 G: K2 T `" v* Z
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
# R1 U& I0 ]+ x' U J$ FSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;) p" C0 x! [. e) m9 a
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
! M7 L2 j4 e& n' M3 GSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
- w" d0 q- ?9 _! m( S6 g% \STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;* F1 [# s: q) Y" Z. _
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
. s) T4 Q7 H- x( v: USTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
5 n3 j" Z' [% L$ [# x" r* vSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;- L- T- O/ L! C; k4 A' D9 \
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
7 J0 U( m! F# ^* N7 cSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;. P2 |7 e6 x4 n% _
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;! u; W8 n/ ~$ @- J- w. Y8 y& l
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;7 a! c4 [8 s8 [/ Q+ ^
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;! d& ~0 y( ?$ k( ?. @! V
逃顶:=CROSS(82,RSI);5 i3 v8 y2 j7 e. s
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;3 O2 V$ r& q- k5 v/ a8 ]
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
; V7 a* F5 P3 }/ w$ Q1 v2 ]STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
% l" r+ l4 E! L6 n; lSTICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;8 d1 {4 s- z c' j8 k* |' r$ ]
D1:=(C+L+H)/3;
" H% c$ x, N$ N$ f/ YD2:=EMA(D1,6);
2 O: k' S7 E$ U) |& N2 c& qD3:=EMA(D2,5);
+ j/ ~8 K+ x, |5 m7 yBBUY:=CROSS(D2,D3);
4 N1 m1 r ~ |4 a/ O& f风险区:80,COLORFF85FF;6 d, O6 D: S( Q9 ^2 Y( Z/ j
平安区:20,COLORYELLOW,POINTDOT;
% ], t2 P# u$ q% m. c8 q天线:100,COLORFFFF00;* _3 j: Z' U+ F3 |* `! ?
强弱线:50,COLORGREEN,POINTDOT;( q, s. \ n- n6 c/ E [
DRAWICON(BBUY,(LOW *1),1);
# t- C" }7 J, t2 ~VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100; c& `8 l6 |( i' g' C7 l. K
DRAWICON(CROSS(82,VARR1),HIGH,15);
% D- E+ p2 z6 D0 p1 i# kDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
' d z: H8 s3 K{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)8 O) S% ?( I1 m( z* L* ?9 f5 E
时间:2015-9-4 20:07# T0 R) r: e3 `: V
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |