波神八线 INPUT:最近天(30,1,360),k(1,1,2); M5:MA(CLOSE,5),linethick0; M10:MA(CLOSE,10),linethick0; m20:MA(CLOSE,20),linethick0; m30:MA(CLOSE,30),linethick0; M60:MA(CLOSE,60),linethick0; M120:MA(CLOSE,120),linethick0; kDB1:=filter(backset(BARSCOUNT(C)=SYSPARAM(1) ,5),5); KDB2:=filter(backset(BARSCOUNT(C)=SYSPARAM(1) ,10),10); KDB3:=filter(backset(BARSCOUNT(C)=SYSPARAM(1) ,20),20); KDB4:=filter(backset(BARSCOUNT(C)=SYSPARAM(1) ,30),30); KDB5:=filter(backset(BARSCOUNT(C)=SYSPARAM(1) ,60),60); KDB6:=filter(backset(BARSCOUNT(C)=SYSPARAM(1) ,120),120); {以上公式寫法在找出均線扣抵之位置} vertline(KDB1),colorCYAN,POINTDOT; vertline(KDB2),colorCYAN,POINTDOT; vertline(KDB3),colorCYAN,POINTDOT; vertline(KDB4),colorCYAN,POINTDOT; vertline(KDB5),colorCYAN,POINTDOT; vertline(KDB6),colorCYAN,POINTDOT; {以上公式部分在標記均線扣抵位置} N:=IF(SYSPARAM(1)=DATACOUNT,最近天,0); HH:=hhv(H,n); LL:=llv(l,n); VN:=n; {LAST1:=DATACOUNT;} IF VN>DATACOUNT THEN VN:=DATACOUNT+1; FOR I=DATACOUNT DOWNTO DATACOUNT-VN+1 DO BEGIN HH[I]:=HH[DATACOUNT]; LL[I]:=LL[DATACOUNT]; END; KKH:=BARSLAST(HIGH=HH); KKL:=BARSLAST(LOW=LL); N低日:=STRTONUM(NUMTOSTR(REF(BARPOS,KKL),0)),LINETHICK; N高日:=STRTONUM(NUMTOSTR(REF(BARPOS,KKH),0)),LINETHICK; 多空:=IF(N低日>N高日,2,1); DATE1:=IF(多空=1,N低日,N高日);{} hh0:=if(REF(HIGH,BARSLAST(DATE1=BARPOS)+k-1)>REF(HIGH,BARSLAST(DATE1=BARPOS)),REF(HIGH,BARSLAST(DATE1=BARPOS)+k-1),REF(HIGH,BARSLAST(DATE1=BARPOS))); hhh00:=REF(HIGH,BARSLAST(DATE1=BARPOS)); ll0:=REF(LOW,BARSLAST(DATE1=BARPOS)); H1:=STRTONUM(NUMTOSTR(Hh0,3)),POINTDOT; Hhh0:=STRTONUM(NUMTOSTR(Hhh00,3)),POINTDOT; L1:=STRTONUM(NUMTOSTR(Ll0,3)),POINTDOT; hh00:=REF(HIGH,BARSLAST(DATE1=BARPOS)); ll00:=if(REF(LOW,BARSLAST(DATE1=BARPOS)+k-1)<REF(LOW,BARSLAST(DATE1=BARPOS)),REF(LOW,BARSLAST(DATE1=BARPOS)+k-1),REF(LOW,BARSLAST(DATE1=BARPOS))); H11:=STRTONUM(NUMTOSTR(Hh00,3)),POINTDOT; L11:=STRTONUM(NUMTOSTR(Ll00,3)),POINTDOT; NN:=SYSPARAM(1); if NN<1 or NN>datacount then exit; x1:=SYSPARAM(1)=BARPOS; tz1:=if(ref(h,k-1)>h,ref(h,k-1),h); tm1:=h; tz2:=l; zt1:=tz1[NN]; zm1:=tm1[NN]; zt2:=tz2[NN]; z1:=IF(SYSPARAM(1)=DATACOUNT,H1,zt1); tm:=IF(SYSPARAM(1)=DATACOUNT,hhh0,zm1); Z2:=IF(SYSPARAM(1)=DATACOUNT,L1,ZT2); tz11:=h; tz22:=if(ref(l,k-1)<l,ref(l,k-1),l); zt11:=tz11[NN]; zt22:=tz22[NN]; Z11:=IF(SYSPARAM(1)=DATACOUNT,h11,ZT11); Z22:=IF(SYSPARAM(1)=DATACOUNT,L11,ZT22); PARTLINE(SYSPARAM(1)=DATACOUNT,tm),,POINTDOT,linethick0,color999999; PARTLINE(SYSPARAM(1)=DATACOUNT,z2),,POINTDOT,linethick0,color999999; xxx1:=x1 and l1<=REF(LOW,BARSLAST(DATE1=BARPOS)+1); xxxx1:=x1 and l<=ref(l,1) and l<ref(l,2) and l<refx(l,1); xx1:=if(SYSPARAM(1)=DATACOUNT,xxx1,xxxx1); xxx2:=x1 and h11>=REF(HIGH,BARSLAST(DATE1=BARPOS)+1); xxxx2:=X1 and h>=ref(h,1) and h>=ref(h,2) and h>refx(h,1); xx2:=if(SYSPARAM(1)=DATACOUNT,xxx2,xxxx2); DRAWTEXT(xx1 ,z1+(z1-z2)*1.0,'--⑴----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*1.4,'--⑵----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*2.1,'--⑶----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorff9963,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*2.7,'--⑷----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*3.1,'--⑸----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*3.7,'--⑹----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorff9963,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*4.4,'--⑺----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*5.0,'--⑻----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*0.5,'--◇-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF9963,pxup15; DRAWTEXT(xx1 ,z1+(z1-z2)*5.8,'--◇-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorff9963,pxup15; DRAWTEXT(xx2 ,z22-(z11-z22)*1.0,'--⑴-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx2 ,z22-(z11-z22)*1.4,'--⑵----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx2 ,z22-(z11-z22)*2.1,'--⑶---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorff9963,pxup15; DRAWTEXT(xx2 ,z22-(z11-z22)*2.7,'--⑷---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx2 ,z22-(z11-z22)*3.1,'--⑸---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorFF00FF,pxup15; DRAWTEXT(xx2 ,z22-(z11-z22)*3.7,'--⑹--------------------------------------------------------------------------------------------- |
- 软件大小:3.00 KB
- 推荐星级:
- 更新时间:2009-01-09 18:31:49
- 软件类别: 国产软件 / 飞狐公式
- 软件语言:简体中文
- 授权方式: 解密版
- 联系方式:暂无联系方式
- 官方主页: Home Page
- 点击大图: 【一键转帖到论坛】
- 插件情况:
- 运行环境:Win9X/2000/XP/2003/
- 相关Tags:指标公式 股票软件,公式源码
-
(4)100%(0)0%
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!