实验四循环结构大全语言程序设计实验报告

循环结构汇编语言程序设

计实验报告

实验四循环结构汇编语言程序设计

一、实验目的

1、学习循环结构的汇编语言程序的设计和调试。

2、学习通过直接对8086计算机的寄存器和内存的直接访问，编写更高效简洁的汇编程序。

3、加深掌握计算机整体的工作过程。

3、加深对排序算法的理解。

二、实验任务

编写程序求出数组A中（20个元素）的最大值和最小值（数组没有排序）。

要求至少采用二种不同的排序算法来实现。( 快速排序，归并排序、堆排序、Shell排序、插入排序、冒泡排序、交换排序、选择排序、基数排序……)

三、实验内容

为了更好地实现老师所布置的实验任务，我们根据情况选取以下两种方式实验。

1、利用冒泡排序的方式求解数组A中元素的最大值最小值。设计流程图如下所示：

2、利用选择排序的方式求得数组A中元素的序列。设计流程图如下所示：

四、实验环境

PC机： winXP/win7(32位)/win7(64位)+winxp 虚拟机

汇编工具：+。

五、实验步骤

1）建立和生成的文件

（1）编写的源程序，源程序名为abc、扩展名为.asm

（2）源程序经汇编程序汇编（翻译）后生成二进制目标程序，文件名为

（3）目标程序需要经连接生成可执行程序，文件名为

2）汇编环境

最基本的汇编环境只需要两个文件：和。将这两个文件拷入到已经建好的文件夹（例如huibian）中，并将文件夹huibian放在硬盘根目录C :\＞下

3）上机步骤

进入DOS窗口中执行。

4）调试程序

进入DEBUG后，调试程序

5）调试成功后重新汇编、连接并生成可执行代码

6）执行程序，并对运行结果截图。

利用冒泡排序求得数组A中元素的最大值最小值的实验结果如下图所示：（说明：输入

数据为：13,0,59,900,587,1,657,234,34,48）

利用选择排序对数组A中元素排序得到的序列得实验结果如下图所示：（说明：输入数

据为13,0,59,900,587,1,657,234,34,48）

六、实验心得

通过本次循环结构汇编语言程序设计的实验，我初步了解了汇编语言的基本语法，利用汇编语言的循环结构实现了对于数组A中元素的排序以及求得元素中的最大值最小值。另外，在实验过程中，我也了解到了，我们要时刻细心严谨，认真做好每一步，避免出现低级错误。

七、汇编语言代码

1、利用冒泡排序实现求最大值最小值的代码

data segment

mes1 db 'the max:$'

mes2 db 'the min:$'

a dw 13,0,59,900,587,1,657,234,34,48

data ends

code segment

main proc far

assume cs:code,ds:data

start:

push ds

sub ax,ax

push ax

mov ax,data

mov ds,ax

;以下是起泡排序核心代码

mov cx,10

dec cx

loop1:

mov di,cx

mov bx,0

mov ax,a[bx]

cmp a[bx+2],ax

jge cotinue

xchg ax,a[bx+2]

mov a[bx],ax

cotinue:

add bx,2

loop loop2

mov cx,di

loop loop1

mov dx,offset mes1

mov ah,09h

int 21h

mov bx,a[18]

call bini ;转换为十进制的子程序mov dx,offset mes2

mov ah,09h

int 21h

mov bx,a[0]

call bini

ret

main endp

bini proc near

mov cx,10000d

call bin

mov cx,1000d

call bin

mov cx,100d

call bin

mov cx,10d

call bin

mov cx,1d

call bin

ret

bini endp

bin proc near

mov ax,bx

mov dx,0

div cx

mov bx,dx

mov dl,al

add dl,30h

mov ah,02h

int 21h

ret

crlf proc near

mov dl,0ah

mov ah,02h

int 21h

mov dl,0dh

mov ah,02h

int 21

ret

crlf endp

code ends

end start

2、利用选择排序实现排序的代码

SAVEREG macro

push ax

push bx

push cx

push dx

push si

push di

endm

RESAVEREG macro

pop di

pop si

pop dx

pop cx

pop bx

pop ax

endm

;************************

data segment

arr dw 13,20,59,900,587,1,657,234,34,48 n dw 18

m dw 10

data ends

;************************

code segment

;------------------------

main proc far

assume cs:code, ds:data

start:

push ds

sub ax, ax

push ax

mov ax, data

mov ds, ax

;------------

;sort

;------------

;si,di index

;ax temp

mov si, 0

mov di, 0

loop1:

cmp si, n

jge OUTER1

;init loop2

mov ax, si

add ax, 2

mov di, ax

loop2:

cmp di, n

jg OUTER2

mov ax, arr[si]

cmp ax, arr[di]

jle DO_NOTHING

xchg ax, arr[di]

mov arr[si], ax

DO_NOTHING:

add di, 2

jmp loop2

OUTER2:

add si, 2

jmp loop1

OUTER1:

mov cx, m

mov di, 0

PRINT_LOOP:

mov ax, arr[di]

mov dx, 0

call print_dec

add di, 2

loop PRINT_LOOP

;read key from the keyboard mov ah, 0

int 16h

ret

;---------------------

;get_oct function

;must pass ax, dx

print_dec proc near

SAVEREG

mov cx, 0

mov bx, 10

GET_NUM_LOOP:

div bx

push dx

mov dx, 0

inc cx

cmp ax, 0

jne GET_NUM_LOOP PRINT:

pop dx

add dx, 30h

mov ah, 02h

int 21h

loop PRINT

;enter and change line mov dl, 0dh

mov ah, 02h

int 21h

mov dl, 0ah

mov ah, 02h

int 21h

RESAVEREG

ret

print_dec endp

main endp

;------------------------ code ends

;************************ end start