上機題之37
以下內(nèi)容為程序代碼:
;* 請編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著二十個
;* ASCII字符，如果是小寫字母a~z之間的字符，請把它們轉(zhuǎn)換成相
;* 應的大寫字符；若為其他字符，不作轉(zhuǎn)換。
;* 例如：內(nèi)存中有
;* 61H(’a’),62H(’b’),31H(’1’),41H(’A’),42H(’B’), ...
;* 結(jié)果為 41H(’A’),42H(’B’),31H,41H(’A’),42H(’B’) ...
;* 部分程序已給出，其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開始的內(nèi)存單元中。 運算結(jié)果要求從RESULT開始存
;* 放，由過程SAVE保存到OUTPUT1.DAT文件中。填空BEGIN和END之間
;* 已給出的源程序使其完整(空白已用橫線標出，每行空白一般只需
;* 一條指令，但采用功能相當?shù)亩鄺l指令亦可)，或刪除BEGIN和END
;* 之間原有的代碼并自行編程來完成要求的功能。
;* 對程序必須進行匯編，并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
;* 件，最終運行程序產(chǎn)生結(jié)果 (無結(jié)果或結(jié)果不正確者均不得分)。
;* 調(diào)試中若發(fā)現(xiàn)整個程序中存在錯誤之處，請加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 20
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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT.DAT’中讀取數(shù)據(jù); **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
MOV CX,N
NEXT: MOV AL,[SI]
CMP AL,’a’
jb upper2
;JB ____
cmp al,’z’
;CMP AL, ____
ja upper2
;J___ UPPER2
and al,5fh
;AND ____
UPPER2: mov [di],al
inc si
inc di
loop next
;MOV [DI], ____
;INC ____
;INC ____
;____ NEXT
; **** 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)容如下：
44 69 46 64 66 61 68 47 7F 47 4C 6E 4B 45 6C 48 64 69 87 5A
output1.dat 內(nèi)容應當如下：
44 49 46 44 46 41 48 47 7F 47 4C 4E 4B 45 4C 48
44 49 87 5A
以下內(nèi)容為程序代碼:
;* 請編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著二十個
;* ASCII字符，如果是小寫字母a~z之間的字符，請把它們轉(zhuǎn)換成相
;* 應的大寫字符；若為其他字符，不作轉(zhuǎn)換。
;* 例如：內(nèi)存中有
;* 61H(’a’),62H(’b’),31H(’1’),41H(’A’),42H(’B’), ...
;* 結(jié)果為 41H(’A’),42H(’B’),31H,41H(’A’),42H(’B’) ...
;* 部分程序已給出，其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開始的內(nèi)存單元中。 運算結(jié)果要求從RESULT開始存
;* 放，由過程SAVE保存到OUTPUT1.DAT文件中。填空BEGIN和END之間
;* 已給出的源程序使其完整(空白已用橫線標出，每行空白一般只需
;* 一條指令，但采用功能相當?shù)亩鄺l指令亦可)，或刪除BEGIN和END
;* 之間原有的代碼并自行編程來完成要求的功能。
;* 對程序必須進行匯編，并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
;* 件，最終運行程序產(chǎn)生結(jié)果 (無結(jié)果或結(jié)果不正確者均不得分)。
;* 調(diào)試中若發(fā)現(xiàn)整個程序中存在錯誤之處，請加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 20
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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT.DAT’中讀取數(shù)據(jù); **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
MOV CX,N
NEXT: MOV AL,[SI]
CMP AL,’a’
jb upper2
;JB ____
cmp al,’z’
;CMP AL, ____
ja upper2
;J___ UPPER2
and al,5fh
;AND ____
UPPER2: mov [di],al
inc si
inc di
loop next
;MOV [DI], ____
;INC ____
;INC ____
;____ NEXT
; **** 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)容如下：
44 69 46 64 66 61 68 47 7F 47 4C 6E 4B 45 6C 48 64 69 87 5A
output1.dat 內(nèi)容應當如下：
44 49 46 44 46 41 48 47 7F 47 4C 4E 4B 45 4C 48
44 49 87 5A