上机题之31
以下内容为程序代码:
;* 请编制程序PROG1.ASM, 其功能是: 内存中连续存放着二十个
;* 十进制数的ASCII字符,把它们转换成压缩型(组合型)BCD码。
;* 例如:
;* 内存中有
;* 31H(’1’),32H(’2’),33H(’3’),34H(’4’) ...(共二十个字节)
;* 结果为 21H,43H, ... (共十个字节)
;* 部分程序已给出,其中原始数据由过程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 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
MOV ES,AX
LEA DX,SOURCE ; 数据区起始地址
LEA SI,NAME0 ; 原始数据文件名
MOV CX,N*2 ; 字节数
CALL LOAD ; 从’INPUT.DAT’中读取数据
; **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
MOV CX,N
CLD NEXT: lodsb
;LODS__
and al,0fh
;AND AL, ____
MOV BL,AL
lodsb
;LODS__
push cx
mov cl,4
;PUSH ____
;MOV CL, ____
SAL AL,CL
pop cx
;POP ____
add al,bl
stosb
;ADD AL, ____
;STOS__
LOOP NEXT
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下:
30 39 32 39 34 35 30 35 39 33 38 35 36 39 34 32 33 31 36 37
output1.dat 内容应当如下:
90 92 54 50 39 58 96 24 13 76
计算机等级考试三级PC上级题精选31-40(1).doc
下载Word文档到电脑,方便收藏和打印[全文共1491字]
编辑推荐:
下载Word文档