【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
# @. i( D( j* N5 z ~ ; B, H! k1 q8 L; ~
) z: I, M* O2 l! f) B7 j* j8 b
+ N4 g% U" M7 ~5 b' q
源码如下:
7 f4 `1 t2 ?; z9 Q6 g/ N& D( P 
$ t( I4 A" z; c3 T趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;, l/ N# p4 S' v
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
8 L/ b' z: z6 Z* G. kSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
& c9 K& Q* H+ VIF(趋势>50, 趋势,DRAWNULL), COLORRED;' P O' w* H- ~1 \# P, v
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
9 a/ U9 s) n. [3 ]8 ] YK:=SMA(RSV,3,1);
/ l! \" f) R8 ^8 HD:=SMA(K,3,1);
- n+ K7 V9 B: A5 OTYP:=(HIGH+LOW+CLOSE)/3;( I1 Z$ T6 n/ P o _7 f" c
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
" `, H; l6 V& @' S- ` _DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
) X' \' n1 }8 r0 {DEA:=EMA(DIFF,6);. _. W. u O+ }4 [( s& m
MACD:=2*(DIFF-DEA);* T* H' \" D/ G8 P7 |
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
: s$ J- @/ A3 F* {6 GSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;! L% n( B1 K# Q
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
& P4 P, A5 m* B+ q顶部:90,COLORYELLOW;
; M! u, T# L& U* v7 ~底部:10,COLORCYAN;5 f# t8 ~9 k: a. X$ Y% C. N
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
4 z0 L5 Q9 e6 WIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;: e- O/ p0 Y6 n2 |4 m, I$ L+ I/ w7 M$ v3 O
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;$ r. ^6 s- F3 j Z3 _9 |2 T
DRAWICON(CROSS(趋势,判定),判定,1);
8 U& U3 v$ D9 d7 `) mDRAWICON(CROSS(趋势,顶部),顶部,2);
5 q+ O# a; O: F8 [LC:= REF(CLOSE,1);
# p K! F; k C6 s$ @3 h+ JRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;( X( _. s. ]3 R; f5 j& g
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
0 _2 ~7 q: l. h$ g, X) NVAR2:=SMA(VAR1,9,1)+100;/ Z' b# h5 E9 V( z, V
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;$ y0 F- J/ q" Z( H
VAR4:=SMA(VAR3,3,1);# e! A1 T3 |) Z
VAR5:=SMA(VAR4,3,1)+100;+ M8 P; Q. l) P) `/ t, P
VAR6:=VAR5-VAR2;4 v9 E } x- D3 I
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;7 @1 y; \0 L: O: J$ W3 V
VAR2Q:=REF(LOW,1);% c. E) S9 Y$ Y. w+ b N
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;; A, I4 o. u `! E0 n
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3); u* `. p2 Y& q& t& z% T
VAR5Q:=LLV(LOW,30);$ {1 }4 c3 x ~5 F# i) w$ h( k+ a
VAR6Q:=HHV(VAR4Q,30);: w @" Z: e. B6 l+ g
VAR7Q:=IF(MA(CLOSE,58),1,0);! U' D0 S$ |3 d7 k# H8 H
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
( r3 k1 s% ~) l; K! i火焰山:=IF(VAR8Q>100,100,VAR8Q);' G- J* T! z& t, I, I
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
8 I" t9 ~. m* ~% W& }STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;5 `: _4 }+ m/ X& |( S& Z
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;9 \: x9 I- }( S/ k
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
! d0 Q, c' v1 }) [/ k8 h- GSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
/ o) {) }: s$ N) c5 N- {STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;; Y" P8 I J F. G
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
/ o' m* E; L4 U6 o- lSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
8 V9 e# u$ Y4 u' N" w2 }STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
8 Y, q5 Z" R5 }STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
" F7 k' G4 @" |1 I0 n, XSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;4 e p( `) I S! L5 \ M. Q U
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;) W4 @$ U- y O3 y: r- E
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;2 q. u; \: O' ]& E
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
* e- W4 N4 W8 W* lSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
3 E3 W# o+ W( A0 W( R- M6 _逃顶:=CROSS(82,RSI);# g. o3 ^' @8 u4 F! ?( ]# V, T6 ^
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
8 e' |8 t9 O7 _* y" V0 WSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
- y! _ @; {( O+ h. USTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
4 D" E$ \7 A3 x/ M, aSTICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
+ o5 \" H7 }: F6 S' ~D1:=(C+L+H)/3;
2 A4 J2 K: e# _! ], ^: ^" ~D2:=EMA(D1,6);4 @2 `4 r+ p# ~+ }( f
D3:=EMA(D2,5);" J9 R" N# G" S* F# ^
BBUY:=CROSS(D2,D3);
0 ^* j# |8 E5 U7 L1 a9 E2 j& r3 P风险区:80,COLORFF85FF;
1 m' r# ^% B4 b: I3 }1 }平安区:20,COLORYELLOW,POINTDOT;: [8 A. w: y8 H
天线:100,COLORFFFF00;
$ F. B' G0 j2 C. P0 G* a强弱线:50,COLORGREEN,POINTDOT;" O0 ?( Y! ]4 Q0 ^; K
DRAWICON(BBUY,(LOW *1),1);2 q3 n; g. \# I* G" F" k7 \
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
- `) z# W+ Q/ P3 }! aDRAWICON(CROSS(82,VARR1),HIGH,15);! k' f$ z2 |. v) i
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;- e. r! b4 t: O1 [0 l B' c+ `
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
0 w! r2 k8 ], k时间:2015-9-4 20:07
- ]7 l- n3 |! Q( N股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |