请编制程序，其功能是：对经常上下波动的数据采用只记录峰值的数据压缩方法，即每次将采样到的当前值和前一次值比较，如数据变向改变(原变大现变小或原变小现变大)，说明已过峰值，这时就将当前值记录下来。例如(下列数据均为无符号数)：原数据：23H,45H,89H,67H,5CH,36H,3CH,78H…压缩后：23H,89H,36H…内存中从SOURCE开始连续存放着40个八位无符号数，假定相邻两数无相等的情况，编程按上述方法进行压缩，结果保存在RESULT开始的内存单元中。部分程序已给出，请填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标出，每个空白一般只需一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END之间原有的代码并自行编程来完成所要求的功能。原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中，运算结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。试题程序：
请编制程序，其功能是：对经常上下波动的数据采用只记录峰值的数据压缩方法，即每次将采样到的当前值和前一次值比较，如数据变向改变(原变大现变小或原变小现变大)，说明已过峰值，这时就将当前值记录下来。
例如(下列数据均为无符号数)：
原数据：23H,45H,89H,67H,5CH,36H,3CH,78H…
压缩后：23H,89H,36H…
内存中从SOURCE开始连续存放着40个八位无符号数，假定相邻两数无相等的情况，编程按上述方法进行压缩，结果保存在RESULT开始的内存单元中。
部分程序已给出，请填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标出，每个空白一般只需一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END之间原有的代码并自行编程来完成所要求的功能。
原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中，运算结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。
对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。
试题程序：
相关考题：
15、用泵将江水送上敞口容器。若在送水过程中江水水位上升，流量 （变大、变小）。现欲维持原流量不变，则出口阀应作如何调节？ 。试比较调节前后泵的扬程 （变大、变小、不变）。A．变大，开大出口阀，变小B．变大，关小出口阀，变大C．变小，开大出口阀，变小D．变大，关小出口阀，变小E．变小，关小出口阀，变小
用Origin实现对光谱仪不同阶次的波长校正（将CCD原胞数转换为波长值）的正确方法是：A.令5条汞光谱线峰值对应的原胞数为X值, 峰值强度为Y值进行数据拟合得到各阶系数后带入拟合公式，由原胞数计算出各谱线峰值对应的波长。#B.令5条汞光谱线峰值对应的原胞数为X值, 对应谱线峰值的标准波长为Y值进行数据拟合得到各阶系数后带入对应阶的拟合公式，由原胞数计算出各谱线峰值对应的波长。#C.由采集的汞光源五个可见光谱数据用折线画出原胞-强度谱，用寻峰功能找出五个峰值对应的五个原胞数，原胞数为X值, 对应谱线峰值的标准波长为Y值进行数据拟合得到各阶系数后带入对应阶的拟合公式，由原胞数计算出各谱线峰值对应的波长。#D.以上方法都可以。
用时间常数为T的一阶装置进行测量，若被测参数按正弦规律变化，请问系统时间常数对幅值误差有影响吗？系统时间常数变大，被测参数的最高频率变大还是变小？如系统时间常数变小，幅值误差变大还是变小？输入信号频率对幅值误差有影响吗？如希望被测参数的最高频率变大，系统时间常数怎么改变？如希望被测参数的相位误差变小，系统时间常数怎么改变？