私募

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

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

[复制链接]
发表于 2015-8-22 11:38:38 | 显示全部楼层 |阅读模式
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
8 p; D! [, b' Q* d' }4 R: O$ C9 N7 {# T 
- \# f9 a2 ^* F' y/ W8 k& Y8 l3 Q+ C) c/ @9 z! s5 O5 I4 Z4 k9 H; l
9 b0 F  {2 ?% F( x$ n2 D  M
源码如下:; ^( E0 l5 ]& b: H
 
$ R$ a& G% O9 ~趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
- u2 W% L0 z9 ~8 c5 f7 E& YSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;4 J! M$ Q, ~- u7 h. E" B
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;! [5 C; [  m) I8 P; L; l
IF(趋势>50, 趋势,DRAWNULL), COLORRED;8 k2 o4 k. R1 ^; }# p
RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;( V5 D5 N+ Q' O4 D5 g8 ?
K:=SMA(RSV,3,1);; x' x+ x+ J9 g/ |
D:=SMA(K,3,1);& G+ d: Y: {8 O9 X+ B( ~
TYP:=(HIGH+LOW+CLOSE)/3;
  V4 {( R( L+ sCCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
  w0 Q! B5 G& X: J0 PDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);+ {5 @$ Z" o! H( j
DEA:=EMA(DIFF,6);
& Y6 k( s8 u: ^) @7 C2 \6 qMACD:=2*(DIFF-DEA);
/ D6 A% N: R2 K- ]8 |, f  p转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);! W# w$ k$ g) N1 X9 q0 N* R
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;
  }8 k" \9 f) C* I, {, BSTICKLINE(转点=0,50,50,6,0),COLORCYAN;/ R0 k3 `/ ?+ p" \; [- I4 y8 V3 r- i2 y) j
顶部:90,COLORYELLOW;
9 i1 A' I% M+ U) o! d底部:10,COLORCYAN;/ u% G% a# n( y9 o, q( k# X3 j
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
( K; T' G3 X; mIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
3 i" I3 \+ w4 [$ Z1 ^: CIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;+ M+ i7 }4 K2 M. F' K0 J
DRAWICON(CROSS(趋势,判定),判定,1);
2 R3 C9 ]0 O; S3 }% j. L: xDRAWICON(CROSS(趋势,顶部),顶部,2);; N# X/ f0 Z9 E: v8 [3 W- O1 G$ B4 |
LC:= REF(CLOSE,1);4 A+ d- a# V& L- e2 I
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;8 h1 H% \7 R( z& K: m  J
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
! U$ K% N+ L# L8 ^VAR2:=SMA(VAR1,9,1)+100;
6 N/ h" k% F5 D+ ]2 |0 p. E  _9 fVAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;7 u7 M$ M* U/ _; D, ~
VAR4:=SMA(VAR3,3,1);
- E+ g6 n7 e" k1 D5 _VAR5:=SMA(VAR4,3,1)+100;
, [6 ?+ f# R' y2 p8 \5 \VAR6:=VAR5-VAR2;
4 R$ E1 X! ^# C6 A, H3 J/ M0 N趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;4 L! O+ f# k3 p2 X! H" {; |: o
VAR2Q:=REF(LOW,1);
& s' n) n- s- L& pVAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
$ \4 m  a% x: ~5 RVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
" z: c$ I- l; O6 ^VAR5Q:=LLV(LOW,30);
3 d7 K% d$ D7 u  P4 ^6 a3 D# D. JVAR6Q:=HHV(VAR4Q,30);# X6 J- c% Q5 P" d5 q
VAR7Q:=IF(MA(CLOSE,58),1,0);
  D# G$ g( c, ^% T; p$ PVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;. q/ i. ^8 T5 f* P4 ?3 P/ D
火焰山:=IF(VAR8Q>100,100,VAR8Q);
* M; N7 Q% ~0 _% U2 V1 a1 @$ M# CSTICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;; x7 {+ M& a0 ?1 q; C6 m
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;
9 {+ Z. g' `6 H; USTICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
* r- L7 g# G# w" k3 M9 [$ r/ |STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;$ c; r! `4 y6 _
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
6 O: D- M- |3 f+ o& pSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
9 T, k  a" a8 c) \+ N. gSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;# X9 S, c# D, ?3 Q/ k' H3 M0 C5 x
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
/ o0 u- Y! Y! Z4 k5 USTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
# O0 o* Y& `  G8 USTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
! l6 h9 _  Z+ `5 T, W$ JSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
* U+ j& j1 u( _$ R% ^& x' FSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
  {- P* n5 k; y$ s) USTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;$ M7 @7 P. b; `  ~; W$ S: j
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;1 t: j/ J0 I4 u+ [- N/ E9 _' N
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
$ R9 E) V& z7 D; W逃顶:=CROSS(82,RSI);0 j/ S% }5 s; {! M8 Q9 [6 h" F9 E# i  W
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
, e6 G# x! _; y8 T5 s3 R# a- e  aSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;$ A* w+ W% V2 {' J- D
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;6 G* ^' R  e# r' O8 [- D
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
5 q: l7 l+ u4 R3 `4 x0 ID1:=(C+L+H)/3;
" e+ U  L; }- ]2 {. H% HD2:=EMA(D1,6);
2 L6 f  [( g$ j1 b% ^D3:=EMA(D2,5);
/ t) q) k+ R) A2 E. VBBUY:=CROSS(D2,D3);- p3 t+ H6 P; L
风险区:80,COLORFF85FF;
( e2 r% l5 R; p7 u/ c" l2 S3 ~: ]平安区:20,COLORYELLOW,POINTDOT;
( e4 j" x1 W4 G5 X天线:100,COLORFFFF00;) l  V* u4 ~1 b* ]$ q" K9 N
强弱线:50,COLORGREEN,POINTDOT;
6 [: {- Q& R& c9 L) x/ c' LDRAWICON(BBUY,(LOW *1),1);
2 i5 ]0 N4 N" F, H! q" CVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;4 h- C  h: K3 \
DRAWICON(CROSS(82,VARR1),HIGH,15);3 }7 s/ Z9 Q& a, o, e' @+ x
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;
7 ?6 a" b( ~& E0 K- e+ n% x' f{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)2 D4 _1 q1 M, c; Z0 r" e6 W
时间:2015-9-4 20:07
+ B/ r7 x6 f& _4 {: N8 Q股票论坛 www.simu001.cn【第一私募论坛】www.simu001.cn】
http://www.simu001.cn/x2952x1x1.html
最好的私募社区 | 第一私募论坛 | http://www.simu001.cn

精彩推荐

回复

使用道具 举报

发表于 2015-11-2 09:24:15 | 显示全部楼层
在街上看美女,高一点就是欣赏;低一点就是流氓。
回复 支持 反对

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-4-6 15:59 , Processed in 0.368214 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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