|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
! z2 t" f; Q' v$ {% O. D5 E6 m 
1 i- Y; ?4 D( I6 t
8 S: r8 b2 A( n: w5 i+ x- }0 n- }3 n2 }2 X* `; F
源码如下:
8 c. K; y% E7 w9 _6 P 6 v8 f- u1 C, e3 _' F& |1 H
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
' l1 `5 ]" `# T( KSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
( Y1 L5 |; J" ]2 c+ i- @2 USTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;" B- `- h' l y6 p
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
1 b. V' m' H( q$ G3 ~+ j! O0 gRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
, S7 {2 J4 m% F! N6 P3 g) HK:=SMA(RSV,3,1);! C1 f M# X6 A! K% a) m3 Y
D:=SMA(K,3,1);
+ C3 k8 E+ I2 R$ mTYP:=(HIGH+LOW+CLOSE)/3;, F6 z6 U* k8 h+ g$ I4 y3 R- j
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));$ a5 B' O* Z" i# b% V
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
: k) H9 W6 U8 sDEA:=EMA(DIFF,6);
: h9 d* F6 ]# f1 ZMACD:=2*(DIFF-DEA);
! N1 c2 c0 |4 x* K1 |转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);, {; W+ V# X9 G/ S0 }" i3 f1 |: A: Y
STICKLINE(转点=1,50,50,6,0),COLORYELLOW; L' s- ^0 K: J' v4 {) k8 Z
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
: ^5 b. ?6 E/ I" g) R2 c* p9 u' _顶部:90,COLORYELLOW;% n9 ?/ q* b( a( t! R
底部:10,COLORCYAN;$ r* A8 }7 c5 p( @. i
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
* Q. R% b: J2 G7 QIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
: @6 z- n7 x, R0 J( R3 d# `IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
2 x" K1 L. _- b9 I; wDRAWICON(CROSS(趋势,判定),判定,1);
$ _ p7 ~% J, I' e3 [; gDRAWICON(CROSS(趋势,顶部),顶部,2);2 n( H4 g8 C( P0 B
LC:= REF(CLOSE,1);
' D$ u* T- V3 F+ s. n0 Y5 yRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;1 N0 Y( d6 d( R$ z+ t
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
" B/ _% D5 [# ?5 K. K# gVAR2:=SMA(VAR1,9,1)+100;; H: a' A: x) k" f* o0 a6 H
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;3 w) z" d8 Z' a/ i7 o2 b4 t! j) ] v9 v
VAR4:=SMA(VAR3,3,1);# X) j+ v4 T6 s9 `) |# I
VAR5:=SMA(VAR4,3,1)+100;
6 y9 E: L- X# i. xVAR6:=VAR5-VAR2;- R9 B% \- a) O8 d; W
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
0 Z7 ^7 w/ Z% d; q0 m+ UVAR2Q:=REF(LOW,1);
* Q5 b# R& ~: H) n" XVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
* \1 W, T" a$ f) f# ZVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);* n! |' ^& N4 I
VAR5Q:=LLV(LOW,30);+ l% m2 o# @& e! @* n/ L
VAR6Q:=HHV(VAR4Q,30);' D! \7 t, u) d) t' n
VAR7Q:=IF(MA(CLOSE,58),1,0);+ L' `* Y# t" |5 }- P8 a
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
- X' }/ Y; b8 ] n7 \9 G+ [2 c火焰山:=IF(VAR8Q>100,100,VAR8Q); H1 S' A# J; j+ N G, g
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;+ L0 r5 [! T- }7 Q( e2 m
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;* M6 U8 d6 X+ s9 |) k9 Q! r
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
0 Y- Y3 s$ V3 g( JSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;2 p9 `0 |; y5 H; j8 Q" t5 Z
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;1 P* ^) E, V" K+ x% t
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;+ R6 J9 H( A( q$ P
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;) S% _9 J8 E9 \4 N% c" W1 T! E
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;4 Z, I7 C3 c. D! z
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
. N( c6 @- y- a, [% bSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;( ]2 E1 b6 j' {2 P" q4 z
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;# H! u- p# B; `6 u) W
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;/ u4 L$ [5 L! n5 A* K3 ~
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
5 i- V3 J+ y9 k0 z4 Y: N7 T% u* v* c3 O6 iSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;! Z# J% d, f: a3 M
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;% x( l% M9 P7 X8 r- k, _# q- L
逃顶:=CROSS(82,RSI);
3 Q" ~$ x+ {; ~* r* t# tSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
; \1 e) `; w! S: ]STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800; k$ B8 S& t; G& x
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;+ n, @; x5 I4 c; [
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;/ R/ J; f1 `, m, V: N
D1:=(C+L+H)/3;
3 v2 |+ W, H+ U b- i8 c1 S! X4 tD2:=EMA(D1,6);( O. r$ i# Y6 H" M; ^/ }
D3:=EMA(D2,5);
0 D& P: q" ?5 @- S! Q( sBBUY:=CROSS(D2,D3);
. I" u1 n$ ], N* N) ^风险区:80,COLORFF85FF;% t, `- A2 ?) a# q7 |
平安区:20,COLORYELLOW,POINTDOT;
* a2 b0 X. ?! @' ?7 k5 r% R2 R天线:100,COLORFFFF00;
+ C/ R* v9 x7 z强弱线:50,COLORGREEN,POINTDOT;! g9 U1 y) ~- ~# q* @0 ]# @
DRAWICON(BBUY,(LOW *1),1);- j5 V# ^3 Y3 F! w
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
: u, d, p- \* J \% IDRAWICON(CROSS(82,VARR1),HIGH,15);
, S$ Y8 I! ]( r2 tDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;6 _2 | v1 V1 w3 g9 |/ ^
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
8 _1 M" `2 ]. }! J+ p时间:2015-9-4 20:07
i3 K5 U2 z* T. a股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |