私募网

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

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

[复制链接]
发表于 2015-8-22 11:38:38 | 显示全部楼层 |阅读模式
【第一私募论坛】www.simu001.cn】灵通信 涨停板 副图指标源码
: c+ a, }5 l. m# h  s( e7 w 
: {5 P4 N* a$ m0 R+ k/ N
" F: @& r1 G  Z% H' i3 \: H4 y/ R1 R( a) i! o+ C
源码如下:
7 p5 i7 Y& b: }" `. X ! S+ l' B) s6 o2 z
趋势:SMA(((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1) ,COLORGREEN;7 R& z- d8 E4 ~" F0 x7 J5 p: w8 _
STICKLINE(趋势>50,趋势,50,4,0),COLOR32329B;- w8 r: V" h2 M+ v% Y
STICKLINE(50>趋势,趋势,50,4,0),COLOR326400;
$ |# H) i9 f9 f" F: F; CIF(趋势>50, 趋势,DRAWNULL), COLORRED;
9 {7 j' d# o6 w9 ?- T' ~: IRSV:=(CLOSE-LLV(CLOSE,9))/(HHV(CLOSE,9)-LLV(CLOSE,9))*100;
# s+ @4 t# m# T" }4 M$ ?K:=SMA(RSV,3,1);2 C' |' `* Q6 k. s& B( t4 d
D:=SMA(K,3,1);
4 X. A9 Z' L1 o+ W  s; o* w' aTYP:=(HIGH+LOW+CLOSE)/3;4 L7 c5 C( I0 r5 d& d
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));$ N1 G! |8 }+ t5 Q6 s" W
DIFF:=EMA(CLOSE,2)-EMA(CLOSE,55);6 @- ], W. z& z0 G& `
DEA:=EMA(DIFF,6);: g/ A8 t/ _5 X0 ?' Q5 H# y
MACD:=2*(DIFF-DEA);& S0 W! B/ q' u
转点:=IF(K>D AND CCI>0 AND DIFF>DEA AND MACD>0,1,0);( |+ r. V7 v: x1 u$ ?8 z( F& ?
STICKLINE(转点=1,50,50,6,0),COLORYELLOW;+ _0 l" a% M8 Z/ S' z; C
STICKLINE(转点=0,50,50,6,0),COLORCYAN;/ Y; E) G. x" F: f5 f0 n! N2 l
顶部:90,COLORYELLOW;
8 v+ D0 N" R+ b, X底部:10,COLORCYAN;
8 w9 ^2 `! i- z) R9 H7 |% k判定:SMA(趋势,3,1),COLORFF00FF, LINETHICK2;
, o, |6 n* }- @4 C* t$ q: zIF( 趋势>判定,判定,DRAWNULL), COLORYELLOW, LINETHICK2;
! K1 Y7 Z" i$ e/ o% WIF( 趋势<判定,判定,DRAWNULL) ,COLORFFF000,LINETHICK2;
+ T# V0 _- I% bDRAWICON(CROSS(趋势,判定),判定,1);$ N: N: z9 Y! `
DRAWICON(CROSS(趋势,顶部),顶部,2);3 Y/ u/ n* K, A
LC:= REF(CLOSE,1);2 D. s/ L5 |5 ?
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;0 X- z1 G6 u" k4 j# t1 i3 E
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;- ~$ \9 A* X/ q( \2 X
VAR2:=SMA(VAR1,9,1)+100;; h3 z+ v/ ~, S( `: i( f7 k1 N
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;% j( z5 W% H0 k9 p3 @- C, v5 m
VAR4:=SMA(VAR3,3,1);4 O4 [& x2 h" [8 D( E' L
VAR5:=SMA(VAR4,3,1)+100;
3 u/ g0 Y9 w, {8 r" e7 Z! fVAR6:=VAR5-VAR2;) j- Q& ], c" A. q4 h8 w
趋势1: IF(VAR6>45,VAR6-45,0),COLOR00FFFF;
! n2 l5 |9 g% u8 OVAR2Q:=REF(LOW,1);) z: {3 u, J* H- C3 v4 u5 e6 Y" ^
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
+ g; q8 M  \* Q8 A- D+ FVAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
' m+ k( E8 N2 |) ~. B3 ]7 zVAR5Q:=LLV(LOW,30);) u) ~% C* O% n$ o' ~8 }$ ]. J
VAR6Q:=HHV(VAR4Q,30);
, R6 n4 ~! w! b7 {* M" g6 r- Y5 ?VAR7Q:=IF(MA(CLOSE,58),1,0);
' k8 t8 c9 C. ~8 g# s$ V% WVAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;  ]7 B: v0 q$ X  m! H3 \
火焰山:=IF(VAR8Q>100,100,VAR8Q);0 ~6 W' s) x8 ?& \0 ?2 G
STICKLINE(火焰山>0,0 ,火焰山*1.2,5,0 ),COLOR4444FF;& V  I- N" Y( I6 k) ]
STICKLINE(火焰山>0,0 ,火焰山*1.2,4,0 ),COLOR5555FF;. Y0 F) D3 m5 o. R* @% S
STICKLINE(火焰山>0,0 ,火焰山*1.2,3,0 ),COLOR7777FF;
" l# l# u# C3 E& [; \- ]0 vSTICKLINE(火焰山>0,0 ,火焰山*1.2,2,0 ),COLOR9999FF;
, W( @; T5 J4 e% X2 D! n1 qSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR000033;
1 v, y0 \, X2 a# m- |3 QSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR000055;
1 y4 H2 d' R; w" w' kSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR000077;' c/ e1 R0 m. T5 P/ F9 }% A4 v, o) z& E
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR000099;
- H' j+ c$ W4 R! [) z! M( eSTICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1.5,0),COLOR0000BB;( \  F) Q' M* m7 O/ A
STICKLINE(REF(趋势1,1)< 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR0000DD;  i7 d& O: I' j
STICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),5,0),COLOR003300;
2 ~, e& K% ^1 ESTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),4,0),COLOR005500;
  j# k0 a+ R9 u% F1 Q# b% u$ x' J$ B8 GSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),3,0),COLOR007700;
; q! g6 f% T7 R' V2 `7 XSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),2,0),COLOR009900;
1 l+ t+ g9 }- h5 l9 I% S  \. kSTICKLINE(REF(趋势1,1)> 趋势1, 趋势1,REF(趋势1,1),1,0),COLOR00DD00;0 V0 Y) z! n+ j% m6 s0 v/ s8 v8 D
逃顶:=CROSS(82,RSI);
. ]  m' F  T& a3 W- s$ QSTICKLINE( 逃顶,逃顶,20,5,0),COLORFF5500;
/ o) h- [2 X, |, A2 j: eSTICKLINE( 逃顶,逃顶,30,3,0),COLORFF8800;: h4 d) A. a1 |$ f$ j6 }) F' {6 s% F
STICKLINE( 逃顶,逃顶,30,2,0),COLORFFAA00;  O6 \! }9 U% S. B( L; x
STICKLINE( 逃顶,逃顶,30,1,0),COLORFFCC00;* H# g& r0 i1 \
D1:=(C+L+H)/3;  i$ d4 }8 u0 r* P
D2:=EMA(D1,6);
+ O! N1 N6 n+ ?6 SD3:=EMA(D2,5);
9 Y8 Q$ S! |! s% I3 `) s+ gBBUY:=CROSS(D2,D3);
9 E% b+ m" Y' W! c/ F  e8 v1 A风险区:80,COLORFF85FF;. Q: F1 j, n8 Z) i4 t" G8 Y
平安区:20,COLORYELLOW,POINTDOT;
: C) k( k* s7 w$ k2 E2 m天线:100,COLORFFFF00;
: M  {6 D& o1 H1 S$ p4 d- ^1 ]1 x强弱线:50,COLORGREEN,POINTDOT;* l; ~5 U( a; G9 f3 G
DRAWICON(BBUY,(LOW *1),1);
% M( j  Y( x7 a4 ?  F7 fVARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;& w  T3 `2 ?; v$ l
DRAWICON(CROSS(82,VARR1),HIGH,15);
* Z( \: @* [; V- f8 d7 mDRAWTEXT(CROSS(82,VARR1),35,'逃'),COLORYELLOW;; J6 d  q5 f! f1 s6 ^9 k
{用法:副图指标,红色K线持有待涨,绿色K线观望。蓝色立柱 出逃。} tdxjietu1.JPG (277.4 KB)
  N1 X5 b# m. i时间:2015-9-4 20:07
! v) U6 F/ b% l2 x/ V' e股票论坛 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, 2026-5-14 09:44 , Processed in 4.033792 second(s), 25 queries .

Powered by www.simu001.cn X3.4

Copyright © 2001-2021, Tencent Cloud.

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