|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
, N: X/ H5 Y* e8 \ 
/ [. Q" V. ^0 A* p* K7 Q8 C2 K% ^. \% b0 Y9 I
8 C1 [, `7 O: Q% K
源码如下:
, T7 R6 |" q0 l- v% z 
* [7 b7 H# I. c趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
% t& a4 [- A6 @3 W% @/ l) V, L6 CSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;; Z* z8 {$ O( Z, k( r- I0 S% S4 _
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
. e$ z* ]2 ]8 A' e( I9 S/ K) SIF(趋势>50, 趋势,DRAWNULL), COLORRED;
. {! X( U. H4 }/ k- YRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
* g. R. g; u7 Y( q" {K:=SMA(RSV,3,1);
7 T8 E# _9 c# a) f3 V2 S4 {D:=SMA(K,3,1);" _: g0 b w& y/ R
TYP:=(HIGH+LOW+CLOSE)/3;& n; R( z; O+ e
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));, z! p# v( ~5 y4 P9 o. v$ O
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
( w' e2 l8 k1 Y4 c- `3 }DEA:=EMA(DIFF,6);
7 Q/ B/ _5 |) M* p0 K( T9 k3 QMACD:=2*(DIFF-DEA);
; r) g- M( {% i- ]4 J转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);: I3 o( R( L1 f) n; u, \: X
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;
% a0 O( @, w) P1 d1 WSTICKLINE(转点=0,50,50,6,0),COLORCYAN;# y. R4 v9 c9 V3 f, i- E( |8 c3 t
顶部:90,COLORYELLOW;0 l% L9 c7 P( r
底部:10,COLORCYAN;! I* a5 e, O6 _3 \ r/ T
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;) t2 S6 C1 M+ }9 n2 \
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;/ J3 \/ J, _* C: {7 v1 U
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;: A* a. v) n/ k( S
DRAWICON(CROSS(趋势,判定),判定,1);
9 M4 i; |1 x# E, R; V% z4 |$ J' ]3 x) fDRAWICON(CROSS(趋势,顶部),顶部,2);
$ u9 _$ n* s, I7 S9 g1 nLC:= REF(CLOSE,1);6 C0 _! |" s' w; W
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
, X9 S, ]- E4 h" G* kVAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;0 c3 X% @- D; Y# o, u) m
VAR2:=SMA(VAR1,9,1)+100;0 b1 E4 k+ j# W% T H
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
; o8 w# `- L+ B' dVAR4:=SMA(VAR3,3,1);
2 u6 ^( Q0 i6 E! S3 R0 V# R6 OVAR5:=SMA(VAR4,3,1)+100;
: _- c; K. m. |$ l EVAR6:=VAR5-VAR2;
e+ S$ M7 ?3 p5 y {趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
$ y( ~- y# z; M; qVAR2Q:=REF(LOW,1);
: R% ^ R$ G& K3 g& C) GVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;; J. \7 x J) U; c1 p/ t. ?( I. z
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);0 t8 U" ]7 R0 r" {0 L+ X' V
VAR5Q:=LLV(LOW,30);
7 L/ s( \7 I( J0 _1 xVAR6Q:=HHV(VAR4Q,30);
' u7 o( o2 b0 B8 C' l- uVAR7Q:=IF(MA(CLOSE,58),1,0);
0 p% @5 v2 ?* w2 n/ gVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;( U: c) V6 s$ f6 V! ~5 k5 W
火焰山:=IF(VAR8Q>100,100,VAR8Q);( P7 g9 c2 [1 G1 x, C: |
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;) q1 f) L. a& ]. Z: J8 m, |
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
' k' s' E w z( E) ySTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
, M( Y/ \7 }; c2 l7 X/ W" FSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
5 N+ d) E6 ?& d0 T" @STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;: U$ X% u, L2 k$ p
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
$ D9 B. J$ V, m0 b# u- y$ g% n7 |STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;5 M( z3 o5 {! g! G3 ?7 \8 [
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;5 ~9 v; K! Q* [% R4 V4 s+ a5 M
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
- J% r& L: \% Z" x! p; dSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
0 U, S& \9 h7 Y$ v9 i+ ]7 j; s4 ASTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
7 Y. X8 D* r l/ \ RSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;, ^ k: p$ _: W0 o
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;9 O e! Y% j6 l k2 r( A3 Y! T" n
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;! Y1 k# M0 Z- p4 Q' p+ F
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;, W! @; l+ Y5 U ^) m) T7 E( ?
逃顶:=CROSS(82,RSI);
/ v- z, Q' o- ^' B% rSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
* D3 H+ i- g* u" o! t R- BSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;7 U4 l+ L7 [. A! S! a8 g2 b
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;2 b! Z" P! C8 Q; M1 ^
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;2 k; m& k/ \) O+ a0 u8 |
D1:=(C+L+H)/3;& [+ g1 T/ @& v& P. f+ @
D2:=EMA(D1,6);
' d, r# @" h3 K7 M' _D3:=EMA(D2,5);
* m. ?9 [+ i1 GBBUY:=CROSS(D2,D3);4 A m2 [: \7 S0 g
风险区:80,COLORFF85FF;
' K) l# `% p, k u平安区:20,COLORYELLOW,POINTDOT;3 q" F; o3 A) S4 e; r' x9 d' N; S
天线:100,COLORFFFF00;
c: D6 q( j# e+ P# H) J( y% y强弱线:50,COLORGREEN,POINTDOT;9 i _4 q2 c- s; G4 x2 L2 ]5 Q
DRAWICON(BBUY,(LOW *1),1);
?; D: T7 L; q( u0 OVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;5 `5 ~0 M& P- }4 {! q8 r- H
DRAWICON(CROSS(82,VARR1),HIGH,15);
* d, Q8 d0 ]0 p4 F+ `DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
. N B4 g! G& s: t/ r9 k. V) }{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
% ~! Y$ P4 k: Z时间:2015-9-4 20:07
: e3 X; Y' |& W) I- r F股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |