波神八线 - 分析家公式网

分析家公式网,提供指标公式,股票软件用户登录 |

当前位置：分析家公式网 → 股票公式 → 飞狐公式 → 一键转帖：波神八线

软件名称：[B]波神八线[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2011-03-13 00:56:57
软件简介:

{波神八线}
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,'--⑹---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------'),colorff9963,pxup15;
DRAWTEXT(xx2 ,z22-(z11-z22)*4.4,'--⑺-------------------------------------------------------
[url=http://www.70822.com/soft/sort013/sort02/down-31525.html]波神八线[/url]