自动计算相邻两段的下跌幅度之比

编写要求：

解答：

网友求助：

INPUT:空间周期(226,0,9999999),底顶定位(9,0,100);
测量时间:=DATACOUNT-SYSPARAM(1)+1,LINETHICK0;
DRAWTEXTEX(DATACOUNT<>SYSPARAM(1),1,10,160,'测量时间:'+ NUMTOSTR(测量时间,0)),Coloryellow;

AA:=ZIG(4,底顶定位);
PARTLINE(AA ,AA),,LINEdot,color888888;
tj:=AA>REF(AA,1) and AA>REFX(AA,1);
tj1:=AA<REF(AA,1) and AA<REFX(AA,1);
高点值:=PEAK(4,底顶定位,1);
低点值:=TROUGH(4,底顶定位,1);
MM0:=(高点值-低点值);
MM1:=(高点值-低点值);
xzz:=BARSLAST(datacount-BARPOS=空间周期);
DRAWNUMBER(TJ AND xzz>=0,高点值*1.003,MM0,2),ALIGN1,pxup16,coloryellow;
DRAWNUMBER(TJ1 AND xzz>=0,低点值*0.997,MM1,2),ALIGN1,pxdn8,color00ffcc;

1、请老师帮忙完善一下程序代码，实现自动计算；