微机原理实验1.docxVIP

实验一 两个多位十进制数相减实验

一. 实验要求

将两个多位十进制数相减,要求被减数,减数均以ASCII码形式按顺序存放在以DATAI和DATA2为首的5个内存单元中(低位在前),结果送回DATAI处。

二、实验目的

学习数据传送和算术运算指令的用法。

熟悉在PC机上建立、汇编、链接、调试和运行汇编语言程序的过程。

DATASEGMENT

DATA1

DB

33H,39H,31H,37H,38H

;第一个数据（作为被减数）

DATA2

DB

36H,35H,30H,38H,32H

;第二个数据（作为减数）

MES1

DB

-,$

MES2

DB

=,$

DATAENDS

STACKSEGMENT ;堆栈段STADB20DUP(?)

TOPEQULENGTHSTA

STACKENDSCODESEGMENT

ASSUMECS:CODE,DS:DATA,SS:STACK,ES:DATA

START: MOV

AX,DATA

MOV

DS,AX

MOV

ES,AX

MOV

AX,STACK

MOV

SS,AX

MOV

AX,TOP

MOV

SP,AX

MOV

SI,OFFSETDATA1

MOV

BX,05

CALL

DISPL

;显示被减数

MOV

AH,09H

LEA

DX,MES1

INT

21H

MOV

SI,OFFSET DATA2

MOV

BX,05

;显示减数

CALL

DISPL

MOV

AH,09H

LEA

DX,MES2

INT

21H

MOV

SI,OFFSETDATA1

MOV

DI,OFFSET DATA2

CALL

SUBA

;减法运算

MOV

SI,OFFSET DATA1

MOV

BX,05

;显示结果

CALL

DISPL

MOV

DL,0DH

MOV

AH,02H

INT

21H

MOV

DL,0AH

MOV

AH,02H

INT

21H

INT

21H

MOV

AX,4C00H

INT

21H

DISPL

PROC

NEAR ;显示子功能

DSI: MOVMOVINTDECJNZRET

AH,02

DL,[SI+BX-1] ;显示字符串中一字符21H

BX ;修改偏移量

DSI

DISPL

ENDP

SUBA

PROC

NEAR

MOV

DX,SI

MOV

BP,DI

MOV

BX,05

SU1:

SUB

BYTEPTR[SI+BX-1],30H

SUB

BYTEPTR[DI+BX-1],30H

DEC

BX

;将ASCII码表示的数字串

JNZ

SU1

;转化为十六进制的数字串

MOV

SI,DX

MOV

DI,BP

MOV

CX,05

;包括进位,共5位

SU2:

CLC

MOV

AL,[SI]

;清进单位

MOV

BL,[DI]

SBB

AL,BL

;带进位相减

AAS

;非组合BCD码的减法调整

MOV

[SI],AL

;结果送被减数区

INC

SI

INC

DI

;指向下一位

LOOP

SU2 ;循环

MOV

SI,DX

MOV

DI,BP

MOV

BX,05

SU3:

ADD

BYTEPTR [SI+BX-1],30H

ADD

BYTEPTR [DI+BX-1],30H

DEC

BX ;十六进制的数字串转化ASCII码表示的数字串

JNZ

SU3

RET

SUBA

ENDP

CODE

ENDS

END

START

实验二 两个数相乘的实验

一．

实验要求

实现十进制数的乘法，被乘数和乘数均以ASCII码形式存放在内存中，算式结果在屏幕上显示出来。

二． 实验目的

掌握乘法指令和循环指令的用法。

四实验远程：软件实验二 两个数相乘的 (R...

开始

巨[己区］

订

订}

乘数于BL

乘数于BL

liL的数转化为十六进剒数

印：指 向 结 果区（狂

印：指 向 结 果区（狂活0)

SI指向乘数

设詈计数伯

桉乘势［江］单元与BL相乖

＇

二fI

．．

AMi调整

AMi调整

结杲

[DI ]

DI+ 1指向下一早无』进位于[DI ]

计数泪－1=02

计数泪－1=0

2 示结婴

y

DATASEGMENT

DATA1DB 32H,39H,30H,35H,34HDATA2DB 34H

MES1 DB *,$

MES2 DB =,$RESULTDB 6DUP(00H)DATAENDS

STACKSEGMENT

STA

DB

20DUP(?)

TOP

EQU

LENGTH

STA

STACKENDSCODESEGMENT

ASSUMECS:CODE,DS:DATA,SS:STA