|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码5 a. Q) Z# ]' a+ H9 L$ B0 @7 {
 
: N* l( ~* c$ u Z5 w
9 j% b5 [4 p3 Q0 `7 d7 x2 i! M6 o$ q7 @
源码如下:. P$ J! j, h5 }
 8 z' W, s E% G9 ?) i: M
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;( e X( I/ ?0 J) a+ I4 X) E
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;5 ]+ }* I9 Z( t. }% s6 t
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;7 I* a- w: _, X. j0 Y. ?3 i+ L
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
' D/ i5 A: p h }4 n. RRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
$ I5 d' u% a$ ^+ C/ j( mK:=SMA(RSV,3,1);
' X4 Y7 u7 A/ h3 e8 i# e6 M uD:=SMA(K,3,1);: ~. R ]1 y2 P: O& Y
TYP:=(HIGH+LOW+CLOSE)/3;7 u+ |3 c. K3 d0 T+ J2 K; t# y
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));8 z$ o1 w! N4 e" Z( T* e. B3 }3 {2 R
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
8 R0 z/ b3 n( S- ]- }2 `5 P( ZDEA:=EMA(DIFF,6);9 @& V# r6 P! q1 C$ S- n2 J; X) F
MACD:=2*(DIFF-DEA);! N( }, T& p" k& Z% W7 q
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
2 t. g K' N- Y9 _) kSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;1 f8 i3 `) d) W& T
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
" V# D$ n# o4 ]$ m顶部:90,COLORYELLOW;
/ S# P* C1 R+ R! x! i7 j. x- ~1 T% Y底部:10,COLORCYAN;
$ n2 Z' y: F$ D4 Q3 j: b1 ]判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;0 _" N! B2 z5 d# e7 a$ a
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;7 _; Q8 a& F1 ]4 n5 s% R0 O/ ]; P
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
: d2 X1 F4 M2 ]9 QDRAWICON(CROSS(趋势,判定),判定,1);0 [! B. J, ?" V
DRAWICON(CROSS(趋势,顶部),顶部,2);. b0 Y; A7 r) T3 g) k1 ]1 c: U9 H
LC:= REF(CLOSE,1);
# V% i4 s7 `; S. xRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
- U* g; F$ g8 A2 PVAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
' K# [/ m! h' C V2 c/ S( W2 LVAR2:=SMA(VAR1,9,1)+100;
3 r' f' ]- _; F, @8 k) I3 rVAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
6 N+ f" J' Z& W; R% }VAR4:=SMA(VAR3,3,1);! v- _5 Q6 j; C$ H/ n$ i5 Y7 U8 s
VAR5:=SMA(VAR4,3,1)+100;
; W2 z3 W: V. ` q6 gVAR6:=VAR5-VAR2;
. f) o, T( n6 C Y趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
9 ` o7 j. u9 u! jVAR2Q:=REF(LOW,1);, } N" s' j- V: d
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;# {% P) Y8 ]% L$ }3 u
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
8 r3 Z, r1 j- d5 p/ AVAR5Q:=LLV(LOW,30);
9 s) v9 p/ I* c) f, d9 k: MVAR6Q:=HHV(VAR4Q,30);$ Q& N3 h8 Z( @4 @8 G3 ~
VAR7Q:=IF(MA(CLOSE,58),1,0);
+ M3 b( r) p% c {9 G U+ ~VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;1 d- P8 h+ H+ [5 X5 d
火焰山:=IF(VAR8Q>100,100,VAR8Q);' f$ H! j: ]/ p; {4 G, [
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
" Q' O5 |( r0 y- n! Z0 NSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
9 k) x6 O, J* YSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
) i/ U1 R5 }6 m* DSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
' p4 `& s: t g; }8 D8 SSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
; l2 M* F9 i( v$ aSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
# F. q, {( C/ F' ?7 ESTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;3 A1 Y6 d& n9 r2 z" t
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;+ G& d& W* \% z( Q+ }; V0 {' T; ^
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;8 o# G- `& h5 A3 h6 w( K& W7 R$ {
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
& a8 |9 j7 Z0 W' E+ a$ |STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
" l$ F8 S0 N% }/ J' f$ Z0 _9 ISTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;% E1 ~9 o3 e/ L9 D1 _
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
9 R' D+ B9 V- [# oSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;( r. [, {1 \5 j4 i1 D1 L( b0 w; `9 W
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
. m: W- Y, E% ^! P! P逃顶:=CROSS(82,RSI);
6 o% ~/ K% G* m! l# }: U$ lSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;5 U* k& {2 V5 H6 K
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;/ g+ G1 i" o3 D
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
; [, K4 A6 F7 T( r8 J! x: ~% }9 PSTICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
4 t9 e O( g, F, |/ y# YD1:=(C+L+H)/3;, x- ?$ o& b: s# k) @0 R
D2:=EMA(D1,6);
) Z& ^/ s! {% W% C& }" ]D3:=EMA(D2,5);* h8 Z8 G1 A* c* f+ P
BBUY:=CROSS(D2,D3);
( }8 `/ T" ^3 ~5 \0 w) j/ U# j风险区:80,COLORFF85FF;
( u3 U/ @8 s1 n5 t平安区:20,COLORYELLOW,POINTDOT;( S7 K Z& D2 J6 C! s
天线:100,COLORFFFF00;% d4 n( y9 X; e. y3 _
强弱线:50,COLORGREEN,POINTDOT;
b T# N$ ]/ }: D0 XDRAWICON(BBUY,(LOW *1),1);
! p+ m( f$ K, b/ x/ h: w5 mVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100; I% S7 e) { _ ] [" X
DRAWICON(CROSS(82,VARR1),HIGH,15);
' l) e6 r3 X7 m1 H0 ADRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
8 B% a9 e- y6 w% A( M( h{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
) J* O8 E1 _: a! @: E时间:2015-9-4 20:076 D2 d3 E2 K- n$ V+ F
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |