咨询内容：

老师请帮忙修改一下指标在博弈大师使用谢谢

PURC:=CONST(FINDHIGH(H,0,10*10,1));
PLZ:=CONST(BARSLAST(PURC=H))+1;
顶X:=CONST(IF(PLZ=1,H,REF(H,PLZ-1)));
QQT:=CONST(FINDLOW(L,0,10*10,1));
PLL:=CONST(BARSLAST(QQT=L))+1;
低X:=CONST(IF(PLL=1,L,REF(L,PLL-1)));
顶点:=顶X*VARY,COLORRED;
底点:=低X*VARY,COLORRED;
波动速率:=100*((顶X-低X)/(IF(PLL>PLZ,低X,顶X)))/(PLL-PLZ),NODRAW,COLORMAGENTA;
波动幅度:=((顶X-低X)/(IF(PLL>PLZ,低X,顶X)))*100;
波动价位:=(顶X-低X)*(IF(PLL>PLZ,1,-1));
BPURC:=CONST(FINDHIGH(H,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BPLZ:=CONST(BARSLAST(BPURC=H))+1;
BQQT:=CONST(FINDLOW(L,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BPLL:=CONST(BARSLAST(BQQT=L))+1;
BLC1:=CONST(FINDHIGH(H,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
BLC2:=CONST(BARSLAST(BPURC=H))+1;
BLC顶X:=CONST(IF(BPLZ=1,H,REF(H,BPLZ-1)));
BLC3:=CONST(FINDLOW(L,0,(IF(0>0,0,IF(PLZ<PLL,10,10)))*5,1));
B6C4:=CONST(BARSLAST(BQQT=L))+1;
BLC低X:=CONST(IF(BPLL=1,L,REF(L,BPLL-1)));
BASE:=IF(波动速率<0,BLC顶X,BLC低X),COLORRED;
BLCX:=IF(波动速率<0,-1,1);
BLCZ:=(顶点-底点)*(IF(PLL>PLZ,1,-1));
B618:=BASE+(BLCZ*0.618),COLORRED,DOTLINE;
B382:=BASE+(BLCZ*0.382),COLORRED,DOTLINE;
XZDD:=IF(PLL>PLZ,BPLL,BPLZ);

STICKLINE(CURRBARSCOUNT=XZDD ,BASE,B300,0,0),COLORRED,LINETHICK6;
零Y:IF(CURRBARSCOUNT=XZDD,BASE,DRAWNULL),COLORYELLOW,LINETHICK9;
Y382Y:IF(CURRBARSCOUNT=XZDD,B382,DRAWNULL),COLORYELLOW,LINETHICK6;
Y618Y: IF(CURRBARSCOUNT=XZDD,B618,DRAWNULL),COLORYELLOW,LINETHICK6;

DRAWTEXT(CURRBARSCOUNT=XZDD,BASE,'---------BASE'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=XZDD,B618,'---------0.618'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=XZDD,B382,'---------0.382'),COLORRED;
DRAWICON(CURRBARSCOUNT=XZDD,BASE,9);

 

 来源:程序化99网（ WWW.CXH99.COM ）

博易技术人员： 您就是大神！
如此复杂的程序化，背后的逻辑也坚如磐石吧？ 老师好麻烦给修改一下 来源 程序化久久网