|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
* D% O3 P3 K+ F; }* _% N; B 3 X( O2 y! r, v1 m, x% c
, M0 F% z5 O3 u
8 g3 A; |" Z0 o: I源码如下:! j) l$ M& Y# S; I
 ; g0 {) ]! _0 @8 Z
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
+ B" m) C9 N% Z( H: U; V0 \* LSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
7 [, U. {! k: x" Z( pSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
7 Q3 ]3 z0 Q V; F7 U# X1 f; DIF(趋势>50, 趋势,DRAWNULL), COLORRED;7 V* @( h2 b- l: c8 P$ ]; T8 R8 a
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
" C4 U: n, e& eK:=SMA(RSV,3,1);6 [5 d' }1 Z6 c: A, q$ B
D:=SMA(K,3,1);. e* p# K% d* ^; G0 D
TYP:=(HIGH+LOW+CLOSE)/3;3 _6 W Y" J8 O1 Y% h: Z
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
5 B! w! i. |2 j b& ]DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);' F/ C/ H3 L$ D6 S
DEA:=EMA(DIFF,6);2 t: B+ e! m4 T" M' S
MACD:=2*(DIFF-DEA);
" @$ a6 E. L% D6 I- M: H转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);* U& y* e; `, |* Q5 z' i# a P
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;3 N9 b- ^9 ]! d2 Z% T1 e, w
STICKLINE(转点=0,50,50,6,0),COLORCYAN;# C" a4 Y4 G0 \: f, v# d h7 i. j
顶部:90,COLORYELLOW;
0 \7 \" e, B1 t" X' G2 ]' I0 H底部:10,COLORCYAN;0 O/ N& x# z/ l! R
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;9 n, b" p9 ]/ N
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;2 q$ M1 v+ f9 J; L% s4 O
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;! [: x& [1 S% t% S' N; w
DRAWICON(CROSS(趋势,判定),判定,1);+ h) w6 R8 w5 k6 K$ V. q* f7 v
DRAWICON(CROSS(趋势,顶部),顶部,2);1 H- u# Z @! z6 C5 Y/ x6 V- w
LC:= REF(CLOSE,1);
+ K6 q- R0 R' _" q, m* E, M. JRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
/ ?$ s7 {6 g5 A" g) `) @VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;4 E( ~# g' D d6 P# ?6 u& x% H
VAR2:=SMA(VAR1,9,1)+100;2 l6 {$ A9 n% y: \( E
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;; S9 ?+ R" P- E
VAR4:=SMA(VAR3,3,1);8 \' K+ `. U8 Q) q. F: W! o
VAR5:=SMA(VAR4,3,1)+100;# Y5 e& o& o( H0 k& S( o8 x
VAR6:=VAR5-VAR2;& ~' \& k$ @0 Z+ J# L; Y0 Q i
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
9 C% X% u/ ^% y9 a" QVAR2Q:=REF(LOW,1);
) Q7 o! K6 @2 f! j* T @VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;5 y6 X" h( K: y [
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);5 ?& T( ~' e6 k3 U
VAR5Q:=LLV(LOW,30);
8 c, c9 g. M3 O8 M+ RVAR6Q:=HHV(VAR4Q,30);- [- `& r3 V3 p! ~$ @* v0 L; k6 Q
VAR7Q:=IF(MA(CLOSE,58),1,0);
; \# _, Y$ p* m6 CVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;! S8 g& m9 v! E u( y
火焰山:=IF(VAR8Q>100,100,VAR8Q);
}( j/ a( ^9 E' kSTICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;: i _4 ^. n6 O: \9 Z7 b/ \8 j
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;. B' G8 @- T1 l/ o. i
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
) |: r( o) C5 k- ~& V! a8 NSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;. d9 H: V. M# n, \" P1 I
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
* L, }& l; [* {9 Q) W2 t2 cSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
# I- x9 w9 L7 T9 D* xSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
0 [5 [/ i5 ^- \$ K, e& h& ?: Z' X* T6 KSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;: f, g; B: ]& a# i f# a% x
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
; Y, y7 `% ^1 x9 y% r. A' TSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;. h; `( B p4 k
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;$ a5 C/ s: K* {; L' c
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;& y( `% G/ J: ` e, k, B2 X
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
. P- i' ^, W6 ]# M: @* P: w+ LSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;# {5 t6 o" {0 A( ~9 ]
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;5 {! ^% q. \. ]& T1 X0 Q3 O a
逃顶:=CROSS(82,RSI);
6 O$ r9 S5 A2 JSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
+ j8 f& s, u2 T0 _4 {& T. WSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
. T( p. s! R) h3 S H8 [1 JSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
2 C( j+ a/ c+ F4 b2 L }5 ^STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
3 Y x- i( w! q: _) ^9 _D1:=(C+L+H)/3;
H* A% m/ ^/ P3 u- O- [, TD2:=EMA(D1,6);' J4 G- N0 a y7 |; g. \; ]$ f
D3:=EMA(D2,5);9 V4 A1 |6 I1 A& B
BBUY:=CROSS(D2,D3);* J5 @2 W! {0 j& Z" e
风险区:80,COLORFF85FF;' K& B1 P7 Q. Q* [- Q
平安区:20,COLORYELLOW,POINTDOT;) V5 E% i* u5 Y+ `4 x5 C9 Z# I
天线:100,COLORFFFF00;# @9 a B, D/ q, W
强弱线:50,COLORGREEN,POINTDOT;
2 S4 d, A" B) F" w# QDRAWICON(BBUY,(LOW *1),1);
9 Y8 i+ k& z8 i% u+ OVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
( x8 b7 w- D# U$ L5 ^9 a; m4 mDRAWICON(CROSS(82,VARR1),HIGH,15);5 n3 h3 k' h( u+ S, u
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
% i1 u- a' R/ R, N- a{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
% B2 t! K% h3 F, F# h3 b时间:2015-9-4 20:07. {6 C6 r* ^9 }! v- h) W" E5 d
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |