请编制程序，其功能是：对经常上下波动的数据采用只记录峰值的数据压缩方法，即每次将采样到的当前值和前一次值比较，如数据变向改变(原变大现变小或原变小现变大)，说明已过峰值，这时就将当前值记录下来。
例如(下列数据均为无符号数)：
原数据：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链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。
试题程序：
