24个汇编实例小程序

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

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

3、置 1，否则将该位置置 0在首地址为 data 的字数组中，存放了 100h 的 16 位字数据，试编写一个程序，求出平均值放在ax寄存器中，并求出数组中有多少个数小于此平均值，将结果放在bx寄存器中（f分别考虑有符号数、无符号数情况 ）一直数组 A 包含 15 个互不相等的整数，数组 B 包含 20 个互不相等的整数。试编制一个程 序，把既在A中又在B中出现的整数存放于数组 C中设在 A、B 和 D 单元中分别存放着三个数。若三个数都不是 0，则求出三个数的和并存放在S单元，若其中有一个数为0,则把其它两个单元也清零。请编写此程序从键盘输入一系列字符（以回车键结束） ，并按字母、数字和其他字

4、符分类计数，最后显示 这三类的计数结果已定义两个整数变量 A和B,试编写程序完成以下功能 （1）若两个树种有一个是奇数，则将奇数存入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 分的人数，并分别

5、放到 S6， S7， S8， S9， S10 单元中编写子程序嵌套结构的程序，把整数分别用二进制和八进制显示出来在D盘根目录建立一个文件abc.txt，第一次向文件写入“ 123456 ”六个字符，第二次增加“abcdefg ”几个字符从键盘上输入文本文件：“ d:temp.txt ”的容后，然后新建一个文件“ d:temp2.txt ”，把前一个 文件的所有容复制到后一个文件中从键盘上输入一个十进制数，以十六进制数显示出来。要求子程序用寄存器参数传送方法试编制一个程序，把 bx 寄存器中的二进制数用十六进制数的形式在屏幕上显示出来代码：1.逆序输出字符串“ BASED ADDRESSING”

6、s1tops1segment stack dw 100 label wordendss2S2s3;定义栈段 s1dup（?）;定义栈空间为 100;top 指向栈顶segment;定义数据段 s2db'BASED ADDRESSING','$'定义字符串 sendssegment;定义代码段 s3assume cs:s3,ds:s2,ss:s1mainproc mov mov leafarax,s1ss,ax sp,top;栈初始化 ; 栈初始化movax,s2;数据段初始化 movds,ax; 数据段初始化movsi,15l:movdl,ssi;dl 获取字符

7、串 s 的最后一个（从零开始的第十五个字符）movah,2;调用 int 21h 2 号功能输出 dl 上的值int21hdecsi;寄存器减一，准备获取下一个字符cmpsi,0jalmovah,4ch;终止int21hmainendps3endsendmainx， y 单元，求出它们的和s2segmenth1db'Please input x:','$'提示输入h2db'Please input y:','$'提示输入h3db'z=x+y:','$'提示输出crlfdb0dh,0ah,24h;定义

8、回车换行xdw?ydw?s2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1;初始化movss,axleasp,topmovax,s2s1segment stackdw 100hdup(?)toplabel words1ends2.从键盘上输入两个数，分别放到mov ds,ax;初始化lea dx,h1;int 21h 9号功能输出“提示输入x”的字符串mov ah,9int 21hxor bx,bx;bx 清零，即把 bx 置零InputX:mov ah,1;输入一个字符int21hcmp al,0dhjzexit1cmpal,3

9、0hjl exit1cmpal,39hjg exit1sub al,30h;判断时候为“回车”字符;如果是回车字符就跳转到 exit1和30h （即字符0的asii值）比较;如果输入字符小于 '0' ，跳转到 exit1和39h（即字符9的ascii值）比较;如果输入字符大于 '9' ，跳转到 exit1;al减去30h，输入字符转化成数字（从这一行开始到后面的 add bx,ax 为输入字符转化为数字的处理方法）;al 扩充为 axxchgax,bxmovcx,10mulcxxchgax,bxaddbx,axcbw;sub al,30h 开始到这一行为输入字符

10、转化为数字的处理方jmp InputXexit1: mov x,bx;把输入的存于bx的放到x中leadx,crlfmovah,9int21hleadx,h2movah,9int21hxorbx,bxInputY:;和 InputX 类似，输入 ymovah,1int21hcmpal,0dhjzexit2cmp al,30hjlexit2cmpal,39hjgexit2subal,30hcbwxchgax,bxmovcx,10mulcxxchgax,bxaddbx,axexit2: mov y,bx mov bx,x add bx,y;把输入的存于 bx 的放到 y 中;此时 bx 为两数加和

11、lea dx,crlf mov ah,9 int 21H lea dx,h3 mov ah,9 int 21hxor si,si;si 清零，用作计数mov ax,bx;把和放到 ax 上l4: mov cl,10 div cl;把和连续除以 10 知道和变为零，余数依次进栈mov dl,ahmov dh,0push dx inc simov ah,0;重要，不能漏写cmp al,0jnz l4l5: pop dx adddl,30hmovah,2int 21h;余数依次出栈;余数转换为显示的余数字符;输入余数字符jmp InputYdecsicmpsi,0jnz l5 mov ah,4chi

12、nt 21Hmainendps3endsend main3. 是编写一段程序，要求在长度为10 的数组中，找出大于 42h 的无符号数的个数并存入地址为 up 开始区域，找出小于 42h 的无符号数的个数并存入地址为 down 的开始区域，并分 别显示 up、 down 数组的个数和数组的数字s1segment stackdw 100hdup(?)toplabel words1endss2 segmenth1 db 'the num of up array and the up array are(prints in decimalism) :','$'h2 d

13、b 'the num of down array and the down array are(prints in decimalism) :','$'crlfarraydbdbup downdbdb0dh,0ah,24h0,50h,11h,61h,22h,72h,33h,73h,41h,74h,'$'10 dup(?)10 dup(?);定义数组 array; 定义 up 数组;定义 down 数组s2s3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmova

14、x,s2movds,axmovsi,0movdi,1movbp,1repeat:cmparraysi,42h42h 的值放到 up数组里面jbdownarraymovdl,arraysimovupbp,dlincsicmpsi,10jzexit1;把 array 数组中小于 42h 的值放到 down 数组里，大于endsincbpjmp repeatdownarray: mov mov inc cmp jzdl,arraysi downdi,dl si si,10 exit2inc dijmp repeatexit1: sub di,1 jmp exitexit2: sub bp,1exit

15、: mov dx,bp;把分配好的 up 数组和 down 数组在其有效数字后面添加 '$' ，便于后面的输出结束mov up0,dl inc bp mov upbp,'$' movdx,dimovdown0,dlinc dimovdowndi,'$'movcl,10movsi,0lea dx,h1mov ah,9 int 21hPrintUparray:cmp upsi,'$' jz next mov al,upsi call print inc si jmp PrintUparraynext: lea dx,crlf mov

16、ah,9 int 21hlea dx,h2 int 21h xor si,siPrintDownArray:cmp downsi,'$' jz atendmov al,downsicall inc jmpprintsiPrintDownArrayprintprocnear ;print 为输出十进制输出某个数的子程序movdi,0rediv:movah,0divclmovdl,ahmovdh,0pushdxincdicmpal,0jnzredivbreak:popdxadddl,30hmovah,2int21hdecdicmpdi,0jnzbreakmovdl,' &#

17、39;movah,2int21Hretprintendpatend:movah,4chint21Hmainendps3endsend4. 键盘输入一段字符串，其中小写字母以大写字母输出，其他字符不变输出s1segment stackdw100h dup(?)toplabelwords1endss2segmenth1db'Please input a string:'h2db'The changed string iscrlfdb0dh,0ah,24htempdb?s2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax

18、,s1movss,axleasp,topmovax,s2movds,axleadx,h1movah,9int21hmov si,0;把小写字符变为大写字符l: mov ah,1 int 21h cmp al,0dh jz exit cmp al,'a' jl putin cmp al,'z' jg putin sub al,20hputin: mov tempsi,al;把字符放到 temp 数组里incsijmplexit: lea dx,crlf;输出 tmp 数组mov int lea mov intah,921hdx,h2ah,921hincsimovt

19、empsi,'$'leadx,tempmovah,9int21hmovah,4chint21Hmainendps3endsendmain5. 从键盘上就收一个小写字母，找出它的前导字符和后续字符，在顺序显示这三个字符s2h1segmentdbh2crlfdb db'Please input a lowercase: ','$' 'The the three chars are: ','$' 0dh,0ah,24hs1segment stackdw 100hdup(?)toplabel words1endss2end

20、ss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,axl:leamovintdx,h1ah,921hmov ah,1int21hcmpal,'a'jllcmpal,'z'jgl movcl,alleadx,crlfmovah,9int21Hleadx,h2movah,9int21hdecclmovdl,clmovah,2int21hmovdl,' 'movah,2int21hincclmovdl,clmovah,2int21hmov

21、dl,' 'movah,2int21hincclmovdl,clmovah,2int21h;输出前导字符;输出该字符;输出后导字符mov ah,4ch int 21H mainendps3endsend main6把一个包含20个数据的数组 M分成两组：正整数组 P和负整数组N,分别把这两个数组 中的数据的个数显示出来dw100h dup(?)toplabelwords1endss2segmenth1db'the positive number is: ','$'h2db'the negative number is: ',

22、9;$'crlfdb0dh,0ah,24harray50h,-11h,61h,-22h,72h,-33h,73h,-41h,74h,21h,67h,-90h,73h,77h,-1h,-89h,-11h,61h,-22h0h,'$'s2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,axmovbx,0movsi,0l:movdx,arraysicmpdx,0jladdlow;有符号数比较用 jladdsi,2cmpsi,40jzexitjmpladd

23、low:incbxadd si,2cmpsi,40jzexitjmpls1segment stack,2dwexit: leadx,h2mov intah,921hmovax,bxcallprintleadx,crlfmovah,9int21hleadx,h1movah,9int21hmov ax,20subax,bxcallprintjmpatendprintprocnearmovcl,10movsi,0repeat: divclmovdl,ahadd dl,30hmovdh,0pushdxincsimov ah,0cmpal,0jnzrepeatl2:popdxmovah,2int21hd

24、ecsicmpsi,0jnzl2;打印数字字符的子程序retprint endpatend: mov ah,4chint21Hmainendps3endsendmain7.打印输出首地址为 data 的 20 个字数组中的最小偶数s1segment stackdw 100h dup(?) toplabel words1endss2segmenth1db'the min even number is: ','$'crlf db 0dh,0ah,24hdatadw50,-11,61,-22,72,-33,73,-41,74,21,67,-90,73,77,-1,-8

25、9,-11,61,-22,20,'$'s2ends s3 segmentassume cs:s3,ds:s2,ss:s1main proc farmovax,s1movss,axlea sp,topmovax,s2movds,axmovbx,65534 ;bx 存最小数，初始令最小值置为 65534movsi,0mov cl,100mov dl,2 l2: mov ax,datasicmp ax,0 jnl l4neg ax;如果是负数，则求补l4: div clmov al,ahmov ah,0div dlcmp ah,0jnz l1cmp bx,datasi jl l1mo

26、v bx,datasi;比较最小值和数组中的每个数;如果数组中的数大于最小值跳转到l1;如果数组中的数小于最小值则将其赋给最小值l1: add si,2 cmp si,40 jz exit jmp l2l5:leadx,h1movah,9int21hcmpbx,0jnll5negbxmovdl,'-'movah,2int21hmovax,bxcallprintjmpatendprocnearmovcl,10movsi,0exit:print;调用子程序输出最小值repeat: div clmovdl,ahadd dl,30hmovdh,0pushdxincsimov ah,0c

27、mp al,0 jnzrepeatl3: popdxmov int dec cmp jnzah,221h si si,0l3printret endpatend:movah,4chint21Hmainendps3endsendmain8.输入两船字符串 string1 和 string2 ，并比较两个字符串是否相等，相等就显示“ match ”，否 贝U显示ho match ”s1segment stackdw100hdup(?)toplabel words1endss2segmenth1db'Please input the first string: ','$h2d

28、b'Please input the second string:h3 db'MATCH','$'h4 db'NO MATCH','$'crlfdb0dh,0ah,24hstr1db50,?,50 dup('$')str2db50,?,50 dup('$')s2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,axlea dx,h1mov ah,9 int 21h lea

29、 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 21hmov cmp jnzdl,str1+1dl,str2+1 l;str1+1 为 str1 实际的字符个数;str2+1 为 str2 实际的字符个数movsi,2l2:movdl,str1sicmpdl,str2sijnzlincsicmpsi,50jzl3jmpl2l:leadx,h4;输出不匹配信息movah,9int21h

30、l3:leadx,h3;输出匹配信息movah,9int21hmovah,4chint21Hmainendps3endsendmain9.从键盘接收一个四位的十六进制数，并在终端显示与它等值的二进制数 s1 segment stacktops1dw label ends100h dup(?)words2segmenth1db'Please input a hexadecimal number: ','$h2db'The number is printed in binary number:tempdb17 dup('$')crlfdb0dh,0a

31、h,24hs2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,axrepeat: lea dx,h1mov ah,9int 21hmov bx,0movcx,4newchar:;接收新字符movah,1int21hcmpal,30hjbrepeatcmpal,46hjgrepeatcmpal,39hjnb sub jmpl1al,30hl2;如果输入字符大于 9 跳到 l1cmpal,41hjbrepeat；如果输入字符小于 A，则输入错误，跳到subal,37h; 输入

32、字符为 AZ ，故相应地要减 37hjmpl2cbw;l2 为把输入字符转化为数值xchgax,bxmovdx,10hmuldxxchgax,bxaddbx,ax;loopnewchardec cxcmp cx,0jnz newcharleadx,crlfmovah,9int21hleadx,h2int21hmovsi,0movcx,10h；cx作计数器，即待会要循环16次rolbx,1;bx 循环左移以为，最高位进标志位jcl3； 若标志位为 1 则跳转到 l3movtempsi,'0'jmpl4movtempsi,'1'incsiloopl5leadx,te

33、mpmovah,9int21hmovah,4chint21Hl1:l2:l5:l3:l4:repeatmain endps3 endsend main并显示计数结10 从键盘输入一系列以 $为结束符的字符串， 然后对其中的非数字字符计数， 果s1segment stackdw 100h dup(?)toplabel words1endss2segmenth1db'Please input a string: ','$'h2db'The number of the chars that is not digit:','$'crlf

34、db 0dh,0ah,24hs2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,axlea mov ah,9 int 21hdx,h1movcx,0l2:movah,1int21hcmpal,'$'jzexitcmpal,30hjblcmpal,39hjnbljmpl2l: inc cxl4:l5:jmpl2leadx,crlfmovah,9int21hleadx,h2int21hmovsi,0movbl,10movax,cxdivblmovdl,ahmo

35、vdh,0pushdxincsimovah,0cmpal,0jnzl4popdxadddl,30hmovah,2int21hdecsicmpsi,0jnzl5movah,4chint21Hexit:mainendps3endsend main11.有一个首地址为 mem 的 10 个字的数组，试编程序删除数组中所有为零的项，并将后续 项向前压缩，最后将数组的剩余部分补上零s1segment stackdw 100hdup(?)toplabel words1endss2segmentmemdw0,1,0,3,0,0,4,5,6,0,'$'crlfdb0dh,0ah,24hs2en

36、dss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,axmov si,0mov di,2repeat: cmp di,20 jz exit mov bx,memsi mov dx,memdi cmp bx,0 jnz next xchg bx,dx mov memsi,bx mov memdi,dxnext:cmp memsi,0jz laddsi,2l:add di,2jmp repeatexit:movah,4chint21Hmainendps3endsend;以下是该算法描

37、述;定义两个指针，当前指针si和检查指针di，先把si指针指向第一个字得到的值bx,;di指向第二个字得到的值dx。若bx为0, di自加2,否则，则交换这两字，;若此时 si 指向字为 0，则 di, 否则， di， si 都自己加 2。如此循环直到 di 指向最后一个字。 ;这样就把所有非零字至于前面了。12.从键盘上输入一串字符（用回车键结束，使用 个程序测试字符串中是否存在数字。如有，则把s1tops1segment stackdw label ends100h dup(?) words2segmenth1db'Please input a string: ','

38、;$'h2db'cx: ','$'crlfdb0dh,0ah,24hstringdb50,?,50 dup('$')s2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,ax10 号功能调用）放在 string 中， cl 的第五位置 1，否则将该位置置是编制一0and cl,0dfh;先假设无数字，置 0lea dx,h1mov ah,9int 21hlea dx,stringmov ah,10dint 21hmov

39、 si,2l2: cmp stringsi,'$'jz exitmov dl,stringsi cmp dl,30h jb l cmp dl,39h jnb l or cl,20h;有数字，置 1jmp exitl: inc si jmp l2exit:leadx,crlfmovah,9int21hlea dx,h2int21hmovax,cxcallprintjmpatendprintprocnearmovcl,10movsi,0repeat: divclmovdl,ahadd dl,30hmovdh,0pushdxincsimov ah,0cmpal,0jnzrepeatl

40、3:popdxmovah,2int21hdecsicmpsi,0jnzl3retprint endpatend: mov ah,4chint 21Hmain endps3 endsendmain13. 在首地址为 data 的字数组中，存放了 10 个 16 位字数据，试编写一个程序，求出平均值 放在ax寄存器中，并求出数组中有多少个数小于此平均值，将结果放在bx寄存器中（f分别考虑有符号数、无符号数情况 ）s1segment stackdw 100hdup(?)toplabel words1endss2segmentdatadw-1,0,1,-2,2,3,-3,-4,4,15,'$c

41、rlfdb0dh,0ah,24hs2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2movds,axmov si,0 mov ax,0l3: cmp datasi,'$' jz exit mov dx,datasi cmp dx,0 jnl l1 neg dx sub ax,dx jmp l2l1: add ax,dxl2:add si,2jmp l3exit:movcl,10;平均值放到 ax 中divclmov ah,0mov si,0mov bx,0l5:cmp

42、 jz cmp jz jl incdatasi,'$'小于平均值的数的个数放到bx 中exit2ax,datasil6l6bxl6:addsi,2jmpl5exit2:movah,4chint21Hmainendps3endsendmain14.一直数组A包含15个互不相等的整数，数组B包含20个互不相等的整数。试编制一个程序，把既在 A中又在B中出现的整数存放于数组 C中并显示C中的数值;两层循环比较得出两个数组中相同的数值s1segment stackdw100h dup(?)toplabelwords1endss2segmentadw1h,2h,3h,4h,5h,6h,7

43、h,8h,9h,10h,11h,12h,13h,14h,15h,'$'b21h,22h,23h,24h,25h,6h,18h,19h,10h,11h,12h,34h,14h,53h,31h,32h,33h,36h,7h,67h,'$'c dw 16 dup('$')crlfdb0dh,0ah,24hs2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axleasp,topmovax,s2dwmovds,axmov si,0 mov di,0 mov bp,0l4: cmp

44、di,40 jz l2 jmp l3l2: add si,2 cmp si,30 jz exit mov di,0l3: mov ax,asi mov bx,bdi cmp ax,bx jnz l mov cbp,ax add bp,2l: add di,2 jmp l4exit: mov bp,0l6: cmp cbp,'$' jz atend mov ax,cbp call print add bp,2 mov dl,' ' mov ah,2 int 21h jmp l6print proc nearmovcl,10movsi,0repeat: divclm

45、ovdl,ahadd dl,30hmovdh,0pushdxincsimov ah,0cmpal,0jnzrepeatl5:popdxmovah,2int21hdecsicmpsi,0jnzl5retprintendpatend: movah,4chint21Hmainendps3endsendmain15. 设在A、B和D单元中分别存放着三个数。 若三个数都不是0,则求出三个数的和并存放 在S单元，若其中有一个数为 0,则把其它两个单元也清零。请编写此程序s1tops1segment stackdw label w ends100h dup(?) ords2segmentadw1h,'

46、;$'bdw-11h,'$'d dw0h,'$'s dw2 dup('$')crlfdb 0dh,0ah,24hs2endss3segmentassumecs:s3,ds:s2,ss:s3mainprocfarmovax,s1movss,axlea sp,top movax,s2movds,axmov ax,a0 mov bx,b0 mov dx,d0 cmp ax,0 jz l cmp bx,0 jz l cmp dx,0 jz lmov cx,0cmp ax,0jnl add_axneg ax ;减法需先求补 sub cx,axjmp l2 add_ax: add cx,ax l2: cmp bx,0jnl add_bxneg bxsub cx,bxjmp l3 add_bx: add cx,bx l3: cmp dx,0jnl add_dxneg dxsub cx,dxjmp l4 add_dx: add cx,dx l4: mov s0,cxjmp exitl:mov a0,0mov b0,0mov d0,0exit:mov ah,4chint 21