|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
7 H. }7 k) U! ^! T. ?$ P" r9 S ( e+ Y9 t5 T* M
6 }% T& i- h h! H
8 N n( q5 g: _3 j4 w* ^8 \源码如下:3 L. J8 E5 }/ C# l: q
 
, Y2 y$ O) M4 e# l+ Q" [趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
, W& @) l/ Z% Y7 n: mSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;/ D) K! a& c8 p+ i
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400; R4 |3 @$ F/ ^) ~. g
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
* O ~3 u9 T" H; a1 Y5 b/ ~RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;( D8 x; c# T& \# a! F/ L+ F3 Y
K:=SMA(RSV,3,1);
4 E9 ?6 R+ G4 C2 R1 I/ M; `D:=SMA(K,3,1);0 i5 ? L! W: Y3 j2 U4 E
TYP:=(HIGH+LOW+CLOSE)/3;8 L& \* B: {% g2 n7 X
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));# X6 B& D5 m; C0 @$ m+ P; K
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
$ R; Z1 l2 F! ?4 u/ TDEA:=EMA(DIFF,6);
4 @/ g, D) R. i: R2 O* C ~, lMACD:=2*(DIFF-DEA);4 E3 F3 \5 p! t5 f- j: y
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
( i8 e7 p8 M3 I; L+ o# OSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;
% l$ H1 u# O& t- B/ ySTICKLINE(转点=0,50,50,6,0),COLORCYAN;
! z6 n1 B+ u# @4 ^顶部:90,COLORYELLOW;8 [( t8 S3 M; e* a7 h9 c H; e2 B' P
底部:10,COLORCYAN;; l) M% T3 O) i* ~
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;! s8 h3 h9 c' | g
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
2 U/ b; P" ]( q! A5 ]% oIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
" y+ O* ]$ z' \& E: fDRAWICON(CROSS(趋势,判定),判定,1);
, u8 Z$ u+ P0 Q; ?: b4 rDRAWICON(CROSS(趋势,顶部),顶部,2);( l9 n. x8 B$ \) W
LC:= REF(CLOSE,1);
* C; p$ [/ s, tRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;5 [( S( {7 i! w' T" X# H' }4 M z
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
& l9 z) V# E# U! P7 q/ }VAR2:=SMA(VAR1,9,1)+100;
' M" d6 q8 J! O: u; dVAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;6 T2 V: ~; O( q
VAR4:=SMA(VAR3,3,1);
! s; O3 q# V5 ^" @; U& PVAR5:=SMA(VAR4,3,1)+100;
$ r" L( V/ v* v2 r4 D" L$ F4 QVAR6:=VAR5-VAR2;, q6 P. a2 E& E# ~0 L3 \
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;; u3 ~! v. F) x6 S& Z. E* J
VAR2Q:=REF(LOW,1);# P' D/ k+ O, s X6 l
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
# m# C& t0 Z$ A G. @' l1 _VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
. a. `$ M4 {4 nVAR5Q:=LLV(LOW,30);' E$ f. I/ H; J/ Q) `& u' A" F
VAR6Q:=HHV(VAR4Q,30);0 a5 n8 M2 Z6 O) e- b' [
VAR7Q:=IF(MA(CLOSE,58),1,0);
( F- x8 {" |: V" \- b% `6 V1 o) o5 fVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;) j5 C4 l8 \2 o
火焰山:=IF(VAR8Q>100,100,VAR8Q);; f5 X* U* J+ o. a6 U
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
" |' y3 H6 E- E b% s: f+ OSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;& u. o7 Z' Z: `/ j# ` r
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
5 P+ B/ ]. k5 OSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
* N/ U0 v; c; H, XSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;0 J0 {$ N0 o; [( N: c! ?! x/ z
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;& Z2 `7 l% w$ c+ ]6 o" ?8 f
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;# d+ x* m3 {% W2 y) J; z& B
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;7 E8 a+ r$ X5 l4 Z$ E6 K
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;) q4 m" Q/ U& U/ r" F
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
- f$ w/ b8 n2 _' h( \9 p; YSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300; q7 T ?) t" O \; R- ?, _! U( {
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
! ~ O; u$ t4 E; P$ Z, tSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
5 M8 }8 f, d3 RSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;# O! A2 x) R( v% T
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;9 ]: I5 V' y: ?4 p( u) N8 `- H. g5 z
逃顶:=CROSS(82,RSI);
8 f2 I9 r/ Y V8 o& w. zSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
! d! [+ _. N4 e6 [) L: j# SSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;- ~* B7 t0 |3 K9 B V3 ]9 Y
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;; p* q, D6 E2 n
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
+ s, _ T9 f7 B! G2 D! vD1:=(C+L+H)/3;0 r& k0 S+ L) ~* `
D2:=EMA(D1,6);
6 G) s5 Q; p2 t3 m: p6 v7 uD3:=EMA(D2,5);
* D9 D8 M# n3 ]7 }5 e! s" K/ K" PBBUY:=CROSS(D2,D3);
2 `+ {! ]# X# x. L ^6 ^* T/ _% ]风险区:80,COLORFF85FF;, S% a9 o- ?5 k5 `: D5 p# w
平安区:20,COLORYELLOW,POINTDOT;
3 J" t1 x- ? p天线:100,COLORFFFF00; k# C; X, _( q9 L5 k2 {3 y9 Z* j
强弱线:50,COLORGREEN,POINTDOT;
: {: h* t( w( ~4 a) LDRAWICON(BBUY,(LOW *1),1);
) N" `3 N$ ]* zVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100; n" K" I! |& b, i1 k, ^
DRAWICON(CROSS(82,VARR1),HIGH,15);$ Y" \( U* t4 B# J. Q9 o( ?
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;( ?) U2 I0 M8 L* s+ n' r" v; S
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB). f0 x8 f4 m! _8 }0 D1 p {3 F/ C+ j! B
时间:2015-9-4 20:075 F5 Z5 g. M7 q6 Z6 W) P C! J) @8 z* v
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |