汇编语言程序设计实验报告

实 验 报 告 实验名称  汇编语言程序 设计 领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计           | | 专业班级：信息安全  学    号： 姓    名： 实验一  汇编语言上机过程和Debug常用调试命令 一． 实验目的： 学习程序设计的基本 方法 快递客服问题件处理详细方法山木方法pdf计算方法pdf华与华方法下载八字理论方法下载 和技能，熟练掌握用汇编语言设计、编写、调试和运行程序的方法。 二． 实验题目： 熟悉与实验有关的系统软件(如编辑程序、汇编程序、连接程序和调试程序等)的使用方法。在调试过程中，学习及掌握debug程序的各种操作命令。 三． 问题描述： 试编写一程序：比较两个字符串string1和string2所含的字符是否相同，若相同则显示‘match’; 否则，显示‘no match’。 四． 方法说明： a) 使用ws、tc或EDIT编辑程序来建立源文件，然后存盘，使系统返回DOS。 b) 用汇编程序masm(或asm)对源文件汇编产生目标文件obj 如：汇编指示出错则需重新调用编辑程序修改错误，直至汇编通过为止。 c) 用连接程序link 产生执行文件EXE. d) 执行程序，可直接从DOS执行程序。 e) 使用debug程序调试程序的方法。 五． 实验步骤： 1． 调用字处理程序EDIT 建立以sample.asm文件 datarea segment    string1  db  ‘move the cursor  backward.’ string2  db  ‘move the cursor  backward.’ mess1  db  ‘Match..’,13,10,’$’ mess2  db  ‘No match!..’,13,10,’$’ datarea ends prognam segment main proc far assume cs:prognam,ds:datarea,es:datarea start: push ds sub  ax,ax push  ax mov ax,datarea mov ds,ax mov es,ax lea si,string1 lea di,string2 cld mov cx,25 repz cmpsb jz  match lea  dx,mess2 jmp  short  disp match: lea  dx, mess1 disp: mov  ah,09 int    21h ret  main      endp prognam  ends end  start 2． 对源文件汇编产生目标文件obj D:\masm 文件名。Asm 3．用连接程序link产生执行文件exe D:\link文件名。Obj 4．执行程序 D:\ 文件名 5. 使用debug程序调试程序的方法。 d>debug 文件名.exe _ 1. 用G命令运行程序 2. 用U命令显示程序 3. 学会设置断点。 4. 学会查看数据段的内容情况D 5. 用E命令修改数据区的字符串。 6. 用A 命令把数据区的内容恢复原状 7. T命令逐条跟踪程序的执行 8. 学会使用F命令、R命令、Q命令等等 5、实验总结 第一次进行汇编实验，主要是学习程序设计的基本方法和技能，熟练掌握用汇编语言设计、编写、调试和运行程序的方法，只有多上机练习，才能更好的掌握汇编语言程序设计的思想。 实验二  循环程序设计1 循环结构是控制重复执行某一程序段的基本程序结构. 在汇编语言程序设计中, 循环程序的地位也是极为重要,从本质上来看, 循环程序结构是分支程序结构的一种手特殊形式, 也是使用条件转移指令来控制执行循环的. 一.实验目的： 学会用循环结构进行程序编程。 二.实验题目： 设计一个按 表 关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf 格形式显示ASC||码为10H—100H的所有字符的程序。 三.实验要求： 按15行*16列的表格形式显示ASC||码为10H----100H的所有字符，即以行为主的顺序及ASC||码递增的次序依次显示对应的字符。每16个字符为一行,每行中的相邻两个字符之间用空白符(ASC||为0)隔开。 四．方法说明： (1) 显示每个字符可使用功能号为02的显示输出功能调用，使用方法如下： mov ah,02h mov dl,0AH int  21h 本题中可把dl 初始化为10H, 然后不断使其加1(用INC指令) 以取得下一个字符的ASC||码。 (2) 显示空白符时，用其ASC||码0置入dl 寄存器，每行结束时，用显示回车(ASC||为0dh)和换行符(ASC||为oah)来结束本行并开始下一行。 (3) 由于逐个显示相继的ASC||字符时，需要保存并不断修改dl寄存器的内容，而显示空白、回车、换行符时也需要使用dl寄存器，为此可使用堆栈来保存相继的ASC||字符。具体用法是：在显示空白或回车，换行符前用指令  push  dx  把dl 的内容保存到堆栈中去。在显示空白或回车，换行符后用指令    pop  dx  恢复dl寄存器的原始内容。 五、实验代码 stack      segment db      100 dup (?) stack      ends code      segment          assume  cs:code,ss:stack start:          mov    dl,10h    mov    cl,0fh loopc:    mov    ah,02h      mov    al,dl int    21h inc    dl  push        dx      mov    dl,0h  mov    ah,02h mov    al,dl  int    21h pop    dx loopnz      loopc push    dx    mov    dl,0dh mov    ah,02h    mov    al,dl          int    21h mov    dl,0ah mov    ah,02h        mov    al,dl          int    21h pop    dx mov    cl,0fh cmp    dl,0h        jne    loopc mov    ah,4ch        int    21h code        ends          end    start 6、实验结果 7、实验总结 本次试验学会用循环结构进行程序编程，学好循环程序是很重要的，在程序设计中，它的地位是极其重要的。 实验三  循环程序设计2 一.实验目的： 学会用循环程序设计进行程序编程。 二.实验题目： 设计查找匹配字符串SEARCH的程序。 三.问题要求： 程序接收用户键入的一个关键字以及一个句子。如果句子中不包含关键字则显示’no match’;如果句子中包含关键字则显示‘match’，且把该字在句子中的位置用十六进制数显示出来，要求程序的执行过程如下： enter  keyword :abc enter  sentence :we  are  studying  abc match  at  location :11H of  the  sentence enter  sentence: xyz ,ok? no  match enter  sentence :^c 四.  方法说明： 程序可由三部分组成： (1 ) 输入关键字和一个句子，分别存入相应的缓冲区中，可用功能调用0AH。 (2) 在句子中查找关键字。 1． 关键字和一个句子中相应字段的比较可使用串比较指令，为此必须定义附加段，但附加段和数据段可以定义为同一段，以便于串指令的使用，这样，相应的寄存器内容也有了确定的含义，如下： SI 寄存器为关键字的指针 DI 寄存器为句子中正相比较的字段的指针 CX寄存器存放关键字的字母个数(长度) 2． 整个句子和关键字的比较过程可以用一个循环结构来完成。循环次数为： (句子长度--关键字长度)+1在计算循环次数时，如遇到句子长度小于关键字长度的情况则应转向显示“no match”，循环中还需要用到BX寄存器，它用来保存句子中当前正在比较字段的首地址。 (3) 输出信息： 用功能调用09h分“找到”或“找不到”两种情况分别显示不同的信息。在“找到”时，还要求显示出匹配字符串在句子中的位置，在“找到”时BX寄存器的内容为匹配字符串的首地址，将此值减到句子的首地址，再将差值加1 即是所要的匹配字符串在句子中的位置，可将位置转换为十六进制数从屏幕上显示出来。 5、实验代码 sseg segment  stack  dw  256  dup  (?)  sseg ends  data segment  msg1 db  'Enter  keyword:',24h  msg2 db  'Enter  Sentence:',24h  cr db  13,10,24h  keyword db  250,?,250  dup  (?)  Sentence db  250,?,250  dup  (?)  match db  'Match  at  location:',24h  match1 db  '  of  the  sentence',13,10,24h  nomatch db  'No  match',13,10,24h    data ends    code segment  assume  cs:code,ds:data,ss:sseg      disp_hex proc  near  push  ax  push  cx  push  dx  push  ax  mov  cl,4  ror  al,cl  and  al,0fh  add  al,30h  cmp  al,39h  jna  d1  add  al,7  d1:  mov  dl,al  mov  ah,2  int  21h  pop  ax  and  al,0fh  add  al,30h  cmp  al,39h  jna  d2  add  al,7  d2:  mov  dl,al  mov  ah,2  int  21h  mov  dl,'h'  mov  ah,2  int  21h  pop  dx  pop  cx  pop  ax  ret  disp_hex endp    begin:  mov  ax,data  mov  ds,ax  mov  es,ax  mov  dx,offset  msg1  mov  ah,9  int  21h  mov  dx,offset  keyword  mov  ah,0ah  int  21h  cmp  keyword  +  1,0  je  quit  mov  dx,offset  cr  mov  ah,9  int  21h  b1:  mov  dx,offset  msg2  mov  ah,9  int  21h  mov  dx,offset  Sentence  mov  ah,0ah  int  21h  mov  dx,offset  cr  mov  ah,9  int  21h  mov  dl,Sentence  +  1  cmp  dl,0  je  quit  mov  dh,keyword  +  1  mov  di,offset  Sentence  +  2  b2:  cmp  dh,dl  ja  _nomatch  mov  si,offset  keyword  +  2  mov  cl,dh    mov  ch,0  cld  push  di  repe  cmpsb  pop  di  je  _match  inc  di  dec  dl  jmp  b2  _match:  mov  ax,di  sub  ax,offset  Sentence + 2  inc  ax  push  ax  mov  dx,offset  match  mov  ah,9  int  21h  pop  ax  call  disp_hex  mov  dx,offset  match1  mov  ah,9  int  21h  jmp  b1  _nomatch:  mov  dx,offset  nomatch  mov  ah,9  int  21h  jmp  b1  quit:  mov  ah,4ch  int  21h  code ends  end  begin  六、实验结果 7、实验总结 本次试验主要考察了串比较指令的用法，同时将串指令和REPE联合起来用，使得指令变得简单。实验中还用到了一些数据结构，开始时需要定义空间以及缓冲区。 另外程序需要运用有两层循环，内循环由CX 记录 混凝土 养护记录下载土方回填监理旁站记录免费下载集备记录下载集备记录下载集备记录下载 关键字长度控制循环计数，外循环是由ax记录外循环次数控制外循环计数。 通过本次实验，使我更加熟悉了课堂上知识，还培养了我将理论知识运用到实际编程中去的能力。 实验四  分支程序设计 一.实验目的： 学会用分支程序设计进行程序编程。 二.实验题目： 设计一个程序能分类统计字符个数 三.实验要求： 程序接收用户键入的一行字符(字符个数不超过80个，该字符串用回车符结束)，并按字母、数字及其它字符分类计数，然后将结果存入以letter、digit和other为名的存储单元中。 四.方法说明： 程序可采用0AH功能调用把键入字符直接送到缓冲区中，然后再逐个取出分类计数，也可采用01H功能调用在接收字符后先分类计数然后再存入缓冲区中。 程序需进入debug 运行并查看计数结果。 5．实验代码 DATAS SEGMENT STRING1 DB 'Input Your String: $';输入提示信息 STRING2 DB 'Digit: $' ;各类字符提示信息 STRING3 DB 'Letter: $' STRING5 DB 'Others: $' DIGIT DB 0 ;数字 CHARS DB 0 ;字母 OTHERS DB 0 ;其他 DATAS ENDS CODES SEGMENT ASSUME CS:CODES,DS:DATAS START: MOV AX,DATAS MOV DS,AX LEA DX,STRING1 ;显示输入提示信息 MOV AH,9 INT 21H MOV CX,100 ;设置循环次数足够大 L1:MOV AH,1 ;中断调用，单字符输入 INT 21H CMP AL,0DH ;若输入回车符则结束 JZ OVER2 CMP AL,30H JB OTHER ;若<30H(0)，OTHERS++ CMP AL,39H ;若>39H(9),跳转进一步比较 JA HIGHER1 JMP DIGITAL ;DIGIT++ HIGHER1: CMP AL,41H ;if<41H(A),OTHERS++ JB OTHER CMP AL,5AH ;if>5AH(Z),跳转继续比较 JA HIGHER2 JMP CHAR ;ALPHAU++ HIGHER2:  CMP AL,61H ;if<61H(a),OTHERS++ JB OTHER CMP AL,7AH ;if>7AH(z),OTHERS++ JA OTHER JMP CHAR ;ALPHAL++ JMP OVER ;比较结束 OTHER:  INC OTHERS ;OTHERS++ JMP OVER DIGITAL: INC DIGIT ;DIGIT++ JMP OVER CHAR:  INC CHARS ;ALPHAL++ JMP OVER JMP OVER OVER:NOP LOOP L1 ;循环，输入下一字符 OVER2:CALL ENDLINE ;回车换行 LEA DX,STRING2 ;输出提示信息 MOV AH,9 INT 21H XOR AX,AX MOV AL,DIGIT ;将统计的数字送AX，为输出做准备 CALL DISPLAY ;调用输出两位数字的子程序 CALL ENDLINE ;下同 LEA DX,STRING3 MOV AH,9 INT 21H XOR AX,AX MOV AL,CHARS CALL DISPLAY CALL ENDLINE LEA DX,STRING5 MOV AH,9 INT 21H XOR AX,AX MOV AL,OTHERS CALL DISPLAY MOV AH,4CH INT 21H ENDLINE PROC NEAR ;控制输出 格式 pdf格式笔记格式下载页码格式下载公文格式下载简报格式下载 ，输出回车换行子程序 MOV AH,2 MOV DL,0AH INT 21H MOV AH,2 MOV DL,0DH INT 21H RET ENDLINE ENDP DISPLAY PROC NEAR ;输出两位数字的子程序 MOV BL,10 ;10送BL DIV BL ;AX/BL,AL=商，AH=余数 PUSH AX ;保存AX中的信息 MOV DL,AL ADD DL,30H MOV AH,2 INT 21H ;输出十位数 POP AX ;出栈送AX MOV DL,AH ADD DL,30H MOV AH,2 INT 21H ;输出个位数 RET DISPLAY ENDP CODES ENDS END START 6．实验总结 本次实验要求我们学会用分支程序设计进行程序编程，其中运用到许多跳转和比较指令，只要细心一点，理清思路就能很容易的将本程序编写出来。 实验五  子程序设计 一． 实验目的： 学会用子程序设计进行程序编程。 二． 实验题目： 设计一个能查找电话号码phone的程序。 三． 实验要求： i. 要求程序建立一个可存放50项的电话号码表，每项包括人名(20个字符)及电话号码(8个字符)两部分； ii. 程序可接收输入人名及相应的电话号码，并把它们加入电话号码表中； iii. 凡有新的输入后，程序应按人名对电话号码表重新排序； iv. 程序可接收需要查找电话号码的人名，并从电话号码表中查出其电话号码，再在屏幕上以如下格式显示出来。 name  tel ****  **** 四． 实验提示： 程序采用子程序结构，主程序的主要部分如下： . 显示提示符‘input  name:’; . 调用子程序input_name接收人名； . 调用子程序stor_name把人名存入电话号码表tel_tab中； . 显示提示符‘input a telephone number:’; . 调用子程序inphone接收电话号码，并把它存入电话号码表tel_tab中； . 如输入已结束则调用name_sort子程序对电话号码表按人名排序； . 显示提示符‘DO you want  a  telephone  number?(y/n)’; . 回答N则退出程序； . 回答Y则再显示提示符‘ name？’; . 调用子程序input_name接收人名; . 调用子程序name_search在电话号码表中查找所要的电话号码； . 调用子程序printline按要求格式显示人名及电话号码； . 重复查号提示符直至用户不再要求查号为止。 5、实验代码 data            segment tel_tab        db        50 dup( 28 dup(' '))                    ; tel_tab电话本空间 tab_len        dw        0                                ; 已存联系人数目 endaddr        dw        0                                ; 最后一个联系人的地址+28 tname        db        21,?,20 dup(' '),?                    ; 姓名缓冲区 tphone        db        9,?,8 dup(' '),?                        ; 号码缓冲区 temp            db        28 dup(?)                            ; 一个联系人的临时空间 iname        db        13,10,'Input  name:',13,10,'$'                iphone        db        13,10,'Input a telephone number:',13,10,'$'    go_on        db        13,10,'Continue  insert? ',13,10,'$'; 提示是否继续插入联系人 sname        db        13,10,'Name?',13,10,'$'                    name_e        db        13,10,13,10,'The name has been in the table! Please input again!',13,10,'$' text2            db        13,10,'Name                Tel.    ',13,10,'$' text3            db        13,10,'The name is not in the telephone table!',13,10,'$' text4            db        13,10,13,10,'Do you want a telephone number? ',13,10,'$' data            ends code            segment ; **************************************************************************** ; 主程序 ; ------------------------------------------------------------------------------------- main            proc        far assume    cs:code ,ds:data,es:data start: push        ds                ; 保存旧数据用于返回 sub        ax,ax push        ax mov        ax,data            ; 数据段、附加段初始化 mov        ds,ax mov        es,ax inname:        lea        dx,iname            ; 提示输入姓名 mov        ah,09h int        21h call        input_name        ; 调用读入姓名子程序 call        name_search        ; 调用查找子程序， cmp        bx,-1            ; 如表中不存在该联系人 je        stor                ; 则跳转到stor call        crlf                ; 回车换行 lea        dx,name_e        ; 否则提示该联系人已在表中，提示重新输入 mov        ah,09h int        21h jmp        inname stor:            call        stor_name        ; 调用姓名转存子程序，把姓名移动到表中 lea        dx,iphone            ; 提示输入电话号码 mov        ah,09h int        21h call        inphone            ; 调用读入号码子程序 call        name_sort        ; 排序 call        crlf lea        dx,go_on            ; 提示是否继续插入 mov        ah,09h int        21h choice1:        mov        ah,07            ; 读取用户选择 int        21h cmp        al,'y'                je        inname cmp        al,'Y' je        inname cmp        al,'n' je        print_all            ; 如选择不插入，则显示所有记录 cmp        al,'N' je        print_all jmp        choice1 print_all:        call        printall            ; 显示所有记录 want_search:    call        crlf lea        dx,text4            ; 提示是否查找号码 mov        ah,09 int        21h call        crlf choice2:        mov        ah,07            ; 读取用户选择 int        21h cmp        al,'y' je        search            ; 如果为y或Y则跳转到查找search cmp        al,'Y' je        search cmp        al,'n'                ; 为n或N则退出程序 je        exit_m cmp        al,'N' je        exit_m jmp        choice2 search:        lea        dx,sname            ; 提示用户输入要查找的姓名 mov        ah,09 int        21h call        input_name        ; 读入姓名 call        name_search        ; 查找 call        crlf call        crlf cmp        bx,-1            ; 是否查找到？ je        not_find            ; (bx)=1 则跳转到未找到not_find lea        dx,text2            ; 找到则输出 'Name                Tel.    ' mov        ah,09 int        21h call        printline            ; 显示查找到的联系人 jmp        want_search        ; 跳转到提示查找 not_find:                                ; 未找到 call        crlf lea        dx,text3            ;输出 'The name is not in the telephone table!' mov        ah,09h int        21h jmp        want_search            exit_m:        ret printall        proc        near ;************************************************************************** ;显示所有电话。显示电话表中的所有姓名和号码，查看排序结果是否正确 ;---------------------------------------------------------------------------------------------- call        crlf call        crlf lea        dx,text2            ; 输出'Name                Tel.    ' mov        ah,09 int        21h lea        bx,tel_tab            ; 号码表基址 rept1:        call        printline            ; 显示联系人 add        bx,28            ; 求 下一个联系人首地址 cmp        bx,endaddr        ; 是否到达表尾？ jb        rept1            ; 未到达则继续显示 ret printall        endp    ;******************************************************************* ;输入姓名子程序：读入姓名到tname缓冲区，并把不满20位的部分 ;补上空格（方便查找时的比较） ;----------------------------------------------------------------------------------        input_name    proc        near                call        crlf noinputn:        lea        dx,tname            ; 姓名缓冲区 mov        ah,0ah            ; 调用dos 0ah读入字符串功能 int        21h cmp        tname[1],0        ; 如果输入为回车 je        noinputn            ; 继续等待输入 xor        bx,bx mov        bl,tname[1]        mov        cx,20 sub        cx,bx                set_blank:    mov        tname[bx+2],20h    ; 把不满20位的部分补空格 inc        bx loop        set_blank call        crlf ret input_name    endp ;***************************************************************** ;stor_name，该子程序把tname缓冲区的姓名转存入号码表中 ;--------------------------------------------------------------------------------- stor_name    proc        near xor        cx,cx mov        cl,tname[1]        ;字符个数 lea        si,tname[2]    mov        di,endaddr cld rep        movsb        inc        tab_len            ;联系人人数增1 add        endaddr,28        ;最后一个联系人地址增28 ret stor_name    endp ;*************************************************************** ;获取号码子程序：读入用户输入的号码到tphone缓冲区，然后 ;转存入号码表对应位置 ;------------------------------------------------------------------------------------ inphone        proc        near noinputp:        call        crlf lea        dx,tphone mov        ah,0ah int        21h                ;调用dos 0a号功能输入字符串 cmp        tphone[1],0        ;判断输入是否为回车 je        noinputp            ;是，则继续等待输入 xor        cx,cx mov        cl,tphone[1] lea        si,tphone[2] mov        di,endaddr sub        di,8                ;待插入位置 cld rep        movsb            ;移动 ret    inphone        endp ;********************************************************************** ;排序子程序（用直接插入排序），对号码表进行按人名从小到大排序 ;-------------------------------------------------------------------------------------------------- name_sort    proc        near cmp        [tab_len],1        ;记录数1，不用排序 je        exitn lea        di,tel_tab            ;第一个记录地址 mov        si,endaddr    sub        si,28                ;最后一个记录-待排序记录的地址 next1:        mov        cx,20 mov        ax,si                ;暂存两个地址 mov        dx,di cld repe        cmpsb            ;查找插入位置 jb        insert mov        si,ax mov        di,dx add        di,28            ;比较下一个 cmp        di,si                ;是否比较完 jb        next1            ;没有则继续比较 jmp        exitn                ;否则排序完成 insert:                mov        cx,28        mov        si,ax lea        di,temp rep        movsb            ;待排序数据放到缓冲区 mov        di,ax next2:        mov        cx,28 mov        si,di sub        si,28 rep        movsb            ;记录后移 sub        di,56 cmp        di,dx ja        next2 mov        cx,28        mov        di,dx lea        si,temp rep        movsb            ;插入到待插位置 exitn:        ret        name_sort    endp ;****************************************************************************** ;姓名查找子程序。入口参数为tname缓冲区的人名，用寄存器bx返回结果，找到则返回该 ;姓名对应记录的地址，未找到则返回(bx)=-1 ;------------------------------------------------------------------------------------------------------------------- name_search    proc        near cmp        tab_len,0            ; 记录为0，无法查找 je        exit_nofind lea        si,tname[2]        ; 待查姓名地址 mov        ax,si                ; 暂存si lea        bx,tel_tab            ; 从第一个记录开始查找 rsearch:        mov        cx,20 mov        di,bx repe        cmpsb        jz        exit_n mov        si,ax add        bx,28            ; 查找下一个 cmp        bx,endaddr jb        rsearch exit_nofind:    mov        bx,-1            ;未找到则（bx）=-1 exit_n:        ret name_search    endp ;****************************************************************************** ;显示姓名和电话子程序 。待显示的记录的地址保存在bx寄存器。 ;----------------------------------------------------------------------------------------- printline        proc        near push        ax                ;保存ax call        crlf xor        si,si mov        cx,28            ;共28个字符 mov        ah,02h            ;调用dos 2 号显示字符功能 nextc:        mov        dl,[bx][si]        ;待显示字符 int        21h inc        si                ;输出下一个字符 loop        nextc call        crlf pop        ax ret printline        endp ;******************* *********************************************************** ;回车换行子程序 ;----------------------------------------------------------------------------------------- crlf            proc        near push        ax push        dx        mov        ah,02h mov        dl,0dh            ; 回车 int        21h mov        dl,0ah            ; 换行 int        21h pop        dx pop        ax ret crlf            endp ;-----------------------------------------------------------------------------------------            main            endp                        ; 主程序结束 code            ends                        ; 代码段结束 end            start                        ; 程序结束 6、实验总结 本次实验前应先画好程序框图和模块调用图，并在编码中不断修改完善，对把握程序的整体结构很有帮助。把模块设计成子程序在主程序调用，分解了整个程序功能，降低了设计的难度，同时方便调试和修改。总的来说，此次实验有点难度，但是平时多上机练习，完成此次实验并不是难事。