汇编语言实验如报告1~7.docVIP

实验一 汇编运行环境及方法、简单程序设计 dseg segment string1 db Move the cursor backward string2 db Move the cursor backward mess1 db Match.,13,10,$ mess2 db No Match,13,10,$ dseg ends cseg segment main proc far assume cs:cseg,ds:dseg,es:dseg start: push ds sub ax,ax push ax mov ax,dseg mov ds,ax mov es,ax lea si,string1 lea di,string2 cld mov cx,24 repz cmpsb jz match lea dx,mess2 jmp short disp match: lea dx,mess1 disp: mov ah,9 int 21h ret main endp cseg ends end start 实验二 用DEBUG编程:使用堆栈段将 AX和BX的内容进行交换等 DATA SEGMENT DATA1 DW 3000H,5000H XX DW 2000H DATA ENDS PROGNAM SEGMENT ASSUME CS:PROGNAM,DS:DATA START: MOV AX,DATA MOV DS,AX MOV SP,XX MOV BP,SP MOV SI,0 MOV AX,DATA1[SI] MOV BX,DATA1[SI+2] PUSH AX PUSH BX POP AX POP BX MOV AH,4CH INT 21H PROGNAM ENDS END START 实验三、存储器块清零和内存块移动 data segment da db 0ah,0bh,0ch,0dh,0eh data ends code segment assume cs:code,ds:data start: mov ax,data mov ds,ax mov bx,300h mov cx,5 l: lea si,da mov dl,[si] mov [bx],dl add si,1 add bx,1 loop l mov ah,4ch int 21h code ends end start 4. DATAS SEGMENT string1 db ERROR,0ah,0dh,$ string2 db $ DATAS ENDS CODES SEGMENT ASSUME CS:CODES,DS:DATAS START: MOV AX,DATAS MOV DS,AX L0: mov ah,1 int 21h cmp al,0dh jz exit cmp al,a jae L1 jb L3 L1: cmp al,z jna L2 ja L3 L2: sub al,20h mov cl,al lea dx,string2 mov ah,9 int 21h mov dl,0 mov dl,cl mov ah,2 int 21h mov dl,0ah mov ah,2 int 21h mov dl,0dh mov ah,2 int 21h jmp L0 L3: lea dx,string1 mov ah,9 int 21h jmp L0 exit: MOV AH,4CH INT 21H CODES ENDS END START 5. ;显示AL中两位十六进制数程序 code segment assume cs:code start:mov al,3Eh push ax mov dl,al mov