加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

江山胜率、江山心跳、看盘均线源码

(2006-01-03 13:30:45)
江山胜率、江山心跳、看盘均线源码


江山胜率

input:N(30,0,1000),M(360,0,1000),M2(360,0,1000),M4(240,0,1000);
VAR1:=(MA(HIGH,N) - LOW) / MA(HIGH,N)* 100;
VAR2:=(SMA(HIGH,N,1) - LOW) / SMA(HIGH,N,1) * 100;
VAR3:=(DMA(HIGH,MA(VOL,N) / CAPITAL) - LOW) / DMA(HIGH,MA(VOL,N) / CAPITAL) * 100;
VAR4:=(COST(N) - LOW) / COST(N) * 100;
VAR5:=100* (HHV(HIGH,20) - LOW) / HHV(HIGH,20);
VAR6:=IF(VAR1 > 0,VAR1,0) * IF(VAR2 > 0,VAR2,0) * IF(VAR3 > 0,VAR3,0) * IF(VAR4 > 0,VAR4,0) * IF(VAR5 > 0,VAR5,0);
VAR7:=100 * (VAR6 - LLV(VAR6,M)) / (HHV(VAR6,M) - LLV(VAR6,M));
VAR8:=SMA(VAR7,3,1);
VAR9:=SMA(VAR8,3,1);
VAR10:=((100 * (VAR9 - LLV(VAR9,M2))) / (HHV(VAR9,M2) - LLV(VAR9,M2)));
平均胜率:IF(VAR10 > 50 AND BARSCOUNT(CLOSE) > M4,VAR10,50),LINETHICK2,colorFFFF;
VAR11:=3 * VAR8 - 2 * VAR9;
VAR12:=100 * (VAR11 - LLV(VAR11,M2)) / (HHV(VAR11,M2) - LLV(VAR11,M2));
江山胜率:IF(VAR12 > 50 AND BARSCOUNT(CLOSE) > M4,VAR12,50),LINETHICK2,colorFFFFFF;
100;
75;
江山心跳

input:N(89,2,100000),M(89,1,10000);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE - LC,0),N,1) / SMA(ABS(CLOSE - LC),N,1) * 100;
VAR1:=POW((100 - RSI) * REF(WINNER(CLOSE),N) / WINNER(CLOSE),2);
VAR2:=SUM(VAR1,0) / SUM(VAR1 / VAR1,0);
底部:IF(VAR1 > M * VAR2 / 2,VAR1,0),LINETHICK2,colorFF;
VAR3:=POW(RSI * WINNER(CLOSE) / REF(WINNER(CLOSE),N),2);
VAR4:=SUM(VAR3,0) / SUM(VAR3 / VAR3,0);
顶部:IF(VAR3 > M * VAR4 / 2,VAR3,0),LINETHICK2,colorFFFF;


看盘均线

input:参数(10,1,100);
五:MA(CLOSE,5);
十:MA(CLOSE,10);
二十:MA(CLOSE,20);
三十:MA(CLOSE,30);
六十:MA(CLOSE,60),LINETHICK2,colorFFFF00;
半年:MA(CLOSE,120),LINETHICK2,colorFF;
全年:MA(CLOSE,240),LINETHICK2,colorFF00FF;
ZL1:=(WINNER((1.25 * COST(25))) - WINNER((0.75 * COST(25))));
ZL2:=(WINNER((1.25 * COST(50))) - WINNER((0.75 * COST(50))));
ZL3:=(WINNER((1.25 * COST(75))) - WINNER((0.75 * COST(75))));
ZL:=MAX(MAX(ZL1,ZL2),ZL3);
Z1:=IF((ZL1 = ZL),COST(25),0);
Z2:=IF((ZL2 = ZL),COST(50),0);
Z3:=IF((ZL3 = ZL),COST(75),0);
SCCB:=MAX(MAX(Z1,Z2),Z3);
市场成本:SCCB,LINETHICK2,colorFFFF;
趋势:FORCAST(CLOSE,120),LINETHICK2,colorFFFFFF;
VAR1:=REF(SUM(CLOSE,5),4) - SUM(CLOSE,4);
VAR2:=100 * (五 + 十 + 二十 - 3 * 趋势) / 3 * 趋势;
EXPLAINEX(CLOSE,'五日均线',五,2,0),colorFFFFFF;
EXPLAINEX(CLOSE,'十日均线',十,2,0),colorFFFF;
EXPLAINEX(CLOSE,'二十日均线',二十,2,0),colorFF00FF;
EXPLAINEX(CLOSE,'三十日均线',三十,2,0),colorFF00;
EXPLAINEX(CLOSE,'六十日均线',六十,2,0),colorFFFF00;
EXPLAINEX(CLOSE,'半年均线',半年,2,0),colorFF;
EXPLAINEX(CLOSE,'全年均线',全年,2,0),colorFF00FF;
EXPLAINEX(CLOSE,'市场成本',市场成本,2,0),colorFFFF;
EXPLAINEX(CLOSE,'趋势线',趋势,2,0),colorFFFFFF;
EXPLAIN(100 * ABS(SCCB - REF(SCCB,1)) / REF(SCCB,1) > 2,'变盘'),colorFF;
EXPLAIN(CLOSE > 趋势 AND 趋势 > REF(趋势,1),'趋势上行,多头市场'),colorFF;
EXPLAIN(CLOSE < 趋势 AND 趋势 < REF(趋势,1),'趋势下行,空头市场'),colorFF00;
EXPLAIN(CLOSE > 趋势 AND 趋势 < REF(趋势,1),'趋势下行,空欲翻多'),colorFF00FF;
EXPLAIN(CLOSE < 趋势 AND 趋势 > REF(趋势,1),'趋势下行,多欲翻空'),colorFFFF00;
EXPLAINEX(CLOSE,'明日五日十日线交叉点',VAR1,2,0),colorFF00;
EXPLAIN(CLOSE > VAR1,'明日五日十日线多头排列'),colorFF;
EXPLAIN(CLOSE < VAR1,'明日五日十日线空头排列'),colorFFFF00;
EXPLAINEX(CLOSE,'易度',VAR2,2,0),colorFFFFFF;
EXPLAIN(VAR2 > 0 AND REF(VAR2,1) > 0 AND VAR2 > REF(VAR2,1),'正易度上升,多头上升趋势'),colorFF;
EXPLAIN(VAR2 > 0 AND REF(VAR2,1) > 0 AND VAR2 < REF(VAR2,1),'正易度下降,多头调整趋势'),colorFFFF00;
EXPLAIN(VAR2 < 0 AND REF(VAR2,1) < 0 AND ABS(VAR2) > REF(ABS(VAR2),1),'负易度上升,空头下降趋势'),colorFFFF00;
EXPLAIN(VAR2 < 0 AND REF(VAR2,1) < 0 AND ABS(VAR2) < REF(ABS(VAR2),1),'负易度下降,空头反弹趋势'),colorFF;
EXPLAIN(CROSS(VAR2,0),'易度转正,空翻多'),colorFF;
EXPLAIN(CROSS(0,VAR2),'易度转负,多翻空'),colorFFFF00;
EXPLAIN(ABS(VAR2) < 参数 / 10,'易度过小,面临变盘'),colorFF00;

http://www.qxtz.com/bbs/images/upload/2005/11/27/203225.gif520)this.width=520;" align=absMiddle border=0>

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有