四目观天下

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

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

[复制链接]
发表于 2015-8-5 16:32:10 | 显示全部楼层 |阅读模式
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码  r% m9 s6 j4 P/ P& t3 B! O
 9 ~1 g+ C. t% u$ a/ g! `( ]; V0 Q  |
/ y2 j/ [/ o7 E8 r# ]3 }
: X$ D' \) [3 C' F$ U+ z
源码如下:
* c, x$ S6 M9 f$ K+ M# L6 X8 h 7 W  j; w/ l, o, f' r8 Y' ^
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
( V/ H/ W+ \+ Z3 ~5 DSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;" u+ ~% a* e" J8 `; f& G
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;# N) T  z0 b" P$ O
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
) @& @. m6 c; _" ]3 Z' T) S0 ERSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
7 X( s) N  ~7 _( [K:=SMA(RSV,3,1);3 L4 e+ C8 P% G5 L5 T( u* f  K* f
D:=SMA(K,3,1);8 f7 i, F# z+ i/ \
TYP:=(HIGH+LOW+CLOSE)/3;
6 j3 V3 |3 W6 pCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));% k; _* R# K& e, s5 B3 `6 t$ O8 |
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);6 w6 |5 D. G/ Z' v
DEA:=EMA(DIFF,6);0 d, C8 n. \' u: c: x8 \# k# j
MACD:=2*(DIFF-DEA);' u6 l& K- t1 E+ _$ s2 g7 ?
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
4 n1 Z8 ?5 ?; D4 [! b! OSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;3 |: ]) o2 m9 w0 I# D  f
STICKLINE(转点=0,50,50,6,0),COLORCYAN;- o1 a9 o/ s' k, T: r* t
顶部:90,COLORYELLOW;, ?% S9 B) _6 ]4 c- G" \5 y
底部:10,COLORCYAN;6 _; f5 f/ _1 w% r. {
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;4 v" @5 x; ^3 Y4 |- a0 `
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
! V& y$ I2 r4 RIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;) d3 z/ p5 s3 o4 V# i2 N
DRAWICON(CROSS(趋势,判定),判定,1);
' ?2 j* i( \) g$ O3 i2 S$ |DRAWICON(CROSS(趋势,顶部),顶部,2);4 G4 b, B  N4 x$ c) A* T* @' `% `
LC:= REF(CLOSE,1);
! A6 |* H2 G0 ^, }: R0 b1 n" h2 {RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;' G) d8 U. R# F5 d* W
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
, n# D2 }. {. MVAR2:=SMA(VAR1,9,1)+100;; _( H& r5 y1 ]0 j3 p
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;  M% [$ w3 X- Y
VAR4:=SMA(VAR3,3,1);
$ T8 c) s$ K" mVAR5:=SMA(VAR4,3,1)+100;/ _2 E* s2 q; O  }
VAR6:=VAR5-VAR2;. N2 O6 Z' O# L9 |. i! R
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;. e% H0 u0 X5 D4 i+ O- W
VAR2Q:=REF(LOW,1);
, D  r- Q/ \& U- E9 q/ O& QVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
8 m0 Y+ X5 W* E) _% gVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
2 Q6 ]& y5 Z# R) JVAR5Q:=LLV(LOW,30);$ S# ~5 |5 U# q  {1 ^
VAR6Q:=HHV(VAR4Q,30);$ g$ E! X3 i4 b4 ]
VAR7Q:=IF(MA(CLOSE,58),1,0);
  w) o7 b) q7 X" [( t, nVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
4 W3 g5 G- V2 \' w& ^/ U8 X火焰山:=IF(VAR8Q>100,100,VAR8Q);
3 O+ u( P( \+ H$ J( ~8 lSTICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
4 S$ b( l; E, G3 Z& dSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
1 E) m2 e5 p  `- J& P) OSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;: _# u1 x6 Q. y4 I8 @1 P
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
7 c$ V! ^8 l9 t# z5 LSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;+ L$ Y# ~; \7 o" V# Q! U- d
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
: n! R$ M( ~; G% {. aSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;, e: g& l, W" F3 k1 d( W# G
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
$ `( X- T7 P& L2 ESTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;" m4 L" l, n# E' |/ P
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
8 M, O+ [4 j+ XSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;+ _+ d0 U8 s2 ?
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;! q4 v$ k" ?3 L. k  \
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
0 m& [# M' J3 D* p, DSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
5 J1 L3 r4 ?4 {; i+ ]STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
. z( I# X  m  X$ q逃顶:=CROSS(82,RSI);, z2 Z3 |8 q# @6 @
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
  ]5 f3 l9 t$ T5 LSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;) F1 M1 \7 |5 I, h. t* ?
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;$ S$ I! k1 O4 a$ R2 `
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
' k1 w: d" f+ X2 s2 VD1:=(C+L+H)/3;6 K# f9 ]9 j5 `5 Q2 u/ I% R
D2:=EMA(D1,6);
( r. E3 U: Q) tD3:=EMA(D2,5);3 t/ i' Z+ ^4 l9 X. r  N& h
BBUY:=CROSS(D2,D3);" P6 O  @8 D% e- w: u* `6 K4 Z
风险区:80,COLORFF85FF;8 x6 _2 ?+ Y4 @% U& S
平安区:20,COLORYELLOW,POINTDOT;! U2 \4 w; L9 B5 Q( r
天线:100,COLORFFFF00;
% t( t, p( X/ j0 ]$ C7 W  s强弱线:50,COLORGREEN,POINTDOT;
' U+ A* V  z/ ^  fDRAWICON(BBUY,(LOW *1),1);* Y/ q! E# \4 D! L1 `: W
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
/ \* Y3 D# @$ Q1 \+ R2 Q8 FDRAWICON(CROSS(82,VARR1),HIGH,15);
) c( j5 Y# C" s& ~& rDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
3 j& L3 h7 r- j" [" z" F{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)
* y! L& d; k& b, v6 Y# M* W时间:2015-9-4 20:07
6 K  W! ?( B0 Q" w- _' d股票论坛 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, 2026-6-28 19:45 , Processed in 1.039100 second(s), 26 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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