|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
- a; c& D' p3 a2 S 0 P! J: X& o/ U2 r3 Q: @' G
- A" L# c5 s3 m3 O4 _8 h+ {2 P/ Q! e& x' p& w
源码如下:* O* K# W* ^; k* v6 I* G. P
 
3 g/ R. N% g. A3 M0 E趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
" q( v. q* Q/ Y( c8 f6 uSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;$ x. Q: c5 Q* Z8 E/ j' H. D
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;; o B% H. f, L, M
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
( P8 ]; u9 r& s% T$ x8 vRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
5 e2 n0 u& K! P" }$ p. |K:=SMA(RSV,3,1);8 ?" w) s4 ]4 J$ P. }( z8 g
D:=SMA(K,3,1);
: @& r. U' Q H* r6 w/ RTYP:=(HIGH+LOW+CLOSE)/3;: E. r7 T5 X& f- M0 l
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
0 k; C# u8 }+ v* p7 x# tDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
Q$ g# `( U& rDEA:=EMA(DIFF,6);) A% Z3 U$ T+ B5 m
MACD:=2*(DIFF-DEA);
# ^+ q: E7 M( o转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);* P% q1 } r, J4 `0 R6 l
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;8 Y) d. t2 f- r: v- S' H- i
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
" c# u5 D) l9 z# @* V J( ?顶部:90,COLORYELLOW;7 p& J/ ]8 v. h D
底部:10,COLORCYAN;
, \8 ?3 u$ H' ?$ x1 D" R0 Q判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
3 G7 B( r" d# R8 B( pIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;% h+ f5 ]) t: ~5 S z6 Z3 |
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;% c, ? e- i% f+ V) V& z2 S
DRAWICON(CROSS(趋势,判定),判定,1);4 {2 C& V) r" f: c: C! G" B$ W
DRAWICON(CROSS(趋势,顶部),顶部,2);, N5 `4 p1 t% E+ Q, ^: ^1 t
LC:= REF(CLOSE,1);+ W# S1 |8 Q- R" {* }2 m( y% K
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; g. W& V! M8 ~* R
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
" v* s; W# x, ]4 t( e' ZVAR2:=SMA(VAR1,9,1)+100;
& c7 h; }, G5 x% g6 n, t8 D; [- @VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;1 t1 B7 n/ c, I" E4 Y: D
VAR4:=SMA(VAR3,3,1);/ P' l" Z0 f/ x! s/ j$ j
VAR5:=SMA(VAR4,3,1)+100;
$ t& S# r& |2 I# hVAR6:=VAR5-VAR2;8 B4 y; q9 u( J/ e- `
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;+ E1 b, [4 J1 K
VAR2Q:=REF(LOW,1);' Q4 K0 ^+ P4 j
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
1 R( G( Y* S5 D! t$ mVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);$ F) w7 o2 w" |/ j8 M5 _6 D! f
VAR5Q:=LLV(LOW,30);
8 ]7 b1 [+ J: [ E$ iVAR6Q:=HHV(VAR4Q,30);# n6 a8 Q7 G3 `( w
VAR7Q:=IF(MA(CLOSE,58),1,0);/ |/ L8 P8 Q2 F' ^/ [
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;* K+ r. Q# Y) x6 E5 P0 G
火焰山:=IF(VAR8Q>100,100,VAR8Q);9 J, u0 \5 h! O; d- s
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;* v& w6 A/ [4 Z7 A
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
* T8 B) H- _$ R3 ~$ f SSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
( i/ e! e) d. x8 s9 HSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF; X7 @ Q0 t) j( V" C: C+ {
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033; s7 N0 n$ W0 g7 a, q4 Q" }
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;+ E, M% p2 @! b7 p! t& r$ |
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;" p: J+ N# l; U6 J, g; `& s
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
0 Q5 z# @$ [! M1 SSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
* K# p7 Q* ]* Q: oSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
' r7 C+ P: H* X6 z/ o* I3 mSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;* ` r+ D l7 ?" }
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
3 s o8 N. m# a u0 JSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;& `# o7 M% N2 Q3 n$ K7 H$ t! `4 ^4 D
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
8 C) }/ I8 ~) A6 Q6 A+ E; fSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
% U1 C1 ^* G* N H6 X2 `逃顶:=CROSS(82,RSI);
& M0 Q+ M& }7 I# L ?1 WSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
8 S" B/ E# k- ^) p$ xSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;( {! r+ b/ a& |( s( Q8 v
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;8 C0 A n# ~$ t
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;. H& T' A5 P# Q, M) D5 Q4 [
D1:=(C+L+H)/3;# {. t* m' S) L! ~1 U7 I8 E' ^) }# S
D2:=EMA(D1,6);
. v8 M8 k7 _1 c; w- ]; I7 OD3:=EMA(D2,5);
% H, R) ?$ ~4 N) `8 X" r* tBBUY:=CROSS(D2,D3);
5 R% M$ u0 w" b( m( J: R. X风险区:80,COLORFF85FF;
^) ]% A- C w& f9 B9 a* J平安区:20,COLORYELLOW,POINTDOT;
/ p7 G; v+ ~, o9 j. }天线:100,COLORFFFF00;8 i9 Y0 Q4 ?, C' ~2 W) m& X3 @
强弱线:50,COLORGREEN,POINTDOT;0 d1 S9 ]" a0 r+ R
DRAWICON(BBUY,(LOW *1),1);/ o4 i, L) U. d
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100; f8 q% |) D, a2 {: q: {5 v( s
DRAWICON(CROSS(82,VARR1),HIGH,15);# e5 o, e9 c6 J, t
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
9 ]2 e) W: T: ^8 b{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
$ [ ]! o3 M3 R) M' v+ @& a) S% R时间:2015-9-4 20:07
. d v- z7 M: e0 ?4 D F股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |