微机原理习题4-汇编语言程序设计

AND AH, 01H ;将最高位的进位标志送AH OR AH, 30H ;最高位的进位位拼成ASCII码 MOV [DI], AH ;存结果的最高位 MOV AH, 02H ;调用DOS的02H功能显示 MOV CX, 05H ;显示数据的位数

DON2: MOV DL,[DI] ;显示数据送DL

INT 21H ;显示 DEC DI ;显示数据所在存储单元加一 LOOP DON2 ;未显示完,继续 MOV AH, 4CH ;返回DOS INT 21H

RET

MAIN ENDP CODE ENDS

END START

4.11 试编程序,统计由40000H开始的16K个单元中所存放的字符“A“的个数,并将结果存放在DX中。

【答】 参考程序

DATA SEGMENT

BUF DB 'DFASFAAAFDFAAFFFA' COUNT EQU $-BUF DATA ENDS STACK SEGMENT

BUFF DW 100 DUP (?) M EQU $- STA STACK ENDS CODE SEGMENT

ASSUME CS:CODE,DS:DATA,SS:STACK BEGIN: MOV AX,DATA

MOV DS,AX MOV AX,STACK MOV SS,AX MOV AX,M MOV SP,AX MOV CX,COUNT MOV DX,0 LEA SI,BUF MOV AL,'A' CALL FindChar MOV AH,4CH

INT 21H ;返回 DOS

FindChar PROC NEAR PUSH DX

NEXT : CMP [SI],AL

JNZ OTHER INC DX

OTHER: INC SI

LOOP NEXT POP DX RET

FindChar ENDP CODE ENDS

END BEGIN

4.12 统计数据块中正数与负数的个数,并将正数与负数分别送到两个缓冲区。 【答】解法一:采用串操作指令,要程序片段:

BLOCK DB -1,-3,5,6,-2,0,20,10 PLUS_D DB 8 DUP(?) ;正数缓冲区 MINUS_D DB 8 DUP(?) ;负数缓冲区

PLUS DB 0 MINUS DB 0 MOV SI,OFFSET BLOCK MOV DI,OFFSET PLUS_D MOV BX,OFFSET MINUS_D MOV CX, 8 ;数据个数送CX GOON: LODSB ;AL← [SI] TEST AX, 80H JNZ JMIUS ;为负数,转 INC PLUS ;正数个数加一 STOSB ;[DI] ←AL,传正数 JMP AGAIN JMIUS: INC MINUS ;负数个数加一 XCHG BX, DI STOSB ;送负数到缓冲区 XCHG BX, DI AGAIN: DEC CX JNZ GOON

解法二:用比较指令CMP、转移指令JA/JNA/JB/JNB、循环指令LOOP等 BLOCK DB -1,-3,5,6,-2,0,20,10 N EQU $-BLOCK PLUS_D DB 8 DUP(?) ;正数缓冲区 PLUS DB 0

MINUS_D DB 8 DUP(?) ;负数缓冲区 MINUS DB 0 ……

MOV SI,OFFSET BLOCK MOV DI,OFFSET PLUS_D MOV BX,OFFSET MINUS_D MOV CX, N ;数据个数送CX GOON: MOV AL,[SI] TEST AL, 80H JNZ JMIUS ;为负数,转 INC PLUS ;正数个数加一 MOV [DI],AL ;传正数 INC DI

JMP AGAIN JMIUS: INC MINUS ;负数个数加一 MOV [BX],AL INC BX AGAIN: INC SI DEC CX JNZ GOON

4.13 编写一个子程序将AX中的十六进制数,转换成ASCII码, 存于ADR开始的四个单元中。

提示:1)、AX中的数从左到右,转换成ASCII码,用循环左移ROL和AND指令,把提出的一个十六进制数置BL中;

2)、0 ~ 9 的ASCII码:30 ~ 39H,A ~ F 的ASCII码:41H ~ 46H。 ( 先把每个数加30H,判断是否为数字0 ~ 9?若是A ~ F,再加07H,得字母的ASCII码。) 【答】 参考程序: DATA SEGMENT

ADR DB 5 DUP(?) DATA ENDS

CODE SEGMENT MAIN PROC FAR

ASSUME CS:CODE,DS:DATA START: MOV AX,7EC3H ;假设ax中存放7ec3h

LEA SI,ADR MOV DL,4

AGAIN:

MOV AND ADD CMP JG JMP ADD MOV INC MOV ROL DEC JNZ

BX,AX BX,000FH BL,30H BL,'9' ADUST STORE BL ,07H [SI],BL SI CL,4 AX,CL DL AGAIN

ADUST: STORE:

MAIN ENDP CODE ENDS

END START

4.14 编写一个子程序将AX中的2进制数,转换成10进制ASCII码, 存于ADR开始的五个单元中。

【答】算法分析:

(1)一个16位2进制数,其值最大为65535。采用除10取余数方法,即可得到各个位。

A)十进制数a5a4a3a2a1,除以10,余数a1为个位;商a5a4a3a2 B)a5a4a3a2再除以10,余数a2为十位; C)以此类推,得到百位、千位、万位。

(2)再将其加上30H则得到ASCII码,以便输出显示。

(3)若数据为负数,用0减去该数,可得绝对值,再将符号位记录下来即可。 参考程序:

DATA SEGMENT

BIN DW -1988 ;带符号二进制数

ADR DB 6 DUP(0),'$' ;十进制数以ASCII码存储

DATA ENDS

CODE SEGMENT

ASSUME CS:CODE,DS:DATA

TRAN PROC FAR

MOV AX,DATA MOV DS,AX MOV AX,BIN LEA DI,ADR

CALL BINASCII ;十六位二进制数转换为十进制ascii码 MOV AH,4CH INT 21H ;返回DOS

TRAN ENDP

;子程序BINASCII功能:将16位二进制数转换为ASCII码,存于ADR开始的连续6个单元,并显示

;入口参数:AX=待转换的数, 预定义一个缓存区ADR,7个字节,最末字节为‘$’字符。 ;出口参数:DI=转换好的ASCII码首地址,显示该十进制数据 BINASCII PROC

PUSH BX PUSH CX PUSH DX TEST AX,8000H ;判断数据的符号 JNS PLUS

MINUS: MOV BYTE PTR[DI],'-' ;将符号存储

NEG AX ;如是负数,取相反数去掉符号位 JMP GO

PLUS: MOV BYTE PTR[DI],'+' ;将符号码存储 GO: ADD DI,5 ;DI指向个位

MOV CX,5

MOV BX,10

LP: MOV DX,0

DIV BX ;算法为a/10 ,余数为一个低位十进制数 ADD DL,30H ;转换为ASCII码 MOV BYTE PTR[DI],DL ;从个位开始存储 DEC DI LOOP LP MOV DX,DI MOV AH,09H INT 21H ;显示 POP DX POP CX POP BX RET

BINASCII ENDP CODE ENDS

END TRAN

4.15 编写一个子程序,对AL中的数据进行偶校验,并将经过校验的结果放回AL中。 【答】参考程序:

JIAOYAN PROC FAR

MOV AL,1001110B OR AL, AL JNP NEXT MOV AL,0 JMP DONE

NEXT: MOV AL,1

DONE: MOV AH,04CH

INT 21H

JIAOYAN ENDP

4.16 从2000H单元开始的区域,存放100个字节的字符串,其中有几个$符号(ASCII 码为24),找出第一个$符号,送AL中,地址送BX。 【答】参考程序:

SEARCH PROC FAR

MOV DI,2000H MOV CX,100 MOV AL,24H CLD

REPNZ SCASB JNZ STOP DEC DI MOV BX,DI MOV AL,[DI]

STOP: RET SEARCH ENDP

4.17 用串操作指令实现:先将100H个数从2170H单元处搬到1000H单元处,然后从中检索等于AL中字符的单元,并将此单元换成空格字符。 【答】参考程序:

MOV AL,24H MOV SI,2170H MOV DI,1000H MOV CX,100H CLD

DO: REP MOVSB

MOV DI,1000H MOV CX,100H CLD

REPNZ SCASB DEC DI

联系客服:779662525#qq.com(#替换为@)