|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码) P& x! ^, E; b# {# a
 
5 w1 d1 X" g& j; w
( D; G# X5 I' @% k4 D2 |* X
0 C3 ?9 C# [ `, ?源码如下:+ j. G8 U; ^$ A& g
 8 \! k+ h9 _: i G1 ?
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;! D( N2 V; g/ X% H1 s' m
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
2 A. Y) |3 z( `4 W# o/ S# rSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
0 T6 S7 Q6 C8 z! vIF(趋势>50, 趋势,DRAWNULL), COLORRED;
3 _" P& U) J! r$ GRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
0 F1 S$ F2 Q l _# C2 s+ iK:=SMA(RSV,3,1);! L6 W* j+ f3 \% {* C
D:=SMA(K,3,1);+ |% x) I O" w5 a3 a2 j
TYP:=(HIGH+LOW+CLOSE)/3;
4 r) T: W8 u! I# ACCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
6 i4 S8 e1 _3 e# uDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
2 T2 K8 ~' \+ T- V6 E& I4 lDEA:=EMA(DIFF,6);
) [9 B* V/ ^, B3 AMACD:=2*(DIFF-DEA);
# ?8 ^# d/ p5 U7 ~转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
$ S$ }/ J. R$ w- TSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;
- T+ Q" Q/ e) \) P( S) b# }# ISTICKLINE(转点=0,50,50,6,0),COLORCYAN;
5 w" Q, @; {2 z4 j; [/ K顶部:90,COLORYELLOW;
# I/ B/ d8 n8 y) O; v6 q底部:10,COLORCYAN;
; b. h+ }$ L* T/ ]. [& v+ R判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;# \6 }- @1 w) C6 E" k
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
. d, z! P H3 l* `3 cIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;+ z/ L( k" M. @1 M% n! r z; r! F
DRAWICON(CROSS(趋势,判定),判定,1); g! {; A- Y# e* f
DRAWICON(CROSS(趋势,顶部),顶部,2);; Q9 P+ K0 p( X% `( M7 i8 Y8 n3 G! r
LC:= REF(CLOSE,1);2 Q& y4 Q4 U1 C
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
' K1 x7 K# ]( N2 j7 {VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;( [8 E0 j; U$ Z/ K# n6 }$ M, M
VAR2:=SMA(VAR1,9,1)+100;9 a/ K$ Z% T3 f
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
/ G+ \, k& D0 r/ ^VAR4:=SMA(VAR3,3,1);3 I, i2 }' e4 }, G
VAR5:=SMA(VAR4,3,1)+100;
' D0 w% R9 h" @5 s" y+ pVAR6:=VAR5-VAR2;: l6 u& H9 H- l! n4 l& A4 y7 \/ ?
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;8 }! f) z. T5 k, {, o+ H
VAR2Q:=REF(LOW,1);
& s6 J3 M( l( V/ v- i3 g" ]1 l4 jVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;8 m$ h1 T( c8 c @3 E( g& r0 H. Q
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
* m& q& ?0 e+ K4 u1 {9 _VAR5Q:=LLV(LOW,30);
& `/ B& L; k' VVAR6Q:=HHV(VAR4Q,30);+ D% Z! f8 }5 ]& Z
VAR7Q:=IF(MA(CLOSE,58),1,0);
, ]* E' e' J! ]$ Y) YVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
% T: X1 Q6 _' J3 M3 b4 W火焰山:=IF(VAR8Q>100,100,VAR8Q);( }/ Z: O% f, {$ x5 V
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;1 a( `( N; R7 o3 Q1 I" W1 @
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;& P R% _9 } m' f9 Z
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;$ d+ F5 k* s% `! s$ ?0 V/ [" ~
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;2 ~0 F' S3 d p6 W& W
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
! E5 Q: B7 Y/ w) SSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
& |* {' D2 r; l; g% b: ]0 GSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;. _, }- h7 K; j6 q- O+ ]1 O
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
2 y( ]( c3 C9 ~2 q9 Q* w9 zSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
0 {+ q) i( W8 h8 w: W2 sSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
, J% A, c; @( H6 X5 U# j. sSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;3 x, f" ?5 i$ c {0 j# b" J
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
: _! i [. K* R( g; [. M1 L, cSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
4 \/ Q$ [/ i4 s8 g7 |STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;* y- m* U; L1 o1 D
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
8 O- Z% F$ Y6 [! l( f9 d逃顶:=CROSS(82,RSI);
9 s) o- Q6 \! p) p" P5 C$ y; mSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
! P1 G; y0 Y" ]" I4 F! B+ B2 J' |STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
$ j3 g! J! s5 uSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
) K# b6 h- B$ T9 f1 J! qSTICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
( Y. F( o2 z f& v) l+ T3 s& I3 i5 eD1:=(C+L+H)/3;
4 N4 E7 J% U+ [( tD2:=EMA(D1,6);6 ?, n' R! p: S
D3:=EMA(D2,5);
. ?2 S) @8 ]+ [! [5 \BBUY:=CROSS(D2,D3);& k# j# V1 b9 A5 e* b4 g
风险区:80,COLORFF85FF;! Q: P6 v; h& }, M
平安区:20,COLORYELLOW,POINTDOT;, E c# _" ]0 N) \! ]9 T
天线:100,COLORFFFF00;
, f; S5 z- @8 i# w0 I强弱线:50,COLORGREEN,POINTDOT;. _8 R9 e6 V3 P
DRAWICON(BBUY,(LOW *1),1);" c7 B5 y, J' B+ v: }7 K5 U' H+ y' U
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;3 F- I; f" @* X0 Y5 g4 X/ p
DRAWICON(CROSS(82,VARR1),HIGH,15);7 \$ g* d7 \/ D. L8 J9 L* j
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;2 G, U- d+ Z0 \ q4 [
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
`" @ i5 l! r: U* X4 U0 E4 x# h7 X时间:2015-9-4 20:07
/ r' l5 E7 ]5 @' v4 p- d股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |