能否把这个飞狐指标改成可以自由选择高点位置的

编写要求：

解答：

?网友求助：

想把起点定位成：比如6124，3478，3361等等！
YA:=sysparam(3);
YB:=sysparam(2);
YC:=(YA-YB)*0.191+YB;
YD:=(YA-YB)*0.382+YB;
YE:=(YA-YB)*0.5+YB;
YF:=(YA-YB)*0.618+YB;
YG:=(YA-YB)*0.809+YB;

VERTLINE(ROUND(YB)=BARPOS),LINETHICK2,COLORMAGENTA;
VERTLINE(ROUND(YC)=BARPOS),COLORCYAN,POINTDOT;
VERTLINE(ROUND(YE)=BARPOS),COLORYELLOW,LINEDASHDOT;
VERTLINE(ROUND(YD)=BARPOS),COLORCYAN,POINTDOT;
VERTLINE(ROUND(YF)=BARPOS),COLORCYAN,POINTDOT;
VERTLINE(ROUND(YG)=BARPOS),COLORCYAN,POINTDOT;
VERTLINE(ROUND(YA)=BARPOS),LINETHICK2,COLORMAGENTA;
?