上机题之21
以下内容为程序代码:
;* 请编制程序PROG1.ASM，其功能是:内存中连续存放着十个无符
;* 号8位二进制数,现将此十个数转换成十个8位格雷码表示的数,结果
;* 存入内存。其转换方法为格雷码的最高位g[7]与二进制数的最高位d[7]
;* 相同, 格雷码的其余七位g[k] (k=6,…,0) 分别为二进制数的位d[k+1]
;* (k=6,…,0)与位d[k] (k=6,…,0) 异或的结果。
;* 例如:
;* 内存中有 00H,02H,32H,45H,08H,19H,67H,03H,90H,85H
;* 结果为 00H,03H,2BH,67H,0CH,15H,54H,02H,D8H,C7H
;* 部分程序已给出, 其中原始数据由过程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 N DUP(?) ; 顺序存放十个字节数
RESULT DB N DUP(0) ; 存放结果
NAME0 DB ''INPUT1.DAT'',0
NAME1 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,N ; 字节数
CALL LOAD ; 从 ''INPUT1.DAT''中读取数据
; **** BEGIN ****
LEA DI,RESULT
LEA SI,SOURCE
MOV CX,10
AGN0: MOV AL,[SI]
push cx
;_______________
MOV CX,8
MOV BX,0
AGN1: MOV AH,0
shl bl,1
;___ BL,1
ROL AL,1 ; 老王注: 此处其实用 rcl 较好, 用 rol 有迷惑考生之意
rcl ah,1 ; 老王注: 此处不可用 rol
;_______________
CMP AH,BH
jne set_one
;___ SET_ONE
JMP NEXT
SET_ONE: OR BL,01H
NEXT: mov bh,ah
;MOV __,AH
LOOP AGN1
pop cx
;_______________
MOV [DI],BL
INC SI
INC DI
LOOP AGN0
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
A0 88 56 3D 02 D3 90 78 23 E8
output1.dat 内容应当如下：
F0 CC 7D 23 03 BA D8 44 32 9C
上机题之22
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中从SOURCE开始连续
;* 存放着二十一个八位有符号数(补码),其相邻两数之间差值不超过
;* -8至7。对这种变化缓慢的数据可采用差分方法进行压缩。即第一
;* 个数据不变,其后的数据取与前一数据的差值并用四位二进制补码
;* 表示, 两个差值拼成一个字节, 前一个差值放在高四位,后一个差
;* 值放在低四位。
;* 例如:
;* 原数据(X[n]): 23H,27H,2AH,29H,22H,...
;* 压缩后(Y[n]): 23H, 43H, F9H,...
;* 编程按上述方法进行压缩, 结果保存在RESULT开始的内存单
;* 元中。
;* 部分程序已在PROG1.ASM中给出, 请填空BEGIN和END之间已给
;* 出的源程序使其完整(空白已用横线标出, 每行空白一般只需一条
;* 指令, 但功能相当的多条指令亦可)或删除BEGIN和END之间原有的
;* 代码并自行编写程序片段来完成要求的功能。
;* 原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内
;* 存单元中, 结果要求从RESULT开始存放, 由过程SAVE保存到文件
;* OUTPUT1.DAT中。
;* 对程序必须进行汇编, 并与IO.OBJ链接产生PROG1.EXE 执行文
;* 件, 最终运行程序产生结果(无结果或结果不正确者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB 2*N+1 DUP(?)
RESULT DB N+1 DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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
MOV ES,AX ; 置附加段寄存器
LEA DX,SOURCE ; 数据区起始地址
LEA SI,NAME0 ; 原始数据文件名起始地址
MOV CX,2*N+1 ; 字节数
CALL LOAD ; 从"input1.dat"中读取数据
; **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
CLD
MOVSB ; Y[0]=X[0]
XOR BX,BX ; FLAG=0
MOV DX,N*2 ; COUNTER
COMPRESS:
LODSB
sub al,[si-2]
xor bx,1
jz low_hex
;SUB _________ ; X[n]-X[n-1]
;____________________ ; FLAG=NOT FLAG
;J__ LOW_HEX
MOV CL,4
shl al,cl
;___ AL,CL
MOV AH,AL
JMP NEXT
LOW_HEX: and al,0fh
;__________________
OR AL,AH
STOSB
NEXT: dec dx
;___________________
JNE COMPRESS
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名起始地址
MOV CX,N+1 ; 字节数
CALL SAVE ; 保存结果到"output1.dat"文件中
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：[b]
17 1B 1E 24 29 2D 2A 25 20 27 2C 2F 34 37 33 31 36 3C 3F 39 33
[b]output1.dat 内容应当如下：
17 43 65 4D BB 75 35 3C E5 63 AA
上机题之23
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中连续存放着十六个
;* 10位二进制数DB9 DB8 … DB0，每个二进制数均用两个字节表示，其
;* 存放格式均为
;* DB9 DB8 DB7 DB6 DB5 DB4 DB3 DB2 DB1 DB0 0 0 0 0 0 0
;* │←─── 低地址字节 ───→│ │←──高地址字节──→│
;* 请按序将每个10位无符号二进制数转换成以下格式
;* DB7 DB6 DB5 DB4 DB3 DB2 DB1 DB0 0 0 0 0 0 0 DB9 DB8
;* │←─── 低地址字节───→│ │←──高地址字节──→│
;* 转换结果按原序存放在内存中。
;* 例如：
;* 内存中有 C048H,4091H,0080H,……
;* 结果为 23H,01H,45H,02H,00H,02H,……
;* 部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT
;* 中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放,
;* 由过程SAVE保存到OUTPUT1.DAT文件中。
;* 填空BEGIN和END之间已给出的源程序使其完整 (空白已用横线
;* 标出，每行空白一般只需一条指令，但采用功能相当的多条指令亦
;* 可)， 或删除BEGIN和END之间原有的代码并自行编程来完成要求的
;* 功能。
;* 对程序必须进行汇编， 并与IO.OBJ链接产生PROG1.EXE执行文
;* 件，最终运行程序产生结果(无结果或结果不正确者均不得分)。调
;* 试中若发现整个程序中存在错误之处，请加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 16
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DW N DUP(?)
RESULT DB N*2 DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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,N*2 ; 字节数
CALL LOAD ; 从 'INPUT1.DAT'中读取数据
; **** BEGIN ****
MOV DI,OFFSET RESULT
MOV BX,0
MOV CH,N
PRO: MOV AH,BYTE PTR SOURCE[BX]
mov al,byte ptr source[bx+1]
;MOV AL,________________
MOV DL,AH ; 10位无符号二进制数高八位
MOV DH,AL ; 10位无符号二进制数低二位
MOV CL,2
shl ax,cl
;SHL AX,__
shl dx,cl
;SHL DX,__
MOV AL,DH
mov [di],ah
mov [di+1],al
;MOV [DI],__
;MOV [DI+1],__
ADD DI,2
ADD BX,2
DEC CH
JNZ PRO
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N*2 ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下:
FF C0 F0 C0 FF 80 FF 40 FF 00 FA 40 FA 80 AA 40 CD 40 11 C0 00 00 31 80 31 40 66 40 66 C0 33 40
output1.dat 内容应当如下:
FF 03 C3 03 FE 03 FD 03 FC 03 E9 03 EA 03 A9 02
35 03 47 00 00 00 C6 00 C5 00 99 01 9B 01 CD 00
上机题之24
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中连续存放着五个用
;* 压缩型(组合型)BCD码表示的十进制数，请将它们分别转换成ASCII
;* 字符，高位的BCD码转换后放在较高的地址单元。
;* 例如:
;* 内存中有
;* 21H,43H,... (共五个字节)
;* 结果为
;* 31H('1'),32H('2'),33H('3'),34H('4'),...(共十个字节)
;* 部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT
;* 中读入SOURCE开始的内存单元中。 运算结果要求从RESULT开始存
;* 放, 由过程SAVE保存到文件OUTPUT1.DAT中。填空BEGIN和END之间
;* 已给出的源程序使其完整(空白已用横线标出，每行空白一般只需
;* 一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END
;* 之间原有的代码并自行编程来完成要求的功能。
;* 对程序必须进行汇编, 并与IO.OBJ链接产生PROG1.EXE执行文
;* 件，最终运行程序产生结果 (无结果或结果不正确者均不得分)。
;* 调试中若发现整个程序中存在错误之处，请加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 5
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?)
RESULT DB N*2 DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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
MOV ES,AX
LEA DX,SOURCE ; 数据区起始地址
LEA SI,NAME0 ; 原始数据文件名
MOV CX,N ; 字节数
CALL LOAD ; 从'INPUT.DAT'中读取数据
; **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
MOV CX,N
CLD
NEXT: lodsb
;LODS__
MOV BL,AL
and al,0fh
;AND AL, ____
OR AL,30H
stosb
;STOS__
mov al,bl
;MOV AL, ____
push cx
;PUSH ____
mov cl,4
;MOV CL, ____
SAR AL,CL
pop cx
;POP ____
OR AL,30H
stosb
;STOS__
LOOP NEXT
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N*2 ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
78 25 32 49 71
output1.dat 内容应当如下：
38 37 35 32 32 33 39 34 31 37
上机题之25
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中连续存放着两个无
;* 符号字节数序列Ak和Bk（k=0,…,9）,求序列Ck，Ck=Ak÷Bk(运算
;* 结果按序以字的形式连续存放,其中低字节为商，高字节为余数)。
;* 例如：
;* 序列Ak为01H,7FH,80H,FFH,…；
;* 序列Bk为FFH,80H,7FH,01H,…。
;* 结果Ck为0100H(00H为商、01H为余数),7F00H,0101H,00FFH,…。
;* 部分程序已给出，其中原始数据由过程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 N*2 DUP(?)
RESULT DW N DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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,N*2 ; 字节数
CALL LOAD ; 从'INPUT1.DAT'中读取数据
; **** BEGIN ****
MOV DI,OFFSET RESULT
MOV BX,0
mov cx,N
;______________________
PRO: mov ah,0
mov al,source[bx]
div source[bx+N]
;MOV _________
;_____________,SOURCE[BX]
;DIV ___________
mov [di],ax
;MOV [DI],___
ADD DI,2
inc bx
;_______________________
DEC CX
jnz pro
;___ PRO
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,2*N ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
01 7F 80 FF 00 FF 80 7F 01 80 FF 80 7F 01 FF 80 40 01 01 7F
output1.dat 内容应当如下：
00 01 00 7F 01 01 FF 00 00 00 01 7F 02 00 7F 00
01 00 01 01
上机题之26
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中连续存放的二十
;* 个八位有符号数(补码)是由一个八位A/D转换器采集的双极性信
;* 号(Xn), 现要求对该信号作如下处理(处理后的信号记为Yn):
;* a). Yn= Xn+5 Xn<-5
;* b). Yn= 0 │Xn│<=5
;* c). Yn= Xn-5 Xn>5
;* 例如:
;* Xn: 03H,FEH(-2),4EH,A2H(-94), ...
;* Yn: 00H,00H, 49H,A7H(-89), ...
;* 部分程序已在PROG1.ASM中给出, 请填空BEGIN和END之间已给
;* 出的源程序使其完整(空白已用横线标出, 每行空白一般只需一条
;* 指令, 但功能相当的多条指令亦可)或删除BEGIN和END之间原有的
;* 代码并自行编写程序片段来完成要求的功能。
;* 原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内
;* 存单元中, 结果要求从RESULT开始存放, 由过程SAVE保存到文件
;* OUTPUT1.DAT中。
;* 对程序必须进行汇编, 并与IO.OBJ链接产生PROG1.EXE 执行文
;* 件, 最终运行程序产生结果(无结果或结果不正确者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 20
DELTA EQU 5
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?)
RESULT DB N DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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,N ; 字节数
CALL LOAD ; 从"input1.dat"中读取数据
; **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
mov cx,N
;____________________
NEXT: MOV AL,[SI]
CMP AL,-DELTA
jl less
;J__ LESS
CMP AL,DELTA
jg great
;J__ GREAT
MOV AL,0
JMP STORE
GREAT: SUB AL,DELTA
JMP STORE
LESS: ADD AL,DELTA
STORE: MOV [DI],AL
inc di
inc si
loop next
;____________________
;____________________
;____________________
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名起始地址
MOV CX,N ; 字节数
CALL SAVE ; 保存结果到"output1.dat"文件中
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
01 03 FE 06 13 44 78 30 FC C5 92 C5 FE 04 57 61 79 4A 05 FC
output1.dat 内容应当如下：
00 00 00 01 0E 3F 73 2B 00 CA 97 CA 00 00 52 5C
74 45 00 00
上机题之27
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中连续存放着两个无
;* 符号字节数序列Ak和Bk (k=0,…,9)，求序列Ck，Ck=Ak-Bk（Ck以
;* 有符号字的形式按C0,…,C9的顺序连续存放）。
;* 例如：
;* 序列Ak为30H,FFH,80H,FFH,…；
;* 序列Bk为00H,FFH,FFH,0AH,…。
;* 结果Ck为0030H,0000H,FF81H,FFF5H, …。
;* 部分程序已给出, 其中原始数据由过程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 N*2 DUP(?)
RESULT DW N DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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,N*2 ; 字节数
CALL LOAD ; 从'INPUT1.DAT'中读取数据
; **** BEGIN ****
MOV DI,OFFSET RESULT ; 结果从RESULT开始存放
MOV BX,0
mov cx,N
;________________
PRO: MOV AH,0
MOV AL,SOURCE[BX] ; 序列Ak中的一个字节
sub al,source[bx+N]
;SUB AL,_______________ ; Ck=Ak-Bk
jnc jump
;____ JUMP ; 无借位转JUMP
mov ah,0ffh
;MOV AH,_____ ; 有借位转换成有符号字（为负）
JUMP: mov [di],ax
;MOV ____,AX
ADD DI,2
INC BX
DEC CX
JNZ PRO
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N*2 ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
FF 80 7F 00 7F 80 FF 80 81 00 FF FF 80 00 7F 00 00 81 FE FF
output1.dat 内容应当如下：
00 00 81 FF FF FF 00 00 00 00 80 00 FF 00 FF FF
83 FF 01 FF
上机题之28
以下内容为程序代码:
;* 请编制程序PROG1.ASM，其功能是:
;* 内存中共有30个字节型数据,找出其中的两个ASCII字符串并进
;* 行校验。欲寻找的ASCII字符串由13个字符组成: #(23H),7个ASCII
;* 字符,*(2AH),2个ASCII字符，回车符(0DH),换行符(0AH)。
;* 校验方法为: 对字符#及字符*之间的7个ASCII字符进行异或操
;* 作, 若异或操作结果的ASCII字符表示(异或操作结果高4位的ASCII
;* 字符表示在前, 低4位的ASCII字符表示在后)与原字符串中字符*之
;* 后的两个ASCII字符相同, 则将原字符串原样保存; 反之,则将原字
;* 符串中的所有字符(共13个)均用字符!(21H)代替。
;* 例如:
;* 内存中有 33H,35H,23H('#',第一个字符串开始),46H,41H,30H,
;* 2EH,34H,3DH,31H,2AH('*'),32H,31H,0DH,0AH,46H,23H('#',第二个
;* 字符串开始), 46H,41H,30H,2EH,34H,3DH,30H,2AH('*'),32H,31H,
;* 0DH,0AH,55H
;* 结果为 23H,46H,41H,30H,2EH,34H,3DH,31H,2AH('*'),32H,
;* 31H(校验正确,该字符串原样保持),0DH,0AH,21H,21H,21H,21H,21H,
;* 21H,21H,21H,21H,21H,21H,21H,21H(校验错, 整个字符串用字符'!'
;* 代替)
;* 部分程序已给出, 其中原始数据由过程LOAD从文件INPUT1.DAT
;* 中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放,
;* 由过程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标
;* 出,每行空白一般只需一条指令, 但采用功能相当的多条指令亦可),
;* 或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
;* 对程序必须进行汇编,并与IO.OBJ链接产生PROG1.EXE执行文件,
;* 最终运行程序产生结果(无结果或结果不正确者均不得分)。调试中
;* 若发现整个程序中存在错误之处, 请加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 26
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N+4 DUP(?)
RESULT DB N DUP(0)
HH DB 2 DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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,N+4 ; 字节数
CALL LOAD ; 从 'INPUT1.DAT'中读取数据
; **** BEGIN ****
MOV SI,0
MOV DI,0
MOV BX,2 ; 两个ASCII字符串
REPEAT: MOV AH,0
SEARCH: MOV AL,SOURCE[SI]
INC SI
CMP AL,'#'
jne search
;___ SEARCH
MOV RESULT[DI],AL
INC DI
SEARCH1: MOV AL,SOURCE[SI]
INC SI
cmp al,'*'
;CMP AL,___
JE ASCII
MOV RESULT[DI],AL
INC DI
XOR AH,AL
jmp search1
;JMP _______
ASCII: MOV RESULT[DI],AL
INC DI
PUSH DI
MOV DI,0
MOV DH,2
MOV DL,AH ; 异或结果暂存在DL中
MOV CL,4 ; 先将异或结果高4位转换成ASDCII字
; 符
SHR AH,CL ; 本行开始的4行语句将一个十六进制数
; 转换为ASCII码
CHANGE: CMP AH,10
JL ADD_0
ADD AH,'A'-'0'-10
ADD_0: ADD AH,'0'
MOV HH[DI],AH
INC DI
DEC DH
JZ EXT
MOV AH,DL ; 再将异或结果低4位转换成ASDCII字符
AND AH,0FH
JMP CHANGE
EXT: POP DI
MOV AL,SOURCE[SI]
MOV RESULT[DI],AL
INC SI
INC DI
MOV AH,SOURCE[SI]
MOV RESULT[DI],AH
INC SI
INC DI
MOV DL,HH
MOV DH,HH+1
CMP AX,DX
jne err
;___ ERR
MOV AL,0DH ; 校验正确
MOV RESULT[DI],AL
INC DI
MOV AL,0AH
MOV RESULT[DI],AL
INC DI
JMP LP
ERR: SUB DI,11 ; 校验错误
MOV AL,'!'
mov cx,13
;MOV CX,___
COVER: MOV RESULT[DI],AL
INC DI
LOOP COVER
LP: dec bx
;________________
JZ EXIT
JMP REPEAT
EXIT: NOP
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
55 23 0A 40 0A 40 0A 40 00 2A 34 42 0D 0A 55 55 55 23 46 41 30 2E 33 3D 31 2A 32 36 0D 0A
output1.dat 内容应当如下：
21 21 21 21 21 21 21 21 21 21 21 21 21 23 46 41
30 2E 33 3D 31 2A 32 36 0D 0A
output1.hex 内容应当如下：
DEDEDEDEDEDEDEDEDEDEDEDEDEDCB9BECFD1CCC2CED5CDC9F2F5FF
上机题之29
以下内容为程序代码:
;* 请编制程序PROG1.ASM，其功能是:
;* 对内存中两个由7个ASCII字符组成的字符串进行如下操作:
;* 在原字符串之前加上字符#(23H); 在原字符串之后加上字符*
;* (2AH)及另外两个ASCII字符, 这两个ASCII字符为原字符串中各字
;* 符(但不包括字符#和*)异或操作后的ASCII码(异或操作结果的高4
;* 位的ASCII码在前, 低4位的ASCII码在后); 最后加上回车符(0DH)
;* 及换行符(0AH)。
;* 例如:
;* 内存中有 46H,41H,30H,2EH,34H,3DH,31H(第一个ASCII字符串),
;* 46H,41H,30H,2EH,34H,3DH,30H(第二个ASCII字符串)
;* 结果为 23H('#'),46H,41H,30H,2EH,34H,3DH,31H,2AH('*'),
;* 32H,31H,0DH,0AH,23H,46H,41H,30H,2EH,34H,3DH,
;* 30H,2AH,32H,30H,0DH,0AH
;* 部分程序已给出, 其中原始数据由过程LOAD从文件INPUT1.DAT
;* 中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放,
;* 由过程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标
;* 出,每行空白一般只需一条指令, 但采用功能相当的多条指令亦可),
;* 或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
;* 对程序必须进行汇编,并与IO.OBJ链接产生PROG1.EXE执行文件,
;* 最终运行程序产生结果(无结果或结果不正确者均不得分)。调试中
;* 若发现整个程序中存在错误之处, 请加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 14
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?)
RESULT DB N+12 DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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,N ; 字节数
CALL LOAD ; 从 'INPUT1.DAT'中读取数据
; **** BEGIN ****
MOV SI,0
MOV DI,0
MOV BX,2 ; 两个ASCII字符串
REPEAT: MOV CX,7 ; 每个字符串由7个ASCII字符组成
mov al,'#'
;MOV AL,___
MOV RESULT[DI],AL
INC DI
mov ah,0
;MOV AH,___
CHAR: MOV AL,SOURCE[SI]
MOV RESULT[DI],AL
INC DI
INC SI
XOR AH,AL
loop char
;LOOP ________
mov al,'*'
;MOV AL,___
MOV RESULT[DI],AL
INC DI
MOV DH,2
MOV DL,AH ; 异或结果暂存在DL中
MOV CL,4 ; 先将异或结果高4位转换成ASDCII字符
SHR AH,CL
CHANGE: CMP AH,10 ; 本行开始的4行语句将一个十六进制数
; 转换为ASCII码
JL ADD_0
ADD AH,'A'-'0'-10
ADD_0: ADD AH,'0'
MOV RESULT[DI],AH
INC DI
DEC DH
JZ EXT
MOV AH,DL ; 再将异或结果低4位转换成ASDCII字符
AND AH,0FH
JMP CHANGE
EXT: mov al,0dh
;MOV AL,___
MOV RESULT[DI],AL
INC DI
mov al,0ah
;MOV AL,___
MOV RESULT[DI],AL
INC DI
DEC BX
jz exit
;JZ ______
JMP REPEAT
EXIT: NOP
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N+12 ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
46 41 30 2E 33 3D 31 0A 40 0A 40 0A 40 00
output1.dat 内容应当如下：
23 46 41 30 2E 33 3D 31 2A 32 36 0D 0A 23 0A 40
0A 40 0A 40 00 2A 34 41 0D 0A
上机题之30
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中连续存放着16个十
;* 六位二进制数，在原16个数的第4和第5个数之间插入00FFH，在原
;* 16个数的第8和第9个数之间插入FF00H，在原16个数的第12和第13
;* 个数之间插入55AAH， 在原16个数的最后加入AA55H。将按上述方
;* 法插入4个数后得到的20个数存入内存中。
;* 例如：
;* 内存中有 1020H,2002H,3033H,4440H,5008H,…,8FF8H
;* (共16个字)
;* 结果为 1020H,2002H,3033H,4440H,00FFH,5008H,…,8FF8H,
;* AA55H（共20个字）
;* 部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT
;* 中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放,
;* 由过程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之间已给出的源程序使其完整 (空白已用横线
;* 标出，每行空白一般只需一条指令，但采用功能相当的多条指令亦
;* 可),或删除BEGIN和END之间原有的代码并自行编程来完成要求的功
;* 能。
;* 对程序必须进行汇编， 并与IO.OBJ链接产生PROG1.EXE执行文
;* 件，最终运行程序产生结果(无结果或结果不正确者均不得分)。调
;* 试中若发现整个程序中存在错误之处，请加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 16
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DW N DUP(?)
INDATA DW 0AA55H,55AAH,0FF00H,00FFH
RESULT DW N+4 DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 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,N*2 ; 字节数
CALL LOAD ; 从 'INPUT1.DAT'中读取数据
; **** BEGIN ****
MOV SI,0
mov di,0
;_______________
MOV CX,4
MOV BX,8
CHAN: MOV AX,SOURCE[SI]
mov result[di],ax
;_______________________
INC SI
inc si
inc di
;_____________
;_____________
INC DI
DEC CX
JZ INSER1
JMP CHAN
INSER1: PUSH SI
MOV SI,BX
MOV AX,INDATA[SI-2]
mov result[di],ax
;MOV RESULT[DI],__
DEC BX
dec bx
;_____________
JZ EXIT
mov cx,4
;MOV CX,___
POP SI
INC DI
inc di
;_______________
JMP CHAN
EXIT: POP SI
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,(N+4)*2 ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
34 12 FF E0 0D 23 78 AC AE EA 15 86 F0 05 7F F7 11 FE DD 3E ED DD 33 55 CC CC 11 22 33 DC A0 0A
output1.dat 内容应当如下：
34 12 FF E0 0D 23 78 AC FF 00 AE EA 15 86 F0 05
7F F7 00 FF 11 FE DD 3E ED DD 33 55 AA 55 CC CC
11 22 33 DC A0 0A 55 AA
