【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码/ s) _, e3 z w4 k; {( p) a
 
2 E4 D/ q3 e4 S- }
* E, m0 }1 M. w( A$ j# [- M' o) A
源码如下:
) y$ E& r) X$ B# q: \ 8 H J& b# W1 f/ Z+ ^, `
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;0 S% j- t* J! ?, `
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
& ]: P3 L7 K2 @6 ~" [6 |STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;! r2 D1 x8 w: s" L
IF(趋势>50, 趋势,DRAWNULL), COLORRED;$ H( r: G* l; c/ A2 r+ m% S
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
$ E3 Y* T! Y: w T3 c! o! kK:=SMA(RSV,3,1);+ o: O5 G* p `6 Z. q# F: C* J! U. I, k
D:=SMA(K,3,1);
, x! R0 _ N: e4 @# nTYP:=(HIGH+LOW+CLOSE)/3;
( g3 k1 H4 h$ b3 {+ {1 j7 o" OCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));# V: s8 s; r* a- S" j
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);6 X1 x3 A0 J: U3 @9 l9 h
DEA:=EMA(DIFF,6); R. g. [7 L( b" A$ ?
MACD:=2*(DIFF-DEA);; W! v: X( z! _% C9 O6 F
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
3 w0 h' ?. d2 X1 b2 vSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;
: v/ \" O, J5 F; @- B7 `STICKLINE(转点=0,50,50,6,0),COLORCYAN; p# b! o3 }6 e3 e5 L! O
顶部:90,COLORYELLOW;
6 M$ A/ A* Q x: u: Y底部:10,COLORCYAN;) z2 H# E k5 S7 f- m' v4 b6 |5 K- w
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
% @4 I- M% @' _6 j9 | x" tIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
8 m( c* O! @1 h5 |. ^' JIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;+ ]2 d: t5 `+ f, R( f
DRAWICON(CROSS(趋势,判定),判定,1);
( a# g9 K o, {3 y: BDRAWICON(CROSS(趋势,顶部),顶部,2);' o5 W, A; _' n# d0 q
LC:= REF(CLOSE,1);+ {5 F+ [, l! `: Y# T
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;3 [. o( X: a M1 i2 \9 {6 G
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;" C' P6 O# q8 d
VAR2:=SMA(VAR1,9,1)+100;+ w3 S/ d) e$ m. ?% J; c p3 j0 J
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
) J# v+ R6 X: y3 bVAR4:=SMA(VAR3,3,1);4 b8 T8 B# L9 e: X* C
VAR5:=SMA(VAR4,3,1)+100;% v( e8 V: [) P/ E0 G# r4 `2 }
VAR6:=VAR5-VAR2;
) L, h# H! T+ {. @ d! h L趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;' |0 y/ [/ \' A0 ^4 s2 B0 E X
VAR2Q:=REF(LOW,1);
' ^0 q* e$ S) U# g/ w6 oVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
; t! g+ z" o) xVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
& k" L$ E$ N- s2 v% lVAR5Q:=LLV(LOW,30);5 ?' P5 ~" j& V! ~! j
VAR6Q:=HHV(VAR4Q,30);
. N& H! T7 r4 ?' T3 q4 h1 ~VAR7Q:=IF(MA(CLOSE,58),1,0);
( E1 t* a3 L" s( u5 s- l3 yVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
- F/ k$ g& T/ Q% X火焰山:=IF(VAR8Q>100,100,VAR8Q);2 |0 N- v- d* d- y$ M
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF; ?' M% i* E) k$ d7 _ @: @* x# y
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
/ n6 X5 h) o, H+ Y& t j# _STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
! i% y9 G$ L! G5 y' R% [STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
- E3 m2 n' g; n! JSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
' v9 V0 G5 S b% mSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;3 b9 _( V5 R2 ?- a
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
. @7 @% F, g7 t; u* Z8 h1 [9 pSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
$ T* I5 K3 y% h: r" BSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
! @) r& T D/ i a) c, J0 b. ASTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;2 q, e! }; g" S0 O/ ~* \* x9 j
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
- _4 g. `7 Z4 J. f# KSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500; v' a$ y' G4 `, b3 t; c
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;& T% |' T0 d' m# R
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
9 y, S8 ?& e9 g7 gSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
/ t( _3 {5 r9 Z9 P" }# R逃顶:=CROSS(82,RSI);
x( k! T+ u6 m2 I0 S# T4 q3 m- dSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
x8 A N3 N* \" w. z5 oSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
, R. _* t, o, d( o. V0 RSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
8 k, n; {" M; N4 e: cSTICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
$ {9 n, ` P: g. R hD1:=(C+L+H)/3;
. ]6 l$ W; v; d# T: OD2:=EMA(D1,6);
9 f4 x( @4 `' e `1 ND3:=EMA(D2,5);" {3 _1 V! P t
BBUY:=CROSS(D2,D3);
8 Q* {. X1 r9 I; Y风险区:80,COLORFF85FF;1 {& `4 t. o, _, u
平安区:20,COLORYELLOW,POINTDOT;
% {$ r6 Y3 u3 T7 x' P' T. w天线:100,COLORFFFF00;
, N; a, D' z) j( l强弱线:50,COLORGREEN,POINTDOT;% {; E8 f& M# V: i
DRAWICON(BBUY,(LOW *1),1);
4 F7 m" h" L) u. h7 g8 sVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;- x' A* s1 W, Y8 o8 Z& s
DRAWICON(CROSS(82,VARR1),HIGH,15);
$ O, _ |& Q% B5 a$ j8 WDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;: q# d; I3 w& l+ `- Z6 `2 `% V
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB). }- n) X5 h2 S
时间:2015-9-4 20:072 Y, {* P3 j1 U% S6 Y! @% I7 j
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |