24个汇编实例小程序.docx

1、24个汇编实例小程序24个汇编小程序题目列表：逆序输出字符串“BASED ADDRESSING”从键盘上输入两个数，分别放到x，y单元，求出它们的和试编写一段程序，要求在长度为10h的数组中，找出大于42h的无符号数的个数并存入地址为up开始区域，找出小于42h的无符号数的个数并存入地址为down的开始区域键盘输入一段字符串，其中小写字母以大写字母输出，其他字符不变输出从键盘上就收一个小写字母，找出它的前导字符和后续字符，在顺序显示这三个字符把一个包含20个数据的数组M分成两组：正整数组P和负整数组N，分别把这两个数组中的数据的个数显示出来求出首地址为data的100个字数组中的最小偶数，并把

2、它放在ax中输入两船字符串string1和string2，并比较两个字符串是否相等，相等就显示“match”，否则显示“no match”从键盘接收一个四位的十六进制数，并在终端显示与它等值的二进制数从键盘输入一系列以$为结束符的字符串，然后对其中的非数字字符计数，并显示计数结果有一个首地址为mem的100个字的数组，试编程序删除数组中所有为零的项，并将后续项向前压缩，最后将数组的剩余部分补上零从键盘上输入一串字符（用回车键结束，使用10号功能调用）放在string中，是编制一个程序测试字符串中是否存在数字。如有，则把cl的第五位置1，否则将该位置置0在首地址为data的字数组中，存放了100

3、h的16位字数据，试编写一个程序，求出平均值放在ax寄存器中，并求出数组中有多少个数小于此平均值，将结果放在bx寄存器中(f分别考虑有符号数、无符号数情况)一直数组A包含15个互不相等的整数，数组B包含20个互不相等的整数。试编制一个程序，把既在A中又在B中出现的整数存放于数组C中设在A、B和D单元中分别存放着三个数。若三个数都不是0，则求出三个数的和并存放在S单元，若其中有一个数为0，则把其它两个单元也清零。请编写此程序从键盘输入一系列字符（以回车键结束），并按字母、数字和其他字符分类计数，最后显示这三类的计数结果已定义两个整数变量A和B，试编写程序完成以下功能（1）若两个树种有一个是奇数，

4、则将奇数存入A中，偶数存入B中（2）若两个数均为奇数，则将两个数加1后存回原变量（3）若两个数均为偶数，则两个变量均不变写一段子程序skiplines，完成输出空行的功能。空行的行数由用户在主程序中通过键盘输入，并将行数放在ax寄存器中设有10个学生成绩分别是76, 69，84，73，88，99，63，100和80。试编写一个子程序统计60-69分，70-79分，80-89分，90-99分和100分的人数，并分别放到S6，S7，S8，S9，S10单元中编写子程序嵌套结构的程序，把整数分别用二进制和八进制显示出来在D盘根目录建立一个文件abc.txt，第一次向文件写入“123456”六个字符，第

5、二次增加“abcdefg”几个字符从键盘上输入文本文件：“d:temp.txt”的内容后，然后新建一个文件“d:temp2.txt”，把前一个文件的所有内容复制到后一个文件中从键盘上输入一个十进制数，以十六进制数显示出来。要求子程序用寄存器参数传送方法试编制一个程序，把bx寄存器中的二进制数用十六进制数的形式在屏幕上显示出来代码：1.逆序输出字符串“BASED ADDRESSING”s1 segment stack ;定义栈段s1 dw 100 dup(?) ;定义栈空间为100top label word ;top指向栈顶s1 endss2 segment ;定义数据段s2s db BASE

6、D ADDRESSING,$ ;定义字符串sS2 endss3 segment ;定义代码段s3 assume cs:s3,ds:s2,ss:s1main proc far mov ax,s1 ;栈初始化 mov ss,ax lea sp,top ;栈初始化 mov ax,s2 ;数据段初始化 mov ds,ax ;数据段初始化 mov si,15l: mov dl,ssi ;dl获取字符串s的最后一个（从零开始的第十五个字符） mov ah,2 ;调用int 21h 2号功能输出dl上的值 int 21h dec si ;寄存器减一，准备获取下一个字符 cmp si,0 ja l mov a

7、h,4ch ;终止 int 21hmain endps3 ends end main2.从键盘上输入两个数，分别放到x，y单元，求出它们的和s1 segment stack dw 100h dup(?)top label words1 endss2 segmenth1 db Please input x:,$ ;提示输入h2 db Please input y:,$ ;提示输入h3 db z=x+y:,$ ;提示输出crlf db 0dh,0ah,24h ;定义回车换行x dw ?y dw ?s2 endss3 segment assume cs:s3,ds:s2,ss:s3main proc

8、 far mov ax,s1 ;初始化 mov ss,ax lea sp,top mov ax,s2 mov ds,ax ;初始化 lea dx,h1 ;int 21h 9号功能输出“提示输入x”的字符串 mov ah,9 int 21h xor bx,bx ;bx清零，即把bx置零InputX: mov ah,1 ;输入一个字符 int 21h cmp al,0dh ;判断时候为“回车”字符 jz exit1 ;如果是回车字符就跳转到exit1 cmp al,30h ;和30h（即字符0的asii值）比较 jl exit1 ;如果输入字符小于0，跳转到exit1 cmp al,39h ;和3

9、9h(即字符9的ascii值)比较 jg exit1 ;如果输入字符大于9，跳转到exit1 sub al,30h ;al减去30h，输入字符转化成数字（从这一行开始到后面的add bx,ax为输入字符转化为数字的处理方法） cbw ;al扩充为ax xchg ax,bx mov cx,10 mul cx xchg ax,bx add bx,ax ;sub al,30h开始到这一行为输入字符转化为数字的处理方法 jmp InputX exit1: mov x,bx ;把输入的存于bx的放到x中 lea dx,crlf mov ah,9 int 21h lea dx,h2 mov ah,9 in

10、t 21h xor bx,bxInputY: ;和InputX类似，输入y mov ah,1 int 21h cmp al,0dh jz exit2 cmp al,30h jl exit2 cmp al,39h jg exit2 sub al,30h cbw xchg ax,bx mov cx,10 mul cx xchg ax,bx add bx,ax jmp InputYexit2: mov y,bx ;把输入的存于bx的放到y中 mov bx,x add bx,y ;此时bx为两数加和 lea dx,crlf mov ah,9 int 21H lea dx,h3 mov ah,9 int

11、 21h xor si,si ;si清零，用作计数 mov ax,bx ;把和放到ax上 l4: mov cl,10 ;把和连续除以10知道和变为零，余数依次进栈 div cl mov dl,ah mov dh,0 push dx inc si mov ah,0 ;重要，不能漏写 cmp al,0 jnz l4 l5: pop dx ;余数依次出栈 add dl,30h ;余数转换为显示的余数字符 mov ah,2 ;输入余数字符 int 21h dec si cmp si,0 jnz l5 mov ah,4ch int 21Hmain endps3 ends end main3.是编写一段程

12、序，要求在长度为10的数组中，找出大于42h的无符号数的个数并存入地址为up开始区域，找出小于42h的无符号数的个数并存入地址为down的开始区域，并分别显示up、down数组的个数和数组内的数字s1 segment stack dw 100h dup(?)top label words1 endss2 segmenth1 db the num of up array and the up array are(prints in decimalism) :,$h2 db the num of down array and the down array are(prints in decimal

13、ism) :,$crlf db 0dh,0ah,24harray db 0,50h,11h,61h,22h,72h,33h,73h,41h,74h,$ ;定义数组arrayup db 10 dup(?) ;定义up数组 down db 10 dup(?) ;定义down数组s2 endss3 segment assume cs:s3,ds:s2,ss:s3main proc far mov ax,s1 mov ss,ax lea sp,top mov ax,s2 mov ds,ax mov si,0 mov di,1 mov bp,1 repeat: cmp arraysi,42h ;把arr

14、ay数组中小于42h的值放到down数组里，大于42h的值放到up数组里面 jb downarray mov dl,arraysi mov upbp,dl inc si cmp si,10 jz exit1 inc bp jmp repeatdownarray: mov dl,arraysi mov downdi,dl inc si cmp si,10 jz exit2 inc di jmp repeatexit1: sub di,1 jmp exitexit2: sub bp,1exit: mov dx,bp ;把分配好的up数组和down数组在其有效数字后面添加$，便于后面的输出结束 mo

15、v up0,dl inc bp mov upbp,$ mov dx,di mov down0,dl inc di mov downdi,$ mov cl,10 mov si,0 lea dx,h1 mov ah,9 int 21hPrintUparray: cmp upsi,$ jz next mov al,upsi call print inc si jmp PrintUparraynext: lea dx,crlf mov ah,9 int 21h lea dx,h2 int 21h xor si,siPrintDownArray: cmp downsi,$ jz atend mov al

16、,downsi call print inc si jmp PrintDownArrayprint proc near ;print为输出十进制输出某个数的子程序 mov di,0rediv: mov ah,0 div cl mov dl,ah mov dh,0 push dx inc di cmp al,0 jnz redivbreak: pop dx add dl,30h mov ah,2 int 21h dec di cmp di,0 jnz break mov dl, mov ah,2 int 21H retprint endpatend: mov ah,4ch int 21Hmain

17、 endps3 ends end main4.键盘输入一段字符串，其中小写字母以大写字母输出，其他字符不变输出s1 segment stack dw 100h dup(?)top label words1 endss2 segmenth1 db Please input a string:,$h2 db The changed string is:,$crlf db 0dh,0ah,24htemp db ?s2 endss3 segment assume cs:s3,ds:s2,ss:s3main proc far mov ax,s1 mov ss,ax lea sp,top mov ax,s

18、2 mov ds,ax lea dx,h1 mov ah,9 int 21h mov si,0l: mov ah,1 int 21h cmp al,0dh jz exit cmp al,a jl putin cmp al,z jg putin sub al,20h ;把小写字符变为大写字符putin: mov tempsi,al ;把字符放到temp数组里 inc si jmp lexit: lea dx,crlf ;输出tmp数组 mov ah,9 int 21h lea dx,h2 mov ah,9 int 21h inc si mov tempsi,$ lea dx,temp mov a

19、h,9 int 21h mov ah,4ch int 21Hmain endps3 ends end main5.从键盘上就收一个小写字母，找出它的前导字符和后续字符，在顺序显示这三个字符s1 segment stack dw 100h dup(?)top label words1 endss2 segmenth1 db Please input a lowercase: ,$h2 db The the three chars are: ,$crlf db 0dh,0ah,24hs2 endss3 segment assume cs:s3,ds:s2,ss:s3main proc far mo

20、v ax,s1 mov ss,ax lea sp,top mov ax,s2 mov ds,axl: lea dx,h1 mov ah,9 int 21h mov ah,1 int 21h cmp al,a jl l cmp al,z jg l mov cl,al lea dx,crlf mov ah,9 int 21H lea dx,h2 mov ah,9 int 21h dec cl mov dl,cl ;输出前导字符 mov ah,2 int 21h mov dl, mov ah,2 int 21h inc cl mov dl,cl ;输出该字符 mov ah,2 int 21h mov

21、 dl, mov ah,2 int 21h inc cl mov dl,cl ;输出后导字符 mov ah,2 int 21h mov ah,4ch int 21Hmain endps3 ends end main6.把一个包含20个数据的数组M分成两组：正整数组P和负整数组N，分别把这两个数组中的数据的个数显示出来s1 segment stack dw 100h dup(?)top label words1 endss2 segmenth1 db the positive number is: ,$h2 db the negative number is: ,$crlf db 0dh,0ah

22、,24harray dw 50h,-11h,61h,-22h,72h,-33h,73h,-41h,74h,21h,67h,-90h,73h,77h,-1h,-89h,-11h,61h,-22h,20h,$s2 endss3 segment assume cs:s3,ds:s2,ss:s3main proc far mov ax,s1 mov ss,ax lea sp,top mov ax,s2 mov ds,ax mov bx,0 mov si,0l: mov dx,arraysi cmp dx,0 jl addlow ;有符号数比较用jl add si,2 cmp si,40 jz exit

23、 jmp laddlow: inc bx add si,2 cmp si,40 jz exit jmp lexit: lea dx,h2 mov ah,9 int 21h mov ax,bx call print lea dx,crlf mov ah,9 int 21h lea dx,h1 mov ah,9 int 21h mov ax,20 sub ax,bx call print jmp atendprint proc near ;打印数字字符的子程序 mov cl,10 mov si,0repeat: div cl mov dl,ah add dl,30h mov dh,0 push d

24、x inc si mov ah,0 cmp al,0 jnz repeatl2: pop dx mov ah,2 int 21h dec si cmp si,0 jnz l2 retprint endpatend: mov ah,4ch int 21Hmain endps3 ends end main7.打印输出首地址为data的20个字数组中的最小偶数s1 segment stack dw 100h dup(?)top label words1 endss2 segmenth1 db the min even number is: ,$crlf db 0dh,0ah,24hdata dw 5

25、0,-11,61,-22,72,-33,73,-41,74,21,67,-90,73,77,-1,-89,-11,61,-22,20,$s2 endss3 segment assume cs:s3,ds:s2,ss:s1main proc far mov ax,s1 mov ss,ax lea sp,top mov ax,s2 mov ds,ax mov bx,65534 ;bx存最小数，初始令最小值置为65534 mov si,0 mov cl,100 mov dl,2l2: mov ax,datasi cmp ax,0 jnl l4 neg ax ;如果是负数，则求补l4: div cl

26、mov al,ah mov ah,0 div dl cmp ah,0 jnz l1 cmp bx,datasi ;比较最小值和数组中的每个数 jl l1 ;如果数组中的数大于最小值跳转到l1 mov bx,datasi ;如果数组中的数小于最小值则将其赋给最小值 l1: add si,2 cmp si,40 jz exit jmp l2 exit: lea dx,h1 mov ah,9 int 21h cmp bx,0 jnl l5 neg bx mov dl,- mov ah,2 int 21hl5: mov ax,bx call print ;调用子程序输出最小值 jmp atendpri

27、nt proc near mov cl,10 mov si,0repeat: div cl mov dl,ah add dl,30h mov dh,0 push dx inc si mov ah,0 cmp al,0 jnz repeatl3: pop dx mov ah,2 int 21h dec si cmp si,0 jnz l3 retprint endpatend: mov ah,4ch int 21Hmain endps3 ends end main8.输入两船字符串string1和string2，并比较两个字符串是否相等，相等就显示“match”，否则显示“no match”s1

28、 segment stack dw 100h dup(?)top label words1 endss2 segmenth1 db Please input the first string: ,$h2 db Please input the second string: ,$h3 db MATCH,$h4 db NO MATCH,$crlf db 0dh,0ah,24hstr1 db 50,?,50 dup($)str2 db 50,?,50 dup($)s2 endss3 segment assume cs:s3,ds:s2,ss:s3main proc far mov ax,s1 mov ss,ax lea sp,top mov ax,s2 mov ds,ax lea dx,h1 mov ah,9 int 21h lea dx,str1 mov ah,0ah int 21h lea dx,crlf mov ah,9 int 21h lea dx,h2 int 21h lea dx,str2 mov ah,0ah int 21h lea dx,crlf mov ah,9 int 21h mov dl,str1+1 ;str1+1为str1实际的字符个数 cmp dl,str2+1 ;str2+1为str2实际的字符