上機(jī)題之21
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM，其功能是:內(nèi)存中連續(xù)存放著十個(gè)無符
;* 號(hào)8位二進(jìn)制數(shù),現(xiàn)將此十個(gè)數(shù)轉(zhuǎn)換成十個(gè)8位格雷碼表示的數(shù),結(jié)果
;* 存入內(nèi)存。其轉(zhuǎn)換方法為格雷碼的位g[7]與二進(jìn)制數(shù)的位d[7]
;* 相同, 格雷碼的其余七位g[k] (k=6,…,0) 分別為二進(jìn)制數(shù)的位d[k+1]
;* (k=6,…,0)與位d[k] (k=6,…,0) 異或的結(jié)果。
;* 例如:
;* 內(nèi)存中有 00H,02H,32H,45H,08H,19H,67H,03H,90H,85H
;* 結(jié)果為 00H,03H,2BH,67H,0CH,15H,54H,02H,D8H,C7H
;* 部分程序已給出, 其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開始存放,
;* 由過程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之間已給出的源程序使其完整(空白已用橫線標(biāo)
;* 出,每行空白一般只需一條指令, 但采用功能相當(dāng)?shù)亩鄺l指令亦可),
;* 或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的功能。
;* 對(duì)程序必須進(jìn)行匯編,并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文件,
;* 最終運(yùn)行程序產(chǎn)生結(jié)果(無結(jié)果或結(jié)果不正確者均不得分)。調(diào)試中
;* 若發(fā)現(xiàn)整個(gè)程序中存在錯(cuò)誤之處, 請(qǐng)加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?) ; 順序存放十個(gè)字節(jié)數(shù)
RESULT DB N DUP(0) ; 存放結(jié)果
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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’’INPUT1.DAT’’中讀取數(shù)據(jù); **** 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 ; 老王注: 此處其實(shí)用 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 ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
A0 88 56 3D 02 D3 90 78 23 E8
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
F0 CC 7D 23 03 BA D8 44 32 9C
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM，其功能是:內(nèi)存中連續(xù)存放著十個(gè)無符
;* 號(hào)8位二進(jìn)制數(shù),現(xiàn)將此十個(gè)數(shù)轉(zhuǎn)換成十個(gè)8位格雷碼表示的數(shù),結(jié)果
;* 存入內(nèi)存。其轉(zhuǎn)換方法為格雷碼的位g[7]與二進(jìn)制數(shù)的位d[7]
;* 相同, 格雷碼的其余七位g[k] (k=6,…,0) 分別為二進(jìn)制數(shù)的位d[k+1]
;* (k=6,…,0)與位d[k] (k=6,…,0) 異或的結(jié)果。
;* 例如:
;* 內(nèi)存中有 00H,02H,32H,45H,08H,19H,67H,03H,90H,85H
;* 結(jié)果為 00H,03H,2BH,67H,0CH,15H,54H,02H,D8H,C7H
;* 部分程序已給出, 其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開始存放,
;* 由過程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之間已給出的源程序使其完整(空白已用橫線標(biāo)
;* 出,每行空白一般只需一條指令, 但采用功能相當(dāng)?shù)亩鄺l指令亦可),
;* 或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的功能。
;* 對(duì)程序必須進(jìn)行匯編,并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文件,
;* 最終運(yùn)行程序產(chǎn)生結(jié)果(無結(jié)果或結(jié)果不正確者均不得分)。調(diào)試中
;* 若發(fā)現(xiàn)整個(gè)程序中存在錯(cuò)誤之處, 請(qǐng)加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?) ; 順序存放十個(gè)字節(jié)數(shù)
RESULT DB N DUP(0) ; 存放結(jié)果
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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’’INPUT1.DAT’’中讀取數(shù)據(jù); **** 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 ; 老王注: 此處其實(shí)用 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 ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
A0 88 56 3D 02 D3 90 78 23 E8
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
F0 CC 7D 23 03 BA D8 44 32 9C