实验七 单重循环程序设计 （2学时）
【实验目的】
1.掌握单重循环程序设计的方法 2.掌握正确分配与使用寄存器。 3.掌握控制循环的方法。
【实验内容】
1、编制程序实现将LIST数组中的最大值存入MAX单元，并在屏幕上显示最大值，数组元素为无符号字数据，数据个数在CNT单元中。 【分析】:根据题意,可把第一个数先放入AX寄存器,将AX中的数与后面的CNT-1个数进行比较,如果AX中的数较小,则两数交换位置;如果AX中的数大于等于相比较的数,则两数不交换位置,在比较过程中,AX始终保持较大的数,比较CNT-1次,则最大者必在AX中,最后把AX中的数送入MAX单元。
参考程序：(请同学们补充显示程序段) DATAS SEGMENT
out1 db 10 dup(?)
list dw 10,59,421,6,8 ;此处输入数据段代码 cn dw ($-list)/2 max dw ?
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码 STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS START:
MOV AX,DATAS MOV DS,AX
lea si,list;此处输入代码据段代码 mov cx,cn mov ax,[si] dec cx add si,2 a1:cmp ax,[si]
jae small mov ax,[si]
33
small:
add si,2 loop a1 mov max,ax lea si,out1+3 next:
mov dx,0 mov bx,10
div bx;(ax)=商,(dx)=余数 or dl,30h
mov out1[si],dl dec si cmp ax,0 jnz next
mov out1+4,byte ptr'$' lea dx,out1 mov ah,9 int 21h MOV AH,4CH INT 21H CODES ENDS
END START
运行结果 421
2、设有N个数，连续存放在以BUF为首址的字存储区中。试编写程序，统计其中最高6位为全1的数的个数，并将统计结果送入屏幕显示。 DATAS SEGMENT
buf dw 5678,5946,0fc41h,1234;此处输入数据段代码 cn dw ($-buf)/2 DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码 STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS START:
MOV AX,DATAS MOV DS,AX
lea si,buf;此处输入代码据段代码 mov cx,cn mov dl,0 poa:mov ax,[si]
34
and ax,0fc00h cmp ax,0fc00h jnz next
inc dl;(统计高6位为1) next:add si,2 loop poa mov al,dl mov ah,0 mov bl,10
div bl;(al)=十位 (ah)=个位 mov bh,ah or al,30h mov dl,al mov ah,2 int 21h or bh,30h mov dl,bh mov ah,2 int 21h MOV AH,4CH INT 21H CODES ENDS
END START 运行结果 01
3、编写一个向用户提供指定字符的ASCII码的程序。要求：若用户需要知道某一个字符的ASCII码，则从键盘键入该字符。此时，程序将该字符的ASCII码按十六进制数形式在显示器上输出，显示格式如下所示： THE ASCII CODE OF A IS 41H THE ASCII CODE OF 7 IS 37H THE ASCII CODE OF CR（即回车)
当键入的是回车时，则不显示其ASCII吗，结束程序执行，返回DOS状态。 注意字母A和数字7是从键盘上输入。 DATAS SEGMENT
tab db '0123456789ABCDEF';此处输入数据段代码 OUT1 DB 0DH,0AH,'THE ASCII CODE 0F $' OUT2 DB 'IS',0,0,'H$' DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码 STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
35
START:
MOV AX,DATAS MOV DS,AX
LEA BX,TAB;此处输入代码据段代码 LOP:LEA DX,OUT1 MOV AH,9 INT 21H MOV AH,1 INT 21H CMP AL,0DH JE EXIT MOV DH,AL AND AL,0FH XLAT
MOV OUT2+3,AL MOV AL,DH MOV CL,4 SHR AL,CL XLAT
MOV OUT2+2,AL LEA DX,OUT2 MOV AH,9 INT 21H JMP LOP EXIT:
MOV AH,4CH INT 21H CODES ENDS END START
4、试编写程序，将以BUFA为首址的字节存储区存放的10个未压缩BCD码以相 反的顺序送到以BUFB为首址的字节存储区中，并将两个存储区中的数字串分两行显示出来。
分析：寄存器分配如下：
CX：循环次数计数器，初值为10
SI：取数指针，初值指向BUFA，每循环一次之后，其值增1 DI：送数指针，初值指向BUFB+9，每循环一次之后，其值减1 DL：存放要传送的数
【预习要求】
1．仔细阅读课本及相应教材。
2．参照程序框图编制源程序，准备好多组运算数据，以供校验。
【实验步骤】
1、确定算法，画出程序流程图。
36