第九套
===============================================================================
試題說(shuō)明 :
===============================================================================
請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著20個(gè)
ASCII字符， 如果是小寫字母a至z之間的字符，請(qǐng)把它們轉(zhuǎn)換成
相應(yīng)的大寫字母的ASCII字符(否則不作轉(zhuǎn)換)并統(tǒng)計(jì)原20個(gè)ASCII
字符中字符“z”的個(gè)數(shù)。轉(zhuǎn)換結(jié)果（包括不作轉(zhuǎn)換的a~z之間的
原ASCII字符）按序存入內(nèi)存中，之后存放原20個(gè)ASCII字符中為
字符“z”的ASCII字符的個(gè)數(shù)（用一個(gè)字節(jié)表示）。
例如：
內(nèi)存中有30H(’0’),31H(’1’),61H(’a’),41H(’A’),7AH(’z’),…
結(jié)果為 30H,31H,41H,41H,5AH,…,后跟用一個(gè)字節(jié)表示的原20
個(gè)ASCII字符中為字符“z”的個(gè)數(shù)
部分程序已給出，其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
中讀入SOURCE開始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開始存放,
由過(guò)程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線
標(biāo)出，每行空白一般只需一條指令，但采用功能相當(dāng)?shù)亩鄺l指令亦
可)， 或刪除BEGIN和END之間原有的代碼并自行編程來(lái)完成要求的
功能。
對(duì)程序必須進(jìn)行匯編, 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
件，最終運(yùn)行程序產(chǎn)生結(jié)果(無(wú)結(jié)果或結(jié)果不正確者均不得分)。調(diào)
試中若發(fā)現(xiàn)整個(gè)程序中存在錯(cuò)誤之處，請(qǐng)加以修改。
===============================================================================
程序 :
===============================================================================
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 ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+1 ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
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
| 北京 | 天津 | 上海 | 江蘇 | 山東 |
| 安徽 | 浙江 | 江西 | 福建 | 深圳 |
| 廣東 | 河北 | 湖南 | 廣西 | 河南 |
| 海南 | 湖北 | 四川 | 重慶 | 云南 |
| 貴州 | 西藏 | 新疆 | 陜西 | 山西 |
| 寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
| 黑龍江 | 內(nèi)蒙古 |
