私募

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

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

[复制链接]
发表于 2015-8-5 16:32:10 | 显示全部楼层 |阅读模式
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
! D( d) l) p9 {/ ?: p3 u4 f 
/ \- c% s% K& b9 C5 q9 e9 R
9 L1 a) }. Y& v: X/ J) ]
) ]* K; d, t2 H7 M源码如下:
/ M6 I9 g1 k6 H( T; X' {* L4 L 
6 e9 F: Y6 I' ]( E  [) k7 X3 X趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;6 S  h6 |- i9 i/ u7 C# W3 j6 ^+ t; L
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;
* r6 s2 A9 ^: y, P$ eSTICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
* S! |( [/ x' C$ v2 M- KIF(趋势>50, 趋势,DRAWNULL), COLORRED;
/ j5 P- T/ s  r  H6 J- O. X% C6 wRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;5 @2 w9 }. I  J( A* o/ {
K:=SMA(RSV,3,1);
) r. C! q0 e5 H- S1 a2 q" BD:=SMA(K,3,1);
  S  f. m9 H* N1 G! \* i: B% @TYP:=(HIGH+LOW+CLOSE)/3;0 i9 l, E. d8 V
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
9 S% C% q( H  S! j$ h( eDIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);
  s& Z: V3 d7 y) p# oDEA:=EMA(DIFF,6);
  n# J" G9 h' C4 _% U( W, RMACD:=2*(DIFF-DEA);
* m9 U2 A- ~2 R( q/ Q0 J转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);
$ s7 b  o& q5 _0 L( ?7 JSTICKLINE(转点=1,50,50,6,0),COLORYELLOW;  t. _. j. w* ^8 k6 a0 R7 ?
STICKLINE(转点=0,50,50,6,0),COLORCYAN;
$ g9 {+ n/ |9 t) D. A; ]4 }& A顶部:90,COLORYELLOW;+ g' L* E, w7 V+ N' f: Z/ S
底部:10,COLORCYAN;" t' j: n! ~  @( b( c" N0 M
判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;/ c: L2 I- D' j
IF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;1 }, b4 Z& z3 q" h! ?* L
IF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;* I6 Q/ a9 C- a& f# k1 {
DRAWICON(CROSS(趋势,判定),判定,1);
2 g+ w0 v/ G& a" N6 G) K% mDRAWICON(CROSS(趋势,顶部),顶部,2);
) T( M( m9 P  iLC:= REF(CLOSE,1);
7 F7 |5 J+ [3 O! _/ x. RRSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;, V& _8 f" y) q, N7 ~2 V; y! }
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
  o5 r# g' P" h- \, e5 JVAR2:=SMA(VAR1,9,1)+100;+ \8 X$ \! k" }; |% h* g
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;1 E1 w5 p" N% W7 |* J
VAR4:=SMA(VAR3,3,1);
( [9 O' j) A; d8 K# i% g! ]! k3 PVAR5:=SMA(VAR4,3,1)+100;
3 R7 s# D2 N% ]$ HVAR6:=VAR5-VAR2;
4 C6 R$ R& t0 Y' O$ T% x, B趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
5 n; G; b2 ~2 g& Y0 L3 V  `# FVAR2Q:=REF(LOW,1);2 z; K3 a3 N. ]) F
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
+ J0 W" L& n/ y- B! H  P" x6 DVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);6 D. ?. b$ t# I
VAR5Q:=LLV(LOW,30);5 [% [" j% B6 e) Z
VAR6Q:=HHV(VAR4Q,30);
' k9 {. ?% r6 _& \. d; |VAR7Q:=IF(MA(CLOSE,58),1,0);" C2 C- Z  Z5 b& w& t
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;+ h3 V# }. |" a- W5 ^8 h
火焰山:=IF(VAR8Q>100,100,VAR8Q);% `+ z2 B: M# x3 G  q, [
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;8 I! \. _9 [# ?# e
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;8 b5 Y. |2 H$ W8 G+ t: B) M4 m
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;4 `' R6 \, y6 P6 U% E1 s8 @7 S9 }
STICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
3 e0 M/ g" W0 v+ f$ h) ISTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;' }) r8 w3 B+ L
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
8 ]6 d. M0 Q; [( I  k$ B7 s1 x' z1 e4 ESTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;
8 N" }, |5 Y6 @0 X! ?$ tSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
$ d7 f( r, ~- s+ o! j+ ]# USTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;
4 ^4 P% n8 z: hSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;$ p8 D. d2 z7 R7 j) }# d
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;- T7 T5 u- ?. v9 {
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;' Q9 w% D) V; m& O/ ]
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
! c4 c, g5 x: ?$ p9 E- K! fSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;$ ]5 e/ ]* h+ c6 @* e/ a1 f- \0 v
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;
. J  t9 E! E$ }5 y逃顶:=CROSS(82,RSI);
$ A" T' d4 \, t& m$ |STICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
& s( j9 B* R$ T; _' ~& \4 O0 A3 xSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;9 A, a" j, |  p% g
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;2 y  l2 D% I6 K! e9 x- H
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;
0 O2 }/ k+ Z8 r  j1 eD1:=(C+L+H)/3;# t. l; @# r& @9 h
D2:=EMA(D1,6);& N3 e: c3 Z6 I, B% u9 b
D3:=EMA(D2,5);, G- ^, t- E9 Q) p$ `
BBUY:=CROSS(D2,D3);
6 L# m- m+ Y5 G风险区:80,COLORFF85FF;
8 F# h: `) Y. [" J平安区:20,COLORYELLOW,POINTDOT;
& ~" y- s; f  N% A* d! @9 k天线:100,COLORFFFF00;$ E2 b" y; M: E( @/ m0 ]
强弱线:50,COLORGREEN,POINTDOT;
0 L6 j: c& b8 Y* A% i) ?DRAWICON(BBUY,(LOW *1),1);( w% w4 Z- q: r7 G  B
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
7 S2 @1 `! D2 {! P7 {# W$ eDRAWICON(CROSS(82,VARR1),HIGH,15);
( p) j" I; x  y# \  i$ U! g6 y% XDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;9 \- P% K) {, L$ z8 x- p. _  u$ B
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)
( X, o$ E! E5 Z: f. Z$ J时间:2015-9-4 20:07+ q& X" T2 N4 h0 [* {
股票论坛 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-7 08:21 , Processed in 0.429718 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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