小秦的爷爷于2009年4月因病去世，在为爷爷办理丧葬事宜的时候，小秦的父亲也因意外去世，爷爷留有15

请编制程序PROG1.ASM，其功能是：将一数据采集系统中采集的80个字节无符号数(已存于SOURCE开始的内存区域)按算术平均数字滤波方法进行数字滤波，每8个数求一个平均值(舍去余数)。将10个平均值依次写入RESULT指示的内存区域内。

例如：

原采集数据：1EH,31H,31H,33H,58H,75H,38H,34H,49H,A2H,98H,DFH,99H,64H,64H,B7H……

结果为：3DH,CCH……

部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放，由过程SAVE保存到文件 OUTPUT1.DAT中。

填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标出，每行空白一般只需一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。

对程序必须进行汇编，并与IO.OBJ链接产生PROG1.EXE执行文件，最终运行程序产生结果(无结果或结果不正确者均不得分)。调试中若发现整个程序中存在错误之处，请加以修改。

试题程序：

EXTRN LOAD:FAR, SAVE:FAR

N EQU 10

STAC SEGMENT STACK

DB 128 DUP ()

STAC ENDS

DATA SEGMENT

SOURCE DB 8*N DUP(0)

RESULT DB N DUP(0)

NAME0 DB 'INPUT1.DAT',0

NAME 1 DB 'OUTPUT1.DAT',0

DATA ENDS

CODE SEGMENT

ASSUME CS:CODE, DS:DATA, SS:STAC

START PROC FAR

PUSH DS

XOR AX,AX

PUSH AX

MOV AX,DATA

MOV DS,AX

LEA DX,SOURCE ; 数据区起始地址

LEA SI,NAME0 ; 原始数据文件名

MOV CX,8*N ; 字节数

CALL LOAD ; 从INPUT1.DAT中读取数据

; **** BEGIN ****

LEA SI,SOURCE

MOV (1)

MOV DX,N

MAGN1: XOR AX,AX

XOR BX,BX

MOV CX, (2)

MAGN2: MOV AL,[SI] ; 取数并求和放BX中

ADD BX, (3)

INC SI

(4)

MOV AX,BX

(5)

(6)

(7)

(8)

DEC DX

(9) MAGN1

; **** END ****

LEA DX,RESULT ; 结果数据区首址

LEA SI,NAME1 ; 结果文件名起始地址

MOV CX,N ; 字节数

CALL SAVE ; 保存结果到OUTPUT1.DAT文件中

RET

START ENDP

CODE ENDS

设无符号数X存于内RAM的VAR单元(30H)，Y存于FUNC单元(31H)，试按下列要求编制程序。

值和前一次值比较，如数据变向改变(原变大现变小或原变小现变大)，说明已过峰值，这时就将当前值记录下来。

例如(下列数据均为无符号数)：

原数据：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链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。

试题程序：

在DATA址起有50个字节的有符号数，求其平均值存于AV单元中(设结果可存于一个字节中)。并求出正数的和及负数的和，分别存于NP和NN字单元中。

请编制程序，其功能是：内存中连续存放着20个无符号字节数序列，请将它们排成升序(从小到大)。

例如：

内存中有01H,04H,02H…(假设后17个字节均大与04H)

结果为 01H,02H,04H…(后跟17个字节，按从小到大的顺序排列)

部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。

请填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标出，每个空白一般只需一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END之间原有的代码并白行编程来完成所要求的功能。

对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。

试题程序：

进行数字滤波，每5个数求一个平均数(含余数，其中低字节为商，高字节为余数)，将10个平均值依次存入RESULT指示的内存区域。

例如：

原始采集数据：05H，07H，12H，08H，10H，09H，2EH，56H，48H，85H，65H，36H，45H……

则结果为： 0A04H，4003H……

部分程序已经给出，其中原始数据由过程LOAD从文件INPUT．DAT中读入以SOURCE开始的内存单元中。运算结果要求从RESULT开始的内存单元存放，由过程SAVE保存到文件OUTPUT.DAT中。

请填空BEGIN和END之间已给出的源程序使其完整，空白已经用横线标出，每行空白一般只需要一条指令，但采用功能相当的多条指令也行，考生也可以删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。

对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。

【试题程序】

EXTRN LOAD:FAR,SAVE:FAR

N EQU 10

DSEG SEGMENT

SOURCE DB 6*N DUP()

RESULT DW N DUP(0)

NAME0 DB 'INPUT.DAT',0

NAME1 DB 'OUTPUT.DAT',0

DSEG ENDS

SSEG SEGMENT STACK

DB 256 DUP()

SSEG ENDS

CSEG SEGMENT

ASSUME CS:CSEG,DS:DSEG,SS:SSEG

START PROC FAR

PUSH DS

XOR AX,AX

PUSH AX

MOV AX,DSEG

MOV DS,AX

LEA DX,SOURCE

LEA SI,NAME0

MOV CX,6*N

CALL LOAD

;******** BEGIN ********

LEA SI,SOURCE

LEA DI,RESULT

MOV DX,N

AGAIN: SUB AX,AX

(1)

MOV CX,6

AGAIN1: MOV AX,[SI]

ADD BX,AL

INC SI

(2)

(3)

MOV CL,6

(4)

(5)

ADD DI,2

DEC DX

JNZ AGAIN

;******** END ********

LEA DX,RESULT

LEA SI,NAME1

MOV CX,N*2

CALL SAVE

RET

START ENDP

CSEG ENDS

END START

试编程实现3字节无符号数乘以2字节无符号数：R7R6R5×R4R3→@R0(5个连续单元)。