私募

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

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

[复制链接]
发表于 2015-8-15 01:11:17 | 显示全部楼层 |阅读模式
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码4 e6 p; K2 H9 I! f& B
 
6 ]7 e4 n0 n+ b% b! U6 }& N* ~$ ]( N  b1 t% T* K9 g
( V5 |* _3 L9 z5 z: i; c$ y
源码如下:
; U$ U1 L+ N+ K9 Y& } ; w# R. I1 B- N! T3 K" {. A7 r
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
% g* C# v# G; O7 T7 ^6 R' v% uSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;, N$ P# V1 [- {, T. h+ Z
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
+ ^/ m7 N& a! {, sIF(趋势>50, 趋势,DRAWNULL), COLORRED;
7 `7 \% v) a3 p# O. P- Q& F" nRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;4 \1 x& a0 c- D4 D, e+ c
K:=SMA(RSV,3,1);9 q- ]0 I3 x' q0 O4 K
D:=SMA(K,3,1);
' h6 d0 ?/ F) @4 bTYP:=(HIGH+LOW+CLOSE)/3;+ l5 A* i+ h- @- n! G6 S
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
% S2 X; p: p# X/ X1 Y% |! MDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
0 Z- n+ q/ R9 F) ODEA:=EMA(DIFF,6);5 ^& R# f9 r' p. x0 y
MACD:=2*(DIFF-DEA);, A/ U6 F  K0 P4 `. f
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);7 L( l1 A3 P0 U! {8 @; K0 {1 T
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;3 W$ X8 G- w" o- F9 c9 b
STICKLINE(转点=0,50,50,6,0),COLORCYAN;" [- t& {# A; i2 X& o
顶部:90,COLORYELLOW;) c/ G  v7 w; [( J" s; u% ~$ X
底部:10,COLORCYAN;
/ G; p& j: Y. a( i判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;' S  U' P2 w; B/ q1 U6 m" v
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
2 a: d3 ?+ Y+ I) ]* w) zIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;% f& a8 r  v# v% H) f! H" e4 R
DRAWICON(CROSS(趋势,判定),判定,1);
: }, P. c. R2 U% X' n3 t3 _DRAWICON(CROSS(趋势,顶部),顶部,2);; @. @9 B( w/ V1 x2 I, F( W
LC:= REF(CLOSE,1);
* j5 _3 v1 n' s3 ?: ]) \RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
% r" K) s+ M& A+ }* L3 [/ }. EVAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;+ o) ~2 |$ [' @2 z' [- b# h; G: T& o
VAR2:=SMA(VAR1,9,1)+100;% f4 f6 v7 ^3 U% w9 e1 N1 T
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;. k, v% t2 I. {  r* b& x
VAR4:=SMA(VAR3,3,1);% T( v2 B8 r# I
VAR5:=SMA(VAR4,3,1)+100;% r' g% s& W& F( R0 t
VAR6:=VAR5-VAR2;
) y6 {$ }/ P9 [# @8 I3 j, ^趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;- P" u; I2 X4 v- I: D
VAR2Q:=REF(LOW,1);# ~1 w' E8 V) C0 o# k7 Q
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
4 w( B6 X: r4 R' cVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);5 E+ {6 k4 l$ ~
VAR5Q:=LLV(LOW,30);" e& u% `' i! z8 ]/ K
VAR6Q:=HHV(VAR4Q,30);$ W6 y  z9 _+ F# s7 U, L) r5 ^" z* z
VAR7Q:=IF(MA(CLOSE,58),1,0);
: A* z  V7 n# T3 aVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
& u2 j7 H9 j4 L! F) O火焰山:=IF(VAR8Q>100,100,VAR8Q);
: G) v2 d) l' @" ISTICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
4 R1 ~7 d/ V9 E/ Z9 VSTICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
! H* K  ?' N1 ?/ GSTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
2 |: p# Y- |# T4 s3 s2 P5 }STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
- }/ l; X; _2 Y: XSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;. ^* W% v. k0 Q* x, K8 `& B; m' h# a
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
/ z  E- O/ _1 A1 K1 ?$ aSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;9 r5 ?  m0 y: F! w( V
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
+ D& p8 p$ P3 e- TSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;- g, R7 t9 L- j5 X
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
# X* Z1 }$ m0 {9 zSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;' y3 A! y+ l8 r* D" w
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;  J4 Y" J* u) N" N1 E1 i/ [
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;/ s, Z9 |$ X% j4 S  O4 R9 ?
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
0 O6 |- i2 ~# P8 }+ q! t' GSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
+ {( H# _, X) Q; V& a逃顶:=CROSS(82,RSI);
" B# m6 R7 B6 XSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
' H/ ?! |7 j) L; M: E! q1 ySTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
3 ?/ O# q' [: \. q+ J" }STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;
# B: V- V4 A% T/ a( a' P4 `; DSTICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;6 H3 K' P; ]8 D5 O7 w  N
D1:=(C+L+H)/3;
# S2 L% \8 W9 Z2 ?4 {$ C4 Z+ rD2:=EMA(D1,6);/ B! S3 `5 q& v8 a8 x  J* i
D3:=EMA(D2,5);
; j0 Q8 x' H9 E$ qBBUY:=CROSS(D2,D3);
' w' @: l) t3 [$ M- M风险区:80,COLORFF85FF;3 @+ n- m$ ]- ]& O& m
平安区:20,COLORYELLOW,POINTDOT;9 K4 }$ h% U. ?
天线:100,COLORFFFF00;4 ^) g5 M  i4 e. W/ O
强弱线:50,COLORGREEN,POINTDOT;
$ m' G; s+ ]% d" NDRAWICON(BBUY,(LOW *1),1);. @& U3 \9 l; d: m% g4 M# I
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
% j* R- s7 S4 h* ]- q5 p* b. rDRAWICON(CROSS(82,VARR1),HIGH,15);% x5 z, ]7 b% L% ~& v$ V% q: K6 \
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
) i. Y; u$ _: [1 p* o' c{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)
" u/ K  ]+ q5 ^4 @6 x0 J$ H0 ^时间:2015-9-4 20:07$ b- c* E9 ]5 l: u4 H! c
股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】
http://www.simu001.cn/x3159x1x1.html
最好的私募社区 | 第一私募论坛 | http://www.simu001.cn

精彩推荐

回复

使用道具 举报

发表于 2015-11-1 07:04:46 | 显示全部楼层
路过 帮顶 嘿嘿
回复 支持 反对

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-10-20 07:28 , Processed in 0.598456 second(s), 26 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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