散户之家 » 公式分享 » 重新青松红牛的公式原码(大智慧专用)


2007-12-24 10:04 寻牛者
重新青松红牛的公式原码(大智慧专用)

[align=left]指数贡献值:(c-ref(ma(c,5),5))*finance(1),colorred,LINETHICK0;
市值贡献值:CAPITAL/100*CLOSE/10000,coloRgreen,LINETHICK0;
资金贡献值:ema(amount,3)/finance(7),colorff00ff,LINETHICK0;
获利90:EMA(COST(90),5),LINETHICK0,colorFFFFFF;
A:=(3*c+l+o+h)/6;
X:=WMA(A,20);
主力成本:eMA(X,13),colorFF00FF,LINETHICK0;
STICKLINE(c>0,75,0,10,0),Color006010;
rcc:=DYNAINFO(3);
s2:=sma(c,3,1);
s6:=sma(c,5,1);
dk:=2*(s2-s6);
STICKLINE(dk>0,rcc,rcc+dk,0,1),COLORRED;
STICKLINE(dk<0,rcc,rcc+dk,0,1),COLORffff00;[/align]短期底部:LLV(HIGH,30),LINETHICK2,COLORFFCC00;
STICKLINE(open>=close ,O,C,5,0 ),COLORbbbbbb;
STICKLINE(open>=close ,O,C,2,0 ),COLORcccccc;
STICKLINE(open>=close ,O,C,1,0 ),COLORdddddd;
STICKLINE(close>open,O,C,5,0 ),COLOr6666cc;
STICKLINE(close>open,O,C,3 ,0 ),COLOR7777dd;
STICKLINE(close>open,O,C,2 ,0 ),COLOR8888ee;
STICKLINE(close>open,O,C,1 ,0 ),COLOR9999ff;
STICKLINE(close>open,open,low,1,0 ),COLOR1199ff;
STICKLINE(close>open,close,HIGH,1 ,0 ),COLOR1199ff;
STICKLINE(open>=close,close,low,1 ,0 ),COLORcccccc;
STICKLINE(open>=close,open,HIGH,1 ,0 ),COLORcccccc;
rc:rcc,COLOR559999;
ma(c,9);
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,4.5,0),colorred;
STICKLINE(cross(ma(c,1),ma(c,9)),HIGH,LOW,1,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,5,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,55)),HIGH,LOW,1,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,4,0),COLORyellow;
STICKLINE(cross(ma(c,1),ma(c,23.5)),HIGH,LOW,1,0),COLORyellow;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,2,0),COLORff00ff;
STICKLINE(cross(ma(c,1),ma(c,120)),HIGH,LOW,1,0),COLORff00ff;
M3:ma(c,3),coloryellow,linethick2;
M9:ma(c,9),COLORff00ff,linethick2;
M23.5:ma(c,23.5),colorwhite;
ma5:=ma(c,5);
ma10:=ma(c,10);
ma30:=ma(c,30);
fa:=barslast(cross(ma10,ma5)) and cross(ma5,ma10);
fb:=fa and ma5>ma30 and ma10>ma30  and ma10>ref(ma10,1);
STICKLINE(fb,l,l-0.09,4,0),colorred;
DRAWTEXT(fb,l-0.58,'★红牛'),colorred;
v1:=ema(close,5);
v2:=ema(ema(close,90)*1.01,10);
DRAWTEXT(cross(v1,v2),v1+0.05,'牛起步'),color00ff00,LINETHICK0;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWICON(cross(v1,v2),v2,4);
DRAWTEXT((AB = 1),(LOW * 0.99),'○牛窝'),colorYELLOW;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠仓:BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099ff;
DRAWTEXT(老鼠仓,l*0.99,' 老鼠仓'),COLOR0099ff;
STICKLINE(老鼠仓,H,L,1,0),COLOR0099ff;
STICKLINE(老鼠仓,O,C,1,0),COLOR0099ff;
BIAS2 := (CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
STICKLINE(BIAS2<-6,H,L,1,0),COLORGREEN;
STICKLINE(BIAS2<-6,C,O,1.5,1),COLORGREEN;
var666:=REF(C,1);
var777:=SMA(MAX(C-var666,0),6,1)/SMA(ABS(C-var666),6,1)*100;
DRAWTEXT(CROSS(82,var777),H*1.01,'▼逃顶'),COLORYELLOW ;
vvv1:=ref(c,ref(hhvbars(v,21),0));
mmm1:=ma(close,1);
aaaa:=V>1*ref(V,1) and (c/ref(C,1)-1)*100>9.5 and mmm1>=vvv1;
DRAWICON(cross(a,1),l*0.98,6),COLORRED;
DRAWTEXT(aaaa,l*0.93,'涨停'),LINETHICK1,COLORRED;
[free][/free]
[localimg=140,226]1[/localimg]

2007-12-24 10:10 寻牛者
指数贡献值:(c-ref(ma(c,5),5))*finance(1),colorred,LINETHICK0;
市值贡献值:CAPITAL/100*CLOSE/10000,coloRgreen,LINETHICK0;
资金贡献值:ema(amount,3)/finance(7),colorff00ff,LINETHICK0;
获利90:EMA(COST(90),5),LINETHICK0,colorFFFFFF;
A:=(3*c+l+o+h)/6;
X:=WMA(A,20);
主力成本:eMA(X,13),colorFF00FF,LINETHICK0;
STICKLINE(c>0,75,0,10,0),Color006010;
rcc:=DYNAINFO(3);
s2:=sma(c,3,1);
s6:=sma(c,5,1);
dk:=2*(s2-s6);
STICKLINE(dk>0,rcc,rcc+dk,0,1),COLORRED;
STICKLINE(dk<0,rcc,rcc+dk,0,1),COLORffff00;
短期底部:LLV(HIGH,30),LINETHICK2,COLORFFCC00;
STICKLINE(open>=close ,O,C,5,0 ),COLORbbbbbb;
STICKLINE(open>=close ,O,C,2,0 ),COLORcccccc;
STICKLINE(open>=close ,O,C,1,0 ),COLORdddddd;
STICKLINE(close>open,O,C,5,0 ),COLOr6666cc;
STICKLINE(close>open,O,C,3 ,0 ),COLOR7777dd;
STICKLINE(close>open,O,C,2 ,0 ),COLOR8888ee;
STICKLINE(close>open,O,C,1 ,0 ),COLOR9999ff;
STICKLINE(close>open,open,low,1,0 ),COLOR1199ff;
STICKLINE(close>open,close,HIGH,1 ,0 ),COLOR1199ff;
STICKLINE(open>=close,close,low,1 ,0 ),COLORcccccc;
STICKLINE(open>=close,open,HIGH,1 ,0 ),COLORcccccc;
rc:rcc,COLOR559999;
ma(c,9);
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,4.5,0),colorred;
STICKLINE(cross(ma(c,1),ma(c,9)),HIGH,LOW,1,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,5,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,55)),HIGH,LOW,1,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,4,0),COLORyellow;
STICKLINE(cross(ma(c,1),ma(c,23.5)),HIGH,LOW,1,0),COLORyellow;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,2,0),COLORff00ff;
STICKLINE(cross(ma(c,1),ma(c,120)),HIGH,LOW,1,0),COLORff00ff;
M3:ma(c,3),coloryellow,linethick2;
M9:ma(c,9),COLORff00ff,linethick2;
M23.5:ma(c,23.5),colorwhite;
ma5:=ma(c,5);
ma10:=ma(c,10);
ma30:=ma(c,30);
fa:=barslast(cross(ma10,ma5)) and cross(ma5,ma10);
fb:=fa and ma5>ma30 and ma10>ma30  and ma10>ref(ma10,1);
STICKLINE(fb,l,l-0.09,4,0),colorred;
DRAWTEXT(fb,l-0.58,'★红牛'),colorred;
v1:=ema(close,5);
v2:=ema(ema(close,90)*1.01,10);
DRAWTEXT(cross(v1,v2),v1+0.05,'牛起步'),color00ff00,LINETHICK0;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWICON(cross(v1,v2),v2,4);
DRAWTEXT((AB = 1),(LOW * 0.99),'○牛窝'),colorYELLOW;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠仓:BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099ff;
DRAWTEXT(老鼠仓,l*0.99,' 老鼠仓'),COLOR0099ff;
STICKLINE(老鼠仓,H,L,1,0),COLOR0099ff;
STICKLINE(老鼠仓,O,C,1,0),COLOR0099ff;
BIAS2 := (CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
STICKLINE(BIAS2<-6,H,L,1,0),COLORGREEN;
STICKLINE(BIAS2<-6,C,O,1.5,1),COLORGREEN;
var666:=REF(C,1);
var777:=SMA(MAX(C-var666,0),6,1)/SMA(ABS(C-var666),6,1)*100;
DRAWTEXT(CROSS(82,var777),H*1.01,'▼逃顶'),COLORYELLOW ;
vvv1:=ref(c,ref(hhvbars(v,21),0));
mmm1:=ma(close,1);
aaaa:=V>1*ref(V,1) and (c/ref(C,1)-1)*100>9.5 and mmm1>=vvv1;
DRAWICON(cross(a,1),l*0.98,6),COLORRED;
DRAWTEXT(aaaa,l*0.93,'涨停'),LINETHICK1,COLORRED;

2007-12-24 10:11 八极拳
大智慧通不过
请楼主确认

2007-12-24 10:12 寻牛者
回复 #1 寻牛者 的帖子

指数贡献值:(c-ref(ma(c,5),5))*finance(1),colorred,LINETHICK0;
市值贡献值:CAPITAL/100*CLOSE/10000,coloRgreen,LINETHICK0;
资金贡献值:ema(amount,3)/finance(7),colorff00ff,LINETHICK0;
获利90:EMA(COST(90),5),LINETHICK0,colorFFFFFF;
A:=(3*c+l+o+h)/6;
X:=WMA(A,20);
主力成本:eMA(X,13),colorFF00FF,LINETHICK0;
STICKLINE(c>0,75,0,10,0),Color006010;
rcc:=DYNAINFO(3);
s2:=sma(c,3,1);
s6:=sma(c,5,1);
dk:=2*(s2-s6);
STICKLINE(dk>0,rcc,rcc+dk,0,1),COLORRED;
STICKLINE(dk<0,rcc,rcc+dk,0,1),COLORffff00;
短期底部:LLV(HIGH,30),LINETHICK2,COLORFFCC00;
STICKLINE(open>=close ,O,C,5,0 ),COLORbbbbbb;
STICKLINE(open>=close ,O,C,2,0 ),COLORcccccc;
STICKLINE(open>=close ,O,C,1,0 ),COLORdddddd;
STICKLINE(close>open,O,C,5,0 ),COLOr6666cc;
STICKLINE(close>open,O,C,3 ,0 ),COLOR7777dd;
STICKLINE(close>open,O,C,2 ,0 ),COLOR8888ee;
STICKLINE(close>open,O,C,1 ,0 ),COLOR9999ff;
STICKLINE(close>open,open,low,1,0 ),COLOR1199ff;
STICKLINE(close>open,close,HIGH,1 ,0 ),COLOR1199ff;
STICKLINE(open>=close,close,low,1 ,0 ),COLORcccccc;
STICKLINE(open>=close,open,HIGH,1 ,0 ),COLORcccccc;
rc:rcc,COLOR559999;
ma(c,9);
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,4.5,0),colorred;
STICKLINE(cross(ma(c,1),ma(c,9)),HIGH,LOW,1,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,5,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,55)),HIGH,LOW,1,0),COLORred;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,4,0),COLORyellow;
STICKLINE(cross(ma(c,1),ma(c,23.5)),HIGH,LOW,1,0),COLORyellow;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,2,0),COLORff00ff;
STICKLINE(cross(ma(c,1),ma(c,120)),HIGH,LOW,1,0),COLORff00ff;
M3:ma(c,3),coloryellow,linethick2;
M9:ma(c,9),COLORff00ff,linethick2;
M23.5:ma(c,23.5),colorwhite;
ma5:=ma(c,5);
ma10:=ma(c,10);
ma30:=ma(c,30);
fa:=barslast(cross(ma10,ma5)) and cross(ma5,ma10);
fb:=fa and ma5>ma30 and ma10>ma30  and ma10>ref(ma10,1);
STICKLINE(fb,l,l-0.09,4,0),colorred;
DRAWTEXT(fb,l-0.58,'★红牛'),colorred;
v1:=ema(close,5);
v2:=ema(ema(close,90)*1.01,10);
DRAWTEXT(cross(v1,v2),v1+0.05,'牛起步'),color00ff00,LINETHICK0;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWICON(cross(v1,v2),v2,4);
DRAWTEXT((AB = 1),(LOW * 0.99),'○牛窝'),colorYELLOW;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠仓:BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099ff;
DRAWTEXT(老鼠仓,l*0.99,' 老鼠仓'),COLOR0099ff;
STICKLINE(老鼠仓,H,L,1,0),COLOR0099ff;
STICKLINE(老鼠仓,O,C,1,0),COLOR0099ff;
BIAS2 := (CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
STICKLINE(BIAS2<-6,H,L,1,0),COLORGREEN;
STICKLINE(BIAS2<-6,C,O,1.5,1),COLORGREEN;
var666:=REF(C,1);
var777:=SMA(MAX(C-var666,0),6,1)/SMA(ABS(C-var666),6,1)*100;
DRAWTEXT(CROSS(82,var777),H*1.01,'▼逃顶'),COLORYELLOW ;
vvv1:=ref(c,ref(hhvbars(v,21),0));
mmm1:=ma(close,1);
aaaa:=V>1*ref(V,1) and (c/ref(C,1)-1)*100>9.5 and mmm1>=vvv1;
DRAWICON(cross(a,1),l*0.98,6),COLORRED;
DRAWTEXT(aaaa,l*0.93,'涨停'),LINETHICK1,COLORRED;

2007-12-24 10:13 有点懵懵懂懂的
通不过测试呀?:o

2007-12-24 10:14 寻牛者
谁有QQ我发过去看你们在转发下

2007-12-24 10:30 寻牛者
:) 改为:(
:L 改为:L

2007-12-24 10:31 寻牛者
:) 改为  ;(:L :改为:L

2007-12-24 11:50 明天
“指数贡献值”测试结果“没有定义的标识符”,就是修改了可能其他的问题还会出来,我用的大智慧的,楼主再修改一下吧。

2007-12-24 12:00 君朋
“指数贡献值”测试结果“没有定义的标识符”    :L :L

2007-12-24 12:37 杀死你的心
改了,还是通不过。。。。。。。。。。。

2007-12-24 13:04 丽丽莎
我是大智慧的,我通过了,使用第四楼的原码好了,并把:( 和:L 改一下就OK了.谢谢楼主了,好用!

2007-12-24 13:38 山西劲松8358
谢谢楼主,我通过了。我的大智慧速度太慢!

2007-12-24 13:45 爱茶人
各条线都是什么含义啊?!

2007-12-24 18:17 杀死你的心
俺也是大智慧啊,按要求改了,还是通不过。
第一行改为;(之后,提示:未定义的语法变量finance
                                  语法错误(

2007-12-24 18:21 杀死你的心
[quote]原帖由 [i]杀死你的心[/i] 于 2007-12-24 18:17 发表 [url=http://www.wanguzhe.com/redirect.php?goto=findpost&pid=25867&ptid=1753][img]http://www.wanguzhe.com/images/common/back.gif[/img][/url]
俺也是大智慧啊,按要求改了,还是通不过。
第一行笑脸改为;(之后,提示:未定义的语法变量指数贡献值
                                   语法错误 ;
                                  未定义的变量 finance
                                  语法错误(

2007-12-24 18:24 杀死你的心
唉,怎么弄也通不过。。。。。。。。。。。。。。。。。

2007-12-24 19:31 寻牛者
不好意思应当是
改为  ;( :改为:L
改为  :( :改为:L

2007-12-24 20:13 行云流水
测试通过了,可是只有一条紫红色的线.

2007-12-24 20:25 小张
这么准?有没有未来函数呢!!?

2007-12-24 22:21 墨家
不懂,改来改去都不知道改什么了,前面一个改的,后面一个改的

2007-12-24 22:37 天若下雨
俺的通过了~~~~~

2007-12-24 23:56 鹏飞琦舞
楼主,建议你直接从你的大智慧软件中导出该公式,然后作为附件发上来,我测试了也是无法通过!谢谢

2007-12-25 00:19 简单成败
[quote]原帖由 [i]赵鹏[/i] 于 2007-12-24 23:56 发表 [url=http://www.wanguzhe.com/redirect.php?goto=findpost&pid=26400&ptid=1753][img]http://www.wanguzhe.com/images/common/back.gif[/img][/url]
楼主,建议你直接从你的大智慧软件中导出该公式,然后作为附件发上来,我测试了也是无法通过!谢谢 [/quote]

对,把公式直接导出来附件上来。或者源代码做成TXT文本,附件上来。
最好附上简单的使用说明。谢谢!!

2007-12-25 10:08 寻牛者
用主图就可以看到和我一样的线了,我倒出来了

2007-12-25 10:17 清江
寻牛者
要输入导入密码?

2007-12-25 10:21 望月之狼
[quote]原帖由 [i]寻牛者[/i] 于 2007-12-25 10:08 发表 [url=http://www.wanguzhe.com/redirect.php?goto=findpost&pid=26767&ptid=1753][img]http://www.wanguzhe.com/images/common/back.gif[/img][/url]
用主图就可以看到和我一样的线了,我倒出来了 [/quote]

你好,导入怎么还需要密码?可以说下么

2007-12-25 10:21 寻牛者
因为有的人说原码装不了我就倒出来了

2007-12-25 10:26 寻牛者
密码:760312,不好意思

2007-12-25 10:31 望月之狼
[quote]原帖由 [i]寻牛者[/i] 于 2007-12-25 10:26 发表 [url=http://www.wanguzhe.com/redirect.php?goto=findpost&pid=26789&ptid=1753][img]http://www.wanguzhe.com/images/common/back.gif[/img][/url]
密码:760312,不好意思 [/quote]


朋友,已经导入,多谢了

页: [1] 2 3


Powered by Discuz! Archiver 5.5.0  © 2001-2006 Comsenz Inc.