私募

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz

发一个灵通 信 涨停板 副图指标源码

[复制链接]
发表于 2015-8-5 16:32:10 | 显示全部楼层 |阅读模式
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码" J% l" G: _" ~( L, M8 C/ y
 3 s$ P' H1 E' u6 i; X8 Z
0 I2 ]; L# b! P* e7 E

( D5 q* w8 ^# t! A" l源码如下:6 K& z: o  b# f( {2 s0 s
 
* n2 x- u5 d7 r3 T( u2 J2 t+ I5 [1 F趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
+ a; r3 f0 ~2 N2 m; GSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;: h" {5 Q6 s4 B
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
) x2 l9 C+ z/ t& o3 Z& `IF(趋势>50, 趋势,DRAWNULL), COLORRED;
0 t6 n3 M; B1 D$ ORSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;( j2 W. |, y; r6 [( ^7 x& t1 |
K:=SMA(RSV,3,1);
. B3 b) B  j3 t0 @4 v+ o, ]D:=SMA(K,3,1);
! _# e. \6 y( E, s# d7 s# LTYP:=(HIGH+LOW+CLOSE)/3;
$ W: U2 D7 k1 z, lCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));/ N% ]  H' q+ A0 a, R" K# }
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);9 o% B+ K( m, m( h, {
DEA:=EMA(DIFF,6);
3 m  o, ~* r, z7 }, h! H. pMACD:=2*(DIFF-DEA);
# G/ z* ?$ T5 k+ ]7 U5 ]转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
8 S+ U% T2 x; H% H. ~: ^STICKLINE(转点=1,50,50,6,0),COLORYELLOW;- I6 P( E9 |$ I4 A' J: l( i* y
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
" T/ a& M( n$ j# h顶部:90,COLORYELLOW;7 Z% c$ |6 J% L  Q2 n
底部:10,COLORCYAN;
, h3 m2 z* f7 a! f1 ^! h判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
1 D1 A2 p, ?; J; E( U6 f3 BIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
! l0 J: A% ?; }. \& j! c3 MIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;4 m1 r! k5 M2 \5 @# u) e1 C* Y( l4 L
DRAWICON(CROSS(趋势,判定),判定,1);
  ?  Q9 f* u3 [% QDRAWICON(CROSS(趋势,顶部),顶部,2);2 {+ l& @# u  B
LC:= REF(CLOSE,1);
4 M- P' G% C3 v( ~; Y* L5 L5 r2 |$ WRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;3 J" W* F' i; N/ j
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;. a0 g% h% o' }# v! Y
VAR2:=SMA(VAR1,9,1)+100;3 j* J- ^4 b9 a8 x& e' m
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;% U2 I& a% T7 e; ?3 V8 S
VAR4:=SMA(VAR3,3,1);( j; m( N9 r4 k3 ~& {" ~2 s% I( ]/ ]
VAR5:=SMA(VAR4,3,1)+100;
) K1 E5 M9 Q9 b& N- x+ F) DVAR6:=VAR5-VAR2;6 D* `, v6 }! [
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;  a' N# `1 s' ]8 U
VAR2Q:=REF(LOW,1);
/ z' R: ], y* qVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
6 D! Z5 p, e3 S/ [* U- g0 w5 `& CVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
; N# c; J' K, v7 i. ]VAR5Q:=LLV(LOW,30);, s7 o. f0 Z5 b+ ^6 v1 A
VAR6Q:=HHV(VAR4Q,30);
* K0 h  ]5 S7 e+ \3 |VAR7Q:=IF(MA(CLOSE,58),1,0);
; k' m' W6 z: C9 |# k5 N: \" lVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;- |$ I1 Q: Q% t$ a2 [4 F) K- M6 M) h$ g6 W
火焰山:=IF(VAR8Q>100,100,VAR8Q);, W' P# `$ n- N* h# I* T
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;' ~9 C. Z' b+ S  z, g( u
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
4 C! g8 y# |9 Y4 d# U9 n3 \STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
7 c: K7 W9 `0 B$ \' d% u9 ySTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
: |3 [/ e3 L" |  _' z  v' X9 zSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
+ O! T/ T1 I! p* ]8 v0 x% R" K3 ASTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;% d6 x8 I; I& e: R) B' K/ l
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
! h2 H( h3 B* T  i/ SSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
" i2 N- x" M! h5 u6 P2 lSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;. [+ R$ G* f+ w/ j
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;+ Q, j( t$ L0 M( e% ^6 \
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
& f0 @0 r4 b; g: E% E/ K* l1 NSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;" ^5 a. w+ Z6 ?/ X
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
5 K9 c5 ?$ R/ _% f. tSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
! K5 S' j' v  z7 o0 K" l3 F3 BSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;: Q' {6 S/ i) D% }: A
逃顶:=CROSS(82,RSI);$ @5 R! r. T3 y# `: r' X' h  E- Q
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;* f3 m- v" K2 u+ H. y8 m
STICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
+ m$ a5 L# v1 g8 dSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;; i5 ?8 M# f# f* R/ T9 y
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
* h* }* w# v# J. s9 a. W( pD1:=(C+L+H)/3;' O. I4 S& ^2 l/ D3 a! I% P
D2:=EMA(D1,6);) ?  C0 y% N1 f& Z  \
D3:=EMA(D2,5);# X2 B; G! i+ y6 h# S# g$ \! D, W
BBUY:=CROSS(D2,D3);4 M* r, n3 L' ~* y1 \* Z0 R( p
风险区:80,COLORFF85FF;+ u: g, F* n9 q- J0 R
平安区:20,COLORYELLOW,POINTDOT;
4 i% K0 r6 E6 a: Q. z% Y# h天线:100,COLORFFFF00;$ t- p7 s/ U2 J: G, U3 T8 c( ~
强弱线:50,COLORGREEN,POINTDOT;" P- [7 Q' `4 i
DRAWICON(BBUY,(LOW *1),1);
- a2 n' i9 D; e# Q7 ]VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
& M$ \& }8 [8 H+ B/ P6 G7 s  YDRAWICON(CROSS(82,VARR1),HIGH,15);
0 G7 t$ G# q3 V' k0 YDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;- N, K% U1 B3 A  S: _
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)
  z6 E& q. r/ U时间:2015-9-4 20:07- ^) m# L- A  |1 q1 h! D+ o
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】
http://www.simu001.cn/x2942x1x1.html
最好的私募社区 | 第一私募论坛 | http://www.simu001.cn

精彩推荐

回复

使用道具 举报

发表于 2015-10-30 22:06:35 | 显示全部楼层
坐等楼主现身!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|手机版|Archiver| ( 桂ICP备12001440号-3 )|网站地图

GMT+8, 2025-12-16 18:09 , Processed in 0.911267 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表