yngs 2005-9-13 11:01
操盘王的风险栅栏
[code]
a:=LLV(INDEXC,24)*"PRICEOSC.N";
b:="PRICEOSC.B";
DRAWICON(CROSS(INDEXC,a) and LLV(INDEXC,24)=LLV(INDEXC,60) and COUNT(CROSS(INDEXC,a),13)<=1 and "DMI.B3"<"DMI.B4" or CROSS(INDEXC,a) and LLV(INDEXC,24)=LLV(INDEXC,60) and INDEXC<MIN("DMI.B1",MIN("DMI.B2",MIN("DMI.B3","DMI.B4"))) and COUNT(CROSS(INDEXC,a),13)<=1 or CROSS(INDEXC,a) and INDEXC>REF(INDEXC,1)*"PRICEOSC.N" and INDEXC<MIN("DMI.B1",MIN("DMI.B2",MIN("DMI.B3","DMI.B4"))) and COUNT(CROSS(INDEXC,a),13)<=1 or CROSS(INDEXC,a) and INDEXC>MAX("DMI.B1",MAX("DMI.B2",MAX("DMI.B3","DMI.B4"))) and MAX("DMI.B1","DMI.B2")<MAX("DMI.B3","DMI.B4") and "DMI.B3"<"DMI.B4" and COUNT(CROSS(INDEXC,a),13)<=1 or CROSS(INDEXC,a) and INDEXC>MAX("DMI.B1",MAX("DMI.B2",MAX("DMI.B3","DMI.B4"))) and MAX("DMI.B1","DMI.B2")<MIN("DMI.B3","DMI.B4") and "DMI.B3">"DMI.B4" and COUNT(CROSS(INDEXC,a),13)<=1,LOW,1);
s:=if(date<1080701,1,0);
b1:ma(b,5)*s,colorff;
b2:ma(b,10)*s,colorff;
b3:ma(b,30)*s,colorffff;
b4:ma(b,60)*s,colorffff;
x:=REF(CLOSE,1)<REF(CLOSE,2) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(VOL,1)>REF(MA(VOL,20),1)*1.1;
y:=IF(x,MIN(REF(LOW,1),LOW),0);
z1:REF(y,BARSLAST(x)),Linethick5,colorffff;
x1:=REF(CLOSE,1)<REF(OPEN,1) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1) or REF(CLOSE,1)<REF(OPEN,1) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1);
y1:=IF(x1,REF(CLOSE,1),0);
z2:REF(y1,BARSLAST(x1)),COLORred,Linethick5,colorffff;
STICKLINE(CLOSE>0 and (MAX(z1,z2)-MIN(z1,z2))/MIN(z1,z2)*100<3 and MAX("DMI.B1","DMI.B2")>MIN("DMI.B3","DMI.B4"),z1,z2,3,0),COLORred;
CG:ma(C,17),colorffcc66;
FL:hhv(CG,2);
FS:if(CG<FL,(CG-(FL-CG)),FL);
STICKLINE(close>=open,open,close,5,1),colorred;
STICKLINE(open>close,close,open,5,0 ),color00ff00;
STICKLINE(close>=open,close,HIGH,0.5 ,1 ),colorred;
STICKLINE(close>=open,open,low,0.5 ,1 ),colorred;
STICKLINE(open>close,close,low,0.5 ,0 ),color00ff00;
STICKLINE(open>close,open,HIGH,0.5 ,0 ),color00ff00;
[/code]
yngs 2005-9-13 11:31
可以用的源码
x:=REF(CLOSE,1)<REF(CLOSE,2) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(VOL,1)>REF(MA(VOL,20),1)*1.1;
y:=IF(x,MIN(REF(LOW,1),LOW),0);
z1:REF(y,BARSLAST(x)),Linethick5,colorffff;
x1:=REF(CLOSE,1)<REF(OPEN,1) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1) or REF(CLOSE,1)<REF(OPEN,1) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1);
y1:=IF(x1,REF(CLOSE,1),0);
z2:REF(y1,BARSLAST(x1)),COLORred,Linethick5,colorffff;
STICKLINE(CLOSE>0 and (MAX(z1,z2)-MIN(z1,z2))/MIN(z1,z2)*100<3 and MAX("DMIy.B1","DMIy.B2")>MIN("DMIy.B3","DMIy.B4"),z1,z2,5,0),COLORred;
STICKLINE(close>=open,open,close,5,1),colorred;
STICKLINE(open>close,close,open,5,0 ),color00ff00;
STICKLINE(close>=open,close,HIGH,0.5 ,1 ),colorred;
STICKLINE(close>=open,open,low,0.5 ,1 ),colorred;
STICKLINE(open>close,close,low,0.5 ,0 ),color00ff00;
STICKLINE(open>close,open,HIGH,0.5 ,0 ),color00ff00;
[color=Teal][align=right] 本贴由 yngs 于 2005-9-13 12:42 最后编辑 [/align][/color]
peter109 2005-9-13 12:05
引用公式/數據都沒有該公式內容耶??!!
yngs 2005-9-13 13:11
用2楼的源码不必引用什么了。有许多公式都是垃圾语句多特别是一些商品公式,因为大多都是拼装组合(过程可参看我的《公式制作速成》[url]http://bbs.fjfox.com/t-21789-f2.html[/url])制作重点是在化妆上面,并不厌其烦的添加时间控制语句进行多重加密(参看这个公式源码[url]http://bbs.fjfox.com/t-22292-f1.html[/url]),能够像我《公式制作速成》最终尽量清除冗余代码的实在是很少很少了。我在《公式制作速成》帖子中“满纸荒唐言...谁解其中味?”:no:
:smokin:风险栅栏指标主要是说股价跌破风险栅栏后将加速下跌应尽快离场,如果股价受到风险栅栏的支撑则后市看涨。
[color=Teal][align=right] 本贴由 yngs 于 2005-9-13 13:32 最后编辑 [/align][/color]
peter109 2005-9-13 13:22
多謝您的說明
二樓公式中的DMI引用數據部分 咱也沒有
yngs 2005-9-13 13:35
[quote]Originally posted by [i]peter109[/i] at 2005-9-13 13:22:
多謝您的說明
二樓公式中的DMI引用數據部分 咱也沒有 [/quote]
呵,我真是眼睛昏花了!已经上传引用文件DMIY:p
yngs 2005-9-13 14:00
再看
x:=REF(CLOSE,1)<REF(CLOSE,2) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(VOL,1)>REF(MA(VOL,20),1)*1.1;
y:=IF(x,MIN(REF(LOW,1),LOW),0);
z1:REF(y,BARSLAST(x)),Linethick5,colorffff;
x1:=REF(CLOSE,1)<REF(OPEN,1) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1) or REF(CLOSE,1)<REF(OPEN,1) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1);
a:=(3*CLOSE+LOW+OPEN+HIGH)/6;
b:=(20*a+19*REF(a,1)+18*REF(a,2)+17*REF(a,3)+16*REF(a,4)+15*REF(a,5)+14*REF(a,6)+13*REF(a,7)+12*REF(a,8)+11*REF(a,9)+10*REF(a,10)+9*REF(a,11)+8*REF(a,12)+7*REF(a,13)+6*REF(a,14)+5*REF(a,15)+4*REF(a,16)+3*REF(a,17)+2*REF(a,18)+REF(a,20))/210;
b1:=MA(b,3),colorff;
b2:=MA(b,5),colorff;
b3:=MA(b,21),colorffff;
b4:=MA(b,34),colorffff;
y1:=IF(x1,REF(CLOSE,1),0);
z2:REF(y1,BARSLAST(x1)),COLORred,Linethick5,colorffff;
STICKLINE(CLOSE>0 and (MAX(z1,z2)-MIN(z1,z2))/MIN(z1,z2)*100<3 and MAX(B1,B2)>MIN(B3,B4),z1,z2,5,0),COLORred;
shuy 2005-9-13 15:27
请问楼主DMI怎样引用到指标里,谢谢
股山有路 2005-9-13 22:25
[quote]Originally posted by [i]shuy[/i] at 2005-9-13 15:27:
请问楼主DMI怎样引用到指标里,谢谢 [/quote]
DMI指标直接引入飞狐即可
peter109 2005-9-14 00:13
[quote]Originally posted by [i]yngs[/i] at 2005-9-13 13:35:
呵,我真是眼睛昏花了!已经上传引用文件DMIY:p [/quote]
感謝 感謝 感謝 感謝 感謝 ....
咱只能這麼說 :clap:
xujie 2005-9-14 03:26
谢谢!
xxllxxll 2005-9-14 08:53
谢谢!
wdguiw 2005-9-14 15:48
谢谢
goldhill1965 2005-9-15 07:04
谢谢 股神大哥
天高任鸟飞 2005-9-15 20:34
老年的栅栏破了:D:clap:
qizi112233 2005-9-19 15:11
谢谢!
goldhill1965 2005-9-19 21:06
永远难忘,谢谢!
辛吉红旗 2005-9-20 05:37
谢谢啦!!!
6406753 2006-2-12 22:47
0000000000
6406753 2006-2-13 19:13
0000000000000
6406753 2006-3-13 21:50
00000000000000
zzm8 2006-4-7 14:36
支持源码,应该加分!!!!!!
shujenwen 2006-5-12 15:58
3Q!謝謝提供者
3Q3Q3Q! ALL !
zjxu58 2006-5-20 14:08
谢谢 !!
372100 2006-5-21 22:42
谢谢啦!!!
372100 2006-5-21 22:43
应该加分!
红枫 2006-6-11 17:37
:D:clap:非常感谢!
msyaa 2006-10-5 23:35
DDDDDDDDDDDDDDD
shangjing558 2006-10-8 09:44
[quote]原帖由 [i]股山有路[/i] 于 2005-9-13 22:25 发表
DMI指标直接引入飞狐即可 [/quote]
多谢老师!!!
liyucheng118 2008-4-3 14:10
kkkkkkk
cyzpp 2008-4-13 16:52
:): :smokin: :smokin:
页:
[1]