上機(jī)題之29
以下內(nèi)容為程序代碼:
;* 請編制程序PROG1.ASM，其功能是:
;* 對內(nèi)存中兩個由7個ASCII字符組成的字符串進(jìn)行如下操作:
;* 在原字符串之前加上字符#(23H); 在原字符串之后加上字符*
;* (2AH)及另外兩個ASCII字符, 這兩個ASCII字符為原字符串中各字
;* 符(但不包括字符#和*)異或操作后的ASCII碼(異或操作結(jié)果的高4
;* 位的ASCII碼在前, 低4位的ASCII碼在后); 最后加上回車符(0DH)
;* 及換行符(0AH)。
;* 例如:
;* 內(nèi)存中有 46H,41H,30H,2EH,34H,3DH,31H(第一個ASCII字符串),
;* 46H,41H,30H,2EH,34H,3DH,30H(第二個ASCII字符串)
;* 結(jié)果為 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
;* 部分程序已給出, 其中原始數(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之間原有的代碼并自行編程來完成要求的功能。
;* 對程序必須進(jìn)行匯編,并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文件,
;* 最終運(yùn)行程序產(chǎn)生結(jié)果(無結(jié)果或結(jié)果不正確者均不得分)。調(diào)試中
;* 若發(fā)現(xiàn)整個程序中存在錯誤之處, 請加以修改。
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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** 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 ; 異或結(jié)果暫存在DL中
MOV CL,4 ; 先將異或結(jié)果高4位轉(zhuǎn)換成ASDCII字符
SHR AH,CL
CHANGE: CMP AH,10 ; 本行開始的4行語句將一個十六進(jìn)制數(shù)
; 轉(zhuǎn)換為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 ; 再將異或結(jié)果低4位轉(zhuǎn)換成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 ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+12 ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
46 41 30 2E 33 3D 31 0A 40 0A 40 0A 40 00
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
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
以下內(nèi)容為程序代碼:
;* 請編制程序PROG1.ASM，其功能是:
;* 對內(nèi)存中兩個由7個ASCII字符組成的字符串進(jìn)行如下操作:
;* 在原字符串之前加上字符#(23H); 在原字符串之后加上字符*
;* (2AH)及另外兩個ASCII字符, 這兩個ASCII字符為原字符串中各字
;* 符(但不包括字符#和*)異或操作后的ASCII碼(異或操作結(jié)果的高4
;* 位的ASCII碼在前, 低4位的ASCII碼在后); 最后加上回車符(0DH)
;* 及換行符(0AH)。
;* 例如:
;* 內(nèi)存中有 46H,41H,30H,2EH,34H,3DH,31H(第一個ASCII字符串),
;* 46H,41H,30H,2EH,34H,3DH,30H(第二個ASCII字符串)
;* 結(jié)果為 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
;* 部分程序已給出, 其中原始數(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之間原有的代碼并自行編程來完成要求的功能。
;* 對程序必須進(jìn)行匯編,并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文件,
;* 最終運(yùn)行程序產(chǎn)生結(jié)果(無結(jié)果或結(jié)果不正確者均不得分)。調(diào)試中
;* 若發(fā)現(xiàn)整個程序中存在錯誤之處, 請加以修改。
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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** 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 ; 異或結(jié)果暫存在DL中
MOV CL,4 ; 先將異或結(jié)果高4位轉(zhuǎn)換成ASDCII字符
SHR AH,CL
CHANGE: CMP AH,10 ; 本行開始的4行語句將一個十六進(jìn)制數(shù)
; 轉(zhuǎn)換為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 ; 再將異或結(jié)果低4位轉(zhuǎn)換成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 ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+12 ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
46 41 30 2E 33 3D 31 0A 40 0A 40 0A 40 00
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
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