第九套
===============================================================================
試題說明 :
===============================================================================
請編制程序PROG1.ASM, 其功能是: 內存中連續(xù)存放著20個
ASCII字符， 如果是小寫字母a至z之間的字符，請把它們轉換成
相應的大寫字母的ASCII字符(否則不作轉換)并統(tǒng)計原20個ASCII
字符中字符“z”的個數(shù)。轉換結果（包括不作轉換的a~z之間的
原ASCII字符）按序存入內存中，之后存放原20個ASCII字符中為
字符“z”的ASCII字符的個數(shù)（用一個字節(jié)表示）。
例如：
內存中有30H(’0’),31H(’1’),61H(’a’),41H(’A’),7AH(’z’),…
結果為 30H,31H,41H,41H,5AH,…,后跟用一個字節(jié)表示的原20
個ASCII字符中為字符“z”的個數(shù)
部分程序已給出，其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
中讀入SOURCE開始的內存單元中。運算結果要求從RESULT開始存放,
由過程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線
標出，每行空白一般只需一條指令，但采用功能相當?shù)亩鄺l指令亦
可)， 或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的
功能。
對程序必須進行匯編, 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
件，最終運行程序產(chǎn)生結果(無結果或結果不正確者均不得分)。調
試中若發(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+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 LEA DX,SOURCE ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV DI,OFFSET RESULT
MOV BX,0
MOV DL,0
MOV CX,N
PRO: MOV AL,SOURCE[BX]
CMP AL,61H
__ KEEP ; <’a’
CMP AL,7AH ; >=’a’
JNBE KEEP ; >’z’
CMP AL,79H ; <=’y’
JBE ____
INC DL
NINC: SUB AL,___
MOV [DI],AL
INC DI
JMP ____
KEEP: MOV [DI],AL
__________________
JUMP: INC BX
DEC CX
JNZ PRO
_________________
; **** END ****
LEA DX,RESULT ; 結果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結果文件名
MOV CX,N+1 ; 結果字節(jié)數(shù)
CALL SAVE ; 保存結果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
30 60 31 61 32 62 33 63 34 64 35 65 41 68 7B 7A 5A 5B 40 5F
#E
@3 $output1.hex 001
CF9FCEBECDBDCCBCCBBBCABABEB784A5A5A4BFA0FE91
#E
===============================================================================
試題說明 :
===============================================================================
請編制程序PROG1.ASM, 其功能是: 內存中連續(xù)存放著20個
ASCII字符， 如果是小寫字母a至z之間的字符，請把它們轉換成
相應的大寫字母的ASCII字符(否則不作轉換)并統(tǒng)計原20個ASCII
字符中字符“z”的個數(shù)。轉換結果（包括不作轉換的a~z之間的
原ASCII字符）按序存入內存中，之后存放原20個ASCII字符中為
字符“z”的ASCII字符的個數(shù)（用一個字節(jié)表示）。
例如：
內存中有30H(’0’),31H(’1’),61H(’a’),41H(’A’),7AH(’z’),…
結果為 30H,31H,41H,41H,5AH,…,后跟用一個字節(jié)表示的原20
個ASCII字符中為字符“z”的個數(shù)
部分程序已給出，其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
中讀入SOURCE開始的內存單元中。運算結果要求從RESULT開始存放,
由過程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線
標出，每行空白一般只需一條指令，但采用功能相當?shù)亩鄺l指令亦
可)， 或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的
功能。
對程序必須進行匯編, 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
件，最終運行程序產(chǎn)生結果(無結果或結果不正確者均不得分)。調
試中若發(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+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 LEA DX,SOURCE ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV DI,OFFSET RESULT
MOV BX,0
MOV DL,0
MOV CX,N
PRO: MOV AL,SOURCE[BX]
CMP AL,61H
__ KEEP ; <’a’
CMP AL,7AH ; >=’a’
JNBE KEEP ; >’z’
CMP AL,79H ; <=’y’
JBE ____
INC DL
NINC: SUB AL,___
MOV [DI],AL
INC DI
JMP ____
KEEP: MOV [DI],AL
__________________
JUMP: INC BX
DEC CX
JNZ PRO
_________________
; **** END ****
LEA DX,RESULT ; 結果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結果文件名
MOV CX,N+1 ; 結果字節(jié)數(shù)
CALL SAVE ; 保存結果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
30 60 31 61 32 62 33 63 34 64 35 65 41 68 7B 7A 5A 5B 40 5F
#E
@3 $output1.hex 001
CF9FCEBECDBDCCBCCBBBCABABEB784A5A5A4BFA0FE91
#E