|
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
" F0 J7 `1 f! _. H7 g ( I! R* V p: s' e. g' i; e
$ `0 c6 c- D# i. L& S) H
" \/ x! d1 p& o" s' V. w- K0 c源码如下:2 s2 b. @+ m% f
 9 M; e: _, T q5 D3 n
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;, M; u# @+ k0 i
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;. A; |- d) x2 u* u+ V- y
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
# }- G! y0 Y) AIF(趋势>50, 趋势,DRAWNULL), COLORRED;
- _2 R" V$ L0 ~6 _& z4 @RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
- i+ X% r. H/ C' G# A9 eK:=SMA(RSV,3,1);
( e( e; M& M6 `D:=SMA(K,3,1);
3 C4 @5 V: s+ b+ p3 `7 ETYP:=(HIGH+LOW+CLOSE)/3;
; P* a$ o4 r6 p4 f4 p% B- oCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
4 ?6 k* ?3 t) s3 w& I+ cDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
8 B3 s, H0 N4 S; Y* cDEA:=EMA(DIFF,6);
" R! H# C* b0 B8 ~- C" nMACD:=2*(DIFF-DEA);
* c- a1 Q; L; @9 e# w9 m& V0 w3 i转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
- @0 x' \( F- r+ `STICKLINE(转点=1,50,50,6,0),COLORYELLOW;
, g, d; B& o% I0 X7 _STICKLINE(转点=0,50,50,6,0),COLORCYAN;2 I% r* ]% e1 l5 }9 Z9 ?
顶部:90,COLORYELLOW;
: H- f6 `$ Z4 q3 P3 b H- s底部:10,COLORCYAN;
& U! g2 G( ^: f" d- P7 U. A( f. A& m' e判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
! @ t& q q; EIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;$ Q, n# d$ ^- ^( J P; F$ s8 d: d
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;( J! `2 m8 j' C" W! S$ f6 F
DRAWICON(CROSS(趋势,判定),判定,1);* T! V3 G% @) i3 b) n: @0 t% ]9 m6 q
DRAWICON(CROSS(趋势,顶部),顶部,2);
" t+ k) L1 Y. O V! zLC:= REF(CLOSE,1);4 w$ {9 R. T- L; H T; w
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;0 J: [) E! d3 ~& C* s F
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;" T! e t& u8 w M
VAR2:=SMA(VAR1,9,1)+100;' ]7 t6 a# @5 g0 o
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
# B( j e' Y* M1 j( p9 U' yVAR4:=SMA(VAR3,3,1);
+ q- Q3 P+ X2 bVAR5:=SMA(VAR4,3,1)+100;
" w+ m! _7 E$ F$ t0 R6 D) WVAR6:=VAR5-VAR2;# e g) x2 b/ i ?/ o" Z# y) o
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
8 g) m: a) D) [6 b: ]! A# UVAR2Q:=REF(LOW,1);
) Z. n: h! u7 S' W: g1 l2 u7 ZVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
* u2 }* A) \9 q1 h: e: bVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);0 y3 x+ ]& @" L0 H {
VAR5Q:=LLV(LOW,30);* u5 }- R9 l1 E. b* {, Z7 U
VAR6Q:=HHV(VAR4Q,30);4 l5 }) `& u' K+ R U
VAR7Q:=IF(MA(CLOSE,58),1,0);
: r0 k' g/ e2 i6 @VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
Q/ {; N( E. N4 ?火焰山:=IF(VAR8Q>100,100,VAR8Q);
' N! l5 I# O: CSTICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
9 v0 Q: w# _' b$ v( aSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
F6 R. v. ?$ R+ K+ X: v% VSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
+ e& Z8 T" s, W* t; L: i. y* x: WSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
6 j% c# b* c8 m! z# gSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;& b8 X F8 T- ]% R+ c
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;' y2 p m H4 M1 f
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
3 D& [8 ]0 q9 G1 V. pSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
; \2 m$ w$ P# T# H$ b a& ?STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
* ~% `& I. {) K @4 I; M4 Z* lSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;; x# D" G$ R( q- b: K; A
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;0 }. Q: L' p! B- T L2 c
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
; |: R- d8 v" Z7 e! D" B: v( w$ CSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;, i6 n E3 c5 |: K! P7 |
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
& n. Y% f( J. w0 lSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
8 U8 \% _) H/ l" n. |逃顶:=CROSS(82,RSI);
$ `3 e$ Y: b3 P, G, {* LSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;, J: D6 M. B2 X
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;' i& i; r; }; b/ h+ [
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;4 u& x' |1 k5 |( c7 p3 l! W. t
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;8 e$ B7 K* H" H1 U, [' h; {+ B+ U
D1:=(C+L+H)/3;
' q9 `1 K4 U- i5 _" A+ ZD2:=EMA(D1,6);; O0 m* D( r; Y+ E
D3:=EMA(D2,5);
( ?& x0 o3 R/ pBBUY:=CROSS(D2,D3);
9 _5 I9 U) v3 S: _- O8 E风险区:80,COLORFF85FF;
. U' f R4 f- O0 c& s% x7 |" U平安区:20,COLORYELLOW,POINTDOT;2 C" `- l' c. [" U
天线:100,COLORFFFF00;
, w) j4 @9 |$ L, o6 h2 P, _/ C0 i k强弱线:50,COLORGREEN,POINTDOT;
9 ]' F' ^/ k' ?3 c7 ^DRAWICON(BBUY,(LOW *1),1);
. u* t" y1 ~6 @% k4 tVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;$ m) Z) o0 H+ m
DRAWICON(CROSS(82,VARR1),HIGH,15);
& P; B3 K+ a' w+ ~& ?9 e, C0 _; fDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
! \2 u! \: n. | v{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。}  tdxjietu1.JPG (277.4 KB)
" J3 Q! g6 l6 @& ~4 a5 @9 q8 b6 _时间:2015-9-4 20:07
) y- l9 b% H( d0 |% k% }7 s股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】 |