 | |  |  |
飞狐可自动定位高底点的点石成金源码公式：
N=20
zzz:=IF(DATATYPE<4,ZIG(4,2.5),ZIG(4,5));
zz:=IF(DATATYPE<5,zzz,ZIG(4,10));
z:=IF(DATATYPE<6,zz,ZIG(4,20));; f:=z-ref(z,1);
d:=FILTER(refx(f>0 and ref(f,1)<0,1)or BARPOS=1,2);{低点}
wd:=barslast(d);{低点位置}
g:=FILTER(refx(f<0 and ref(f,1)>0,1)or BARPOS=1,2);{高点}
wg:=barslast(g);{高点位置}
xwd:=if(sum(wd=0,2)>1,1,wd)linethick0;//低点位置确认
xwg:=if(sum(wg=0,2)>1,1,wg)linethick0;//高点位置确认
fd:=hhv(h,xwd)/ref(L,xwd)-1>n/100;//低点巩固系数
fg:=1-LLv(L,xwg)/ref(h,xwg)>n/100;//高点巩固系数
dqz:=BACKSET(ISLASTBAR and wd<wg and fd=0,xwd+1)=0;//低点过滤系数
gqz:=BACKSET(ISLASTBAR and wg<wd and fg=0,xwd+1)=0;//高点过滤系数
{以下输出信号}
dd:dqz*d or BARPOS=1;{输出低点}
gg:gqz*g or BARPOS=1;{输出高点}
dd:="xh-z.dd";//(n);
gg:="xh-z.gg";//(n);
gd:=FILTER(dd+gg,4);
dg:=barslast(gd);
p1:=SYSPARAM(1)-1;
p:=if(0>=p1,SYSPARAM(1),p1);
Sgd:=sum(gd,0);
gdS:=Sgd[p]-Sgd+1;
W1:=barssince(gdS=gdS[p]);
if w1[p]>1 then begin
Bx:=p=BARPOS;
By:=forcast(c,W1[p]+1);
Ax:=W1=0;
Ay:=By[p]-refx(SLOPE(c,W1[p]+1),W1[p])*W1[p];
zx:LINEVALUE(Ax,Ay,Bx,By,0,0)COLORgreen,LINETHICK1;
sh:=hhv(h-zx,w1+1);
sL:=hhv(zx-L,w1+1);
sx:LINEVALUE(Ax,Ay+sh[p],Bx,By+sh,0,0)COLOR008eff,LINETHICK1;
xx:LINEVALUE(Ax,Ay-sL[p],Bx,By-sL,0,0)COLORff9963,LINETHICK1;end;
STICKLINE(Ax or Bx,sx,xx,0.01,0)COLORff9963,POINTDOT;
K:=(by[p]-ay[p-w1[p]])/W1[p];
斜:k*100,LINETHICK0;
宽:abs((sx-xx)*cos(ATAN(k)*5.73)),LINETHICK0;
宽%:宽/zx[p]*100,LINETHICK0;
bc:=w1+1;
点石成金H:=IF(close>100,SUM(h*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(H,bc)/SUM(C,BC));
点石成金L:=IF(close>100,SUM(l*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(L,bc)/SUM(C,BC));
点石成金:if(斜<=0 ,点石成金h,点石成金l),colorred,LINETHICK2;
bc1:=barslast(SYSPARAM(1)=barpos)+1;
金H:=IF(close>100,SUM(h*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(H,bc1)/SUM(C,BC1));
金L:=IF(close>100,SUM(l*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(L,bc1)/SUM(C,BC1));
点石成金1:if(ref(h,bc1-1)>ref(h,bc1) and ref(h,bc1-1)>ref(h,bc1-2) ,金h,金l),colorblue,LINETHICK2; |
1.02 KB, 下载次数: 42
-
-
ZDDW2.rar
1.72 KB, 下载次数: 30
-
-
ZDDW.rar
1.71 KB, 下载次数: 33
| |  | |  |
|
