上機(jī)題之31
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著二十個(gè)
;* 十進(jìn)制數(shù)的ASCII字符，把它們轉(zhuǎn)換成壓縮型(組合型)BCD碼。
;* 例如:
;* 內(nèi)存中有
;* 31H('1'),32H('2'),33H('3'),34H('4') ...(共二十個(gè)字節(jié))
;* 結(jié)果為 21H,43H, ... (共十個(gè)字節(jié))
;* 部分程序已給出，其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中。 運(yùn)算結(jié)果要求從RESULT開(kāi)始存
;* 放, 由過(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 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N*2 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
MOV ES,AX
LEA DX,SOURCE ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N*2 ; 字節(jié)數(shù)
CALL LOAD ; 從'INPUT.DAT'中讀取數(shù)據(jù)
; **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
MOV CX,N
CLD
NEXT: lodsb
;LODS__
and al,0fh
;AND AL, ____
MOV BL,AL
lodsb
;LODS__
push cx
mov cl,4
;PUSH ____
;MOV CL, ____
SAL AL,CL
pop cx
;POP ____
add al,bl
stosb
;ADD AL, ____
;STOS__
LOOP 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)容如下：
30 39 32 39 34 35 30 35 39 33 38 35 36 39 34 32 33 31 36 37
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
90 92 54 50 39 58 96 24 13 76
上機(jī)題之32
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是:
;* 對(duì)內(nèi)存中存放的四組帶符號(hào)8位二進(jìn)制數(shù)(每組由五個(gè)數(shù)組成,均
;* 不為零)進(jìn)行處理。處理方法為:當(dāng)每組中負(fù)數(shù)多于正數(shù)時(shí),將組內(nèi)正
;* 數(shù)變成負(fù)數(shù)(但絕對(duì)值不變,下同),組內(nèi)負(fù)數(shù)不變。反之,將組內(nèi)負(fù)數(shù)
;* 變成正數(shù),組內(nèi)正數(shù)不變。變換好的數(shù)按原序存放在內(nèi)存中。
;* 例如:
;* 內(nèi)存中有 FDH,FEH,02H,01H,03H,03H,01H,FFH,FEH,FDH,…
;* (共四組20個(gè)數(shù))
;* 結(jié)果為 03H,02H,02H,01H,03H,FDH,FFH,FFH,FEH,FDH,…
;* (共20個(gè)數(shù))
;* 部分程序已給出, 其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開(kāi)始存放,
;* 由過(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 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,4
;MOV BX,___
REPT1: MOV DX,0
MOV CX,5
CAMP: MOV AL,SOURCE[SI]
INC SI
CMP AL,0
jl cont
jmp next
;___ CONT
;JMP ____
CONT: INC DX
NEXT: LOOP CAMP
SUB SI,5
MOV CX,5
CMP DX,3
jge neg1
;___ NEG1
JMP NEXT1
NEG1: MOV AL,SOURCE[SI]
INC SI
CMP AL,0
JG NEG2
JMP NOTNEG
NEG2: NEG AL
NOTNEG: MOV RESULT[DI],AL
INC DI
LOOP NEG1
JMP NEXT2
NEXT1: MOV AL,SOURCE[SI]
INC SI
cmp al,0
;CMP AL,___
JL NEG3
jmp notneg1
;JMP _______
NEG3: NEG AL
NOTNEG1: MOV RESULT[DI],AL
INC DI
LOOP NEXT1
NEXT2: DEC BX
jz exit
;________________
JMP REPT1
EXIT: NOP
; **** 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)容如下：
03 01 02 03 04 03 01 FF FE FD FD FE 02 01 03 FF FE FD FC FB
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
03 01 02 03 04 FD FF FF FE FD 03 02 02 01 03 FF
FE FD FC FB
上機(jī)題之33
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 在遞增的有序字節(jié)數(shù)組中
;* 插入一個(gè)正整數(shù), 并按指定的數(shù)組個(gè)數(shù)存入內(nèi)存區(qū)中。假設(shè)數(shù)組
;* 元素均為正數(shù)。
;* 例如, 將02H插入下面的數(shù)組中:
;* 01H,03H,04H,05H,....
;* 結(jié)果為 01H,02H,03H,04H,05H,....
;* 部分程序已經(jīng)給出,其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中, 轉(zhuǎn)換結(jié)果要求從RESULT開(kāi)始存放,
;* 由過(guò)程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之間已經(jīng)給出的一段源程序使其完整,填空處已
;* 經(jīng)用橫線標(biāo)出, 每個(gè)空白一般只需要填一條指令或指令的一部分(指
;* 令助記符或操作數(shù)), 考生也可以填入功能相當(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é)果不正確者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
DSEG SEGMENT
MIN DB -1
SOURCE DB N DUP(?)
X EQU 2 ; 插入的數(shù)
RESULT DB N DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 DB 'OUTPUT1.DAT',0
DSEG ENDS
SSEG SEGMENT STACK
DB 256 DUP (?)
SSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG,SS:SSEG,DS:DSEG
START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
MOV AX,DSEG
MOV DS,AX
MOV ES,AX
LEA DX,SOURCE
LEA SI,NAME0
MOV CX,N
CALL LOAD
; *** BEGIN ***
LEA BX,SOURCE
MOV SI,N-2
ADD BX,SI
MOV SI,0
MOV AL,X
LP: cmp al,[bx+si]
;CMP __,[BX+SI]
JGE INS
MOV DL,[BX+SI]
mov [bx+si+1],dl
dec bx
;MOV [BX+SI+1],___
;DEC _____________
JMP LP
INS: mov [bx+si+1],al
;MOV _________,AL
CLD
LEA SI,SOURCE
LEA DI,RESULT
MOV CX,N
rep movsb
;___ MOVSB
; *** END ***
LEA DX,RESULT
LEA SI,NAME1
MOV CX,N
CALL SAVE
RET
START ENDP
CSEG ENDS
END START
input1.dat 內(nèi)容如下：
01030405060708090A0B
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
01 02 03 04 05 06 07 08 09 0A
上機(jī)題之34
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著兩個(gè)有
;* 符號(hào)字節(jié)數(shù)序列Ak和Bk(k=0,…,9)，求序列Ck，Ck= Ak×Bk（Ck
;* 以有符號(hào)字的形式按C0,…,C9 的順序連續(xù)存放）。
;* 例如：
;* 序列Ak為80H,C0H,81H,00H,…；
;* 序列Bk為80H,C0H,81H,7FH,…。
;* 結(jié)果Ck為4000H,1000H,3F01H,0000H,…。
;* 部分程序已給出，其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中，運(yùn)算結(jié)果要求從RESULT開(kāi)始存放,
;* 由過(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 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N*2 DUP(?)
RESULT DW 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*2 ; 字節(jié)數(shù)
CALL LOAD ; 從 'INPUT1.DAT'中讀取數(shù)據(jù)
; **** BEGIN ****
mov di,offset result
mov bx,0
;MOV DI,_____________
;______________
MOV CX,N
PRO: mov al,source[bx+N]
imul source[bx]
;MOV AL,______________
;_____ SOURCE[BX]
MOV [DI],AX
add di,2
;ADD ________
INC BX
dec cx
;______________________
JNZ PRO
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N*2 ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
80 C0 81 00 7F 40 3F 80 C0 81 80 C0 81 7F 81 C0 3F 7F 7F 64
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
00 40 00 10 01 3F 00 00 FF C0 00 F0 81 0F 80 C0
40 E0 64 CE
上機(jī)題之35
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 在遞增的有序字節(jié)數(shù)組中
;* 刪去一個(gè)指定的數(shù)組元素，該元素在程序的數(shù)據(jù)段中用符號(hào)常量X
;* 表示（在數(shù)組元素中只有一個(gè)這樣的元素）。 為了保持原數(shù)組個(gè)
;* 數(shù)不變, 將數(shù)組的最后一個(gè)元素填0。假設(shè)數(shù)組元素均為正數(shù)。
;* 例如, 在下面的數(shù)組中刪去數(shù)組元素03H
;* 01H,02H,03H,04H,05H....
;* 結(jié)果為 01H,02H,04H,05H,.........,00H
;* 部分程序已經(jīng)給出,其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中, 轉(zhuǎn)換結(jié)果要求從RESULT開(kāi)始存放,
;* 由過(guò)程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之間已經(jīng)給出的一段源程序使其完整,填空處已
;* 經(jīng)用橫線標(biāo)出, 每個(gè)空白一般只需要填一條指令或指令的一部分(指
;* 令助記符或操作數(shù)), 考生也可以填入功能相當(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é)果不正確者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
DSEG SEGMENT
SOURCE DB N DUP(?)
X EQU 3 ; 指定的刪除元素
RESULT DB N DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 DB 'OUTPUT1.DAT',0
DSEG ENDS
SSEG SEGMENT STACK
DB 256 DUP (?)
SSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG,SS:SSEG,DS:DSEG
START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
MOV AX,DSEG
MOV DS,AX
MOV ES,AX
LEA DX,SOURCE
LEA SI,NAME0
MOV CX,N
CALL LOAD
; *** BEGIN ***
CLD
LEA DI,SOURCE
MOV AL,X
MOV CX,N
repne scasb
;_____ SCASB
MOV SI,DI
dec di
rep movsb
;DEC _____
;REP _____
mov byte ptr [di],0
;MOV BYTE PTR [DI],___
LEA SI,SOURCE
LEA DI,RESULT
mov cx,N
;_________________
REP MOVSB
; *** END ***
LEA DX,RESULT
LEA SI,NAME1
MOV CX,N
CALL SAVE
RET
START ENDP
CSEG ENDS
END START
input1.dat 內(nèi)容如下：
0102030405060708090A
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
01 02 04 05 06 07 08 09 0A 00
本題重編程序思路也許更為簡(jiǎn)單，舉例如下：
以下內(nèi)容為程序代碼:
; *** BEGIN ***
CLD
lea si,source
lea di,result
mov cx,N-1
mov al,x
loop1: cmp al,[si]
je loop2
movsb
loop loop1
loop2: inc si
REP MOVSB
mov byte ptr [di],0h
; *** END ***
上機(jī)題之36
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著16個(gè)二
;* 進(jìn)制字節(jié)數(shù)，在原16個(gè)數(shù)的第4和第5個(gè)數(shù)之間插入00H，在原16個(gè)
;* 數(shù)的第8和第9個(gè)數(shù)之間插入55H，在原16個(gè)數(shù)的第12和第13個(gè)數(shù)之
;* 間插入AAH，在原16個(gè)數(shù)的最后加入FFH。將按上述方法插入4個(gè)字
;* 節(jié)數(shù)后得到的20個(gè)字節(jié)數(shù)存入內(nèi)存中。
;* 例如：
;* 內(nèi)存中有 10H,20H,30H,40H,50H,…,8FH(共16個(gè)字節(jié))
;* 結(jié)果為 10H,20H,30H,40H,00H,50H,…,8FH,FFH(共20個(gè)字節(jié))
;* 部分程序已給出，其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開(kāi)始存放,
;* 由過(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 16
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?)
INDATA DB 0FFH,0AAH,55H,00H
RESULT DB N+4 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 CX,4
MOV BX,4
CHAN: mov ah,source[si]
;________________________
MOV RESULT[DI],AH
inc si
;_____________
INC DI
DEC CX
JZ INSER1
JMP CHAN
INSER1: PUSH SI
MOV SI,BX
MOV AH,INDATA[SI-1]
mov result[di],ah
;MOV RESULT[DI],__
DEC BX
jz exit
;JZ ____
MOV CX,04H
pop si
;_______________
INC DI
jmp chan
;JMP ____
EXIT: POP SI
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+4 ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
12 34 44 31 E0 DD F0 2F 2C CD 61 8F 49 BC AC 2D
output.dat 內(nèi)容應(yīng)當(dāng)如下：
12 34 44 31 00 E0 DD F0 2F 55 2C CD 61 8F AA 49
BC AC 2D FF
上機(jī)題之37
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著二十個(gè)
;* ASCII字符，如果是小寫(xiě)字母a~z之間的字符，請(qǐng)把它們轉(zhuǎn)換成相
;* 應(yīng)的大寫(xiě)字符；若為其他字符，不作轉(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ù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中。 運(yùn)算結(jié)果要求從RESULT開(kāi)始存
;* 放，由過(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 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)容應(yīng)當(dāng)如下：
44 49 46 44 46 41 48 47 7F 47 4C 4E 4B 45 4C 48
44 49 87 5A
上機(jī)題之38
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 對(duì)經(jīng)常上下波動(dòng)的數(shù)據(jù)可采
;* 用只記錄峰值的數(shù)據(jù)壓縮方法。 即每次將采樣到的當(dāng)前值和前一次
;* 值比較, 如數(shù)據(jù)變化方向改變 (原變大現(xiàn)變小或原變小現(xiàn)變大), 說(shuō)
;* 明已過(guò)峰值, 這時(shí)就將前一值(峰值)記錄下來(lái)。
;* 例如(下例數(shù)據(jù)均為無(wú)符號(hào)數(shù)):
;* 原數(shù)據(jù): 23H,45H,89H,67H,5CH,36H,3CH,...
;* 壓縮后: 23H,89H,36H,...
;* 內(nèi)存中從SOURCE連續(xù)存放著四十個(gè)八位無(wú)符號(hào)數(shù), 假定無(wú)相鄰
;* 兩數(shù)相等的情況, 編程按上述方法進(jìn)行壓縮, 結(jié)果保存在RESULT開(kāi)
;* 始的內(nèi)存單元中。
;* 部分程序已在PROG1.ASM中給出, 請(qǐng)?zhí)羁誃EGIN和END之間已給
;* 出的源程序使其完整(空白已用橫線標(biāo)出, 每行空白一般只需一條
;* 指令, 但功能相當(dāng)?shù)亩鄺l指令亦可)或刪除BEGIN和END之間原有的
;* 代碼并自行編寫(xiě)程序片段來(lái)完成要求的功能。
;* 原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT中讀入SOURCE開(kāi)始的內(nèi)
;* 存單元中, 結(jié)果要求從RESULT開(kāi)始存放, 由過(guò)程SAVE保存到文件
;* OUTPUT1.DAT中。
;* 對(duì)程序必須進(jìn)行匯編, 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE 執(zhí)行文
;* 件, 最終運(yùn)行程序產(chǎn)生結(jié)果(無(wú)結(jié)果或結(jié)果不正確者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 40
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
MOV ES,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 SI,SOURCE
LEA DI,RESULT
CLD
MOVSB ; Y[0]=X[0]
XOR AX,AX
XOR BX,BX
LODSB
MOV BL,[SI-2]
SUB AX,BX ; X[1]-X[0]
MOV DX,AX
MOV CX,N-2
FILTER:
XOR AX,AX
XOR BX,BX
LODSB ; X[n]
MOV BL,[SI-2] ; X[n-1]
SUB AX,BX ; X[n]-X[n-1]
xchg ax,bx
;___________________ ; 相鄰兩差值(AX,DX)符號(hào)位是否相同
cmp bh,dh
;___________________
je skip
;J__ SKIP ; 相同, 數(shù)據(jù)方向未變
mov dx,bx
;___________________ ; 不同, 方向變化, 保存峰值
STOSB
SKIP: ;___________________
LOOP FILTER
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名起始地址
MOV CX,N ; 字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到"output1.dat"文件中
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
38 4E 3C 37 2B 01 0C 3A 78 FA F1 BE 50 5D 68 4B
32 22 17 26 4C 67 C4 B4 96 36 2D 21 59 CF F5 ED
CB C4 96 66 41 4E 59 9A
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
38 4E 01 FA 50 68 17 C4 21 F5 41 00 00 00 00 00
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
00 00 00 00 00 00 00 00
上機(jī)題之39
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著二十個(gè)無(wú)
;* 符號(hào)8位二進(jìn)制數(shù),每個(gè)數(shù)為搖號(hào)機(jī)一次搖出的兩個(gè)號(hào)碼的壓縮BCD碼
;* 表示�，F(xiàn)統(tǒng)計(jì)此二十次搖號(hào)中號(hào)碼0,1,2,…,9出現(xiàn)的次數(shù),將結(jié)果存
;* 入內(nèi)存。
;* 例如:
;* 內(nèi)存中有 00H,02H,32H,45H,08H,19H,67H,51H,90H,85H,
;* 62H,44H,73H,57H,39H,81H,36H,92H,21H,05H
;* 結(jié)果為 06H,04H,05H,04H,03H,05H,03H,03H,03H,04H
;* 部分程序已給出, 其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開(kāi)始存放,
;* 由過(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(?) ; 順序存放十個(gè)字節(jié)數(shù)
RESULT DB (N/2) 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 SI,SOURCE
MOV CX,20
MOV BX,0
AGN0: MOV AH,[SI]
mov al,ah
;__________________
AND AL,0FH
and ah,0f0h
;__________________
PUSH CX
MOV CX,4
AGN1: shr ah,1
;___ AH,1
LOOP AGN1
POP CX
MOV BL,AH
inc result[bx]
;_________________
MOV BL,AL
inc result[bx]
;_________________
INC SI
NEXT: LOOP AGN0
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N/2 ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
00 12 34 56 78 90 99 23 45 66 32 74 18 76 63 24 55 81 27 15
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
03 04 05 04 04 05 05 04 03 03
上機(jī)題之40
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM，其功能是：內(nèi)存中連續(xù)存放著兩個(gè)有
;* 符號(hào)字節(jié)數(shù)序列Ak和Bk(k=0,…,9),求序列Ck，Ck=Ak+Bk（Ck以有
;* 符號(hào)字的形式按C0,…,C9 的順序連續(xù)存放）。
;* 例如：
;* 序列Ak為80H(-128D),31H(+49D),61H(+97D),7FH(+127D),…；
;* 序列Bk為80H(-128D),01H(+1D),F1H(-15D),7FH(+127D),…。
;* 結(jié)果Ck為FF00H(-256D),0032H(+50D),0052H(+82D),
;* 00FEH(+254D), …。
;* 部分程序已給出, 其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開(kāi)始的內(nèi)存單元中，運(yùn)算結(jié)果要求從RESULT開(kāi)始存放,
;* 由過(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 10 ; 每個(gè)序列的長(zhǎng)度
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N*2 DUP(?) ; 順序存放A0,…,A9,B0,…,B9
RESULT DW N DUP(0) ; 順序存放C0,…,C9
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*2 ; 字節(jié)數(shù)
CALL LOAD ; 從 'INPUT1.DAT'中讀取數(shù)據(jù)
; **** BEGIN ****
MOV DI,OFFSET RESULT ; 結(jié)果從RESULT開(kāi)始存放
MOV BX,0
MOV CX,N ;
PRO: MOV AH,0
mov al,source[bx+N]
;MOV AL,_____________ ; 序列Bk中的一個(gè)字節(jié)
MOV DL,AL ; 暫存Bk
add al,source[bx]
;____ AL,SOURCE[BX] ; Ck=Bk+Ak
JNO STAY ; 無(wú)溢出轉(zhuǎn)STAY
JUMP1: MOV AH,00 ; 有溢出
ADD DL,0
JNS JUMP ; Bk是正數(shù)（為一個(gè)正數(shù)加上一個(gè)正數(shù)，
; 結(jié)果為負(fù)數(shù)的溢出情況）轉(zhuǎn)JUMP（AH
; 已為00H）
mov ah,0ffh
;MOV AH,________ ; Bk是負(fù)數(shù)（為一個(gè)負(fù)數(shù)加上一個(gè)負(fù)數(shù)，
; 結(jié)果為正數(shù)的溢出情況）將結(jié)果變?yōu)橛蟹?BR> ; 號(hào)字的形式（為負(fù)）
jmp jump
;JMP ____
STAY: cbw
;_____ ; AL中數(shù)的符號(hào)擴(kuò)展到AH，無(wú)符號(hào)字節(jié)
; 變成無(wú)符號(hào)字，有符號(hào)字節(jié)變成有符號(hào)字
JUMP: MOV [DI],AX
ADD DI,2
INC BX
DEC CX
JNZ PRO
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N*2 ; 結(jié)果字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
80 C0 81 00 7F 40 3F 80 C0 81 80 C0 81 00 7F 40 3F 7F 7F 64
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
00 FF 80 FF 02 FF 00 00 FE 00 80 00 7E 00 FF FF
3F 00 E5 FF
，我們將會(huì)及時(shí)處理。如轉(zhuǎn)載本網(wǎng)內(nèi)容，請(qǐng)注明出處。