私募网

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

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

[复制链接]
发表于 2015-8-15 01:11:17 | 显示全部楼层 |阅读模式
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码, j9 |/ z! x/ b! Z
 8 X# u/ u" m  |3 o. [: B

4 T! @+ n9 Q. G& \) T" k
/ p* `8 ^/ [- G; K; l源码如下:
) K. x* D" p2 d# w; @; B 
5 D" Z- L. _' k$ W& O' X趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;
# N" R) `9 M! s# f! i  bSTICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
! c' {. W3 X! YSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;9 v( W3 k  g# h, D0 J
IF(趋势>50, 趋势,DRAWNULL), COLORRED;
5 i9 `( y7 }% G% g/ o; D5 A6 [RSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;+ @8 V! w2 q- [9 [) m+ p0 a: q4 Y
K:=SMA(RSV,3,1);" l5 p- A8 {& e" U+ [  r
D:=SMA(K,3,1);% ?# B# M0 A& ?( ^, X; a
TYP:=(HIGH+LOW+CLOSE)/3;& @. U- m- ?! ?* h, E" i, `
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));$ R5 A/ D! P9 E9 U. f" D
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
' v- a5 x4 m+ _DEA:=EMA(DIFF,6);
$ q) u0 C: N" k/ O( r1 |, K( ^MACD:=2*(DIFF-DEA);
* L8 X2 E1 N  w3 z& N( [转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);2 v( ~6 v2 P4 s0 v" D
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;9 O  E0 Q# U% P6 B1 O
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
) k! L% t3 Q0 Q" l" y% `5 H# R顶部:90,COLORYELLOW;
& ]  f, t+ L, R7 S- d& s底部:10,COLORCYAN;
" A2 Q1 R% v0 j8 D$ J5 |4 {判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
$ X" p3 a$ h( v. K! ZIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;  x/ c' e; R, L+ q: ~9 m
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;2 F6 L4 A# y! r+ K* c6 c' d
DRAWICON(CROSS(趋势,判定),判定,1);6 v5 x# e  Z8 p  T: ~& u
DRAWICON(CROSS(趋势,顶部),顶部,2);
4 r4 ^0 J3 E5 }, \5 H6 J) cLC:= REF(CLOSE,1);
& e: W/ n0 t0 u+ K$ @+ _4 TRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;6 W8 R3 z; h0 [" ~
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;1 z2 H9 m- U9 r/ e/ q6 S
VAR2:=SMA(VAR1,9,1)+100;) S, z; x5 e# t: s* D+ R
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;4 W+ L, a" U- K. ?: D1 c8 t1 w0 H
VAR4:=SMA(VAR3,3,1);: w0 T! c, `! z5 |) I8 v7 w
VAR5:=SMA(VAR4,3,1)+100;
* ]4 x7 y6 P( T  G- m! C6 oVAR6:=VAR5-VAR2;) M0 c7 }4 Y& o6 r
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;  M( C2 ]( I/ E* |: S
VAR2Q:=REF(LOW,1);; |3 ~4 q; m, s, h  z( P. f
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
0 \- i, V4 @+ O* |$ ^# R5 ^' |: @, k/ v% G, dVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);  e+ V( H% _7 r* b& b6 K7 U
VAR5Q:=LLV(LOW,30);
3 h; P8 A8 Z/ ?5 D$ P5 S0 ~VAR6Q:=HHV(VAR4Q,30);9 l' X; {3 H. P. `$ l" a! z" ?
VAR7Q:=IF(MA(CLOSE,58),1,0);) h9 ~8 r9 h8 x
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
6 N1 \1 t$ i6 y2 J火焰山:=IF(VAR8Q>100,100,VAR8Q);8 A/ M* |& }: k+ r8 G' y
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;
& Y; v5 [& [1 D! _STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;8 R/ f6 A" G4 M  @
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;* v+ S0 M* ~, Z% ]) F
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;$ S7 x, R, \8 i+ @, _& \! w1 K* y% y
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
3 s! i9 B2 y  X7 oSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;5 [. ^9 K8 R* d5 S# o
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;. Y. @2 U, r; |+ l0 a
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
* \! f. w9 j# R: S8 YSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;& G# Q! F( h1 X( f
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;
& p4 O8 G8 e: ZSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
5 Q: b* n0 W6 Q% R# P4 SSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;4 N) E( O1 q$ _6 i5 j% W
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;1 K" J/ A" M& Q* V5 w3 d/ `
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;$ G5 P' O; y  \) N" m' h  k* B
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;8 ^- }8 {' f5 D" ?- j7 s9 U
逃顶:=CROSS(82,RSI);' B" U; a) S; Z/ L' E! ^" `
STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
( w' s2 \$ B9 T$ JSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;
/ b2 S6 h' D2 Q9 @; k1 v* x8 qSTICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;1 D  _  n4 ~( d, b  y
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
1 `# K8 m) ]3 P% ZD1:=(C+L+H)/3;# P+ ^* w! l  w! w+ e. O( M- Q
D2:=EMA(D1,6);
6 Q  f7 [2 [- J6 x' PD3:=EMA(D2,5);
; `' I- _# m+ `! UBBUY:=CROSS(D2,D3);
  ?  ^( {3 [7 N% k8 ~. q风险区:80,COLORFF85FF;
" U- H1 K. u2 w0 Q4 T; D- F平安区:20,COLORYELLOW,POINTDOT;( V7 x) s$ y' j8 g: o' k6 l
天线:100,COLORFFFF00;9 U$ d! P5 P. j
强弱线:50,COLORGREEN,POINTDOT;
$ p* I- H5 `( E( i1 rDRAWICON(BBUY,(LOW *1),1);
$ U7 x. s  s9 @  U& G6 x' oVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
1 D: x: y& L! x+ y' R$ {0 }DRAWICON(CROSS(82,VARR1),HIGH,15);$ X3 q4 y% i! l& y- e3 P
DRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;: G7 J6 B( O- B
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)
, N* b0 [- J. p4 j3 g/ V时间:2015-9-4 20:070 D3 {- ^0 F+ j; @4 B% D
股票论坛 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, 2026-3-23 04:02 , Processed in 0.398070 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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