80x86汇编—分支循环程序设计
文章目录
查表法: 实现16进制数转ASCII码显示
题目要求:
;查表法,实现十六进制数转换为ASCII码显示
;数据段
HEX db 4bh
ASCII db 30h,31h,32h,33h,34h,35h
db 36h,37h,38h,39h ;0~9的ASCII码
db 41h,42h,43h,44h,45h,46h
;A~F的ASCII码
;任意固定了一个待转换的一位16进制数
思路:首先题目要求的是一个固定的ASCII数据段作为表,然后也固定了一个HEX作为一个待转换的十六进制的数字。希望我们用字符形式将4b显示出来,所以我们可以将高4位和低4位分离出来,然后使用02中断号逐一显示
(02中断号:从dl中取出数值显示,每次显示一个字符,光标就会向右移动一个字符的位置,素有不会覆盖前一个字符)
注意事项:该4bh是一个8位十六进制数,占一个字节数,所以我们在分离的时候很容易错的一个点是,稍不注意就把8位的al使用了(不一定使用al可以是其他寄存器),其实我们还需要将al寄存器的前4位进行清空操作。其次很容易忽略的就是,我们02中断号显示的字符码数值都是从dl中取,所以在处理好的数据后,记得将处理好的数据存进dl中。最后,ah需要存中断号,所以记得将02h存进ah中。由于我们是高低4位需要两次调用,在第二次的调用02h中断号的时候我认为还是要重新将02h存进ah中,因为这样能保证中断号肯定是02h,在第二次调用之前不知道有没有影响到ah,所以我就再次mov ah, 02h,当然你觉得没有影响的话是可以不用重复的(啰嗦一下)。
我的代码肯定不是最优,可以自己去优化一下。理论存在,开始实现!
运行结果:
代码实现:
;实现十六进制数转换为ASCII码显示
assume cs:codes, ds:datas
datas segment
HEX db 4bh ;任意设定了一个待转换的一位16进制数
ASCII db 30h,31h,32h,33h,34h,35h
db 36h,37h,38h,39h ;0~9的ASCII码
db 41h,42h,43h,44h,45h,46h ;A~F的ASCII码
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
;思路:分割高低位,然后直接作为ASCII数据段的下标即可
;使用02中断号显示,因为每次显示一个字符光标就会右移一位
mov bx, offset ASCII
;先显示高位的十六进制数字
mov al, HEX
mov cl, 4
shr al, cl
xlat
mov dl, al
mov ah, 02h
int 21h
;后显示低位的十六进制数字
mov al, HEX
and al, 0fh
xlat
mov dl, al
mov ah, 02h
int 21h
;结束代码段
mov ax, 4c00h
int 21h
codes ends
end start
计算AX的绝对值
题目要求:计算AX的绝对值
这题没啥难度,就是基本的存数,取数,然后跳转。
运行结果:
细节:判断完负数后,如果不跳转的话下一条指令就是跳过负数操作的跳转语句。这一步是实现真正的if else语句的精华,当然如果你觉得你可以实现一次跳转的话当我没说。
代码实现:同时也使用了js,判断符号位是否为1即是否为负数的转移指令也是一样效果。
;计算AX的绝对值
assume cs:codes, ds:datas
datas segment
NUM db -5
Result db ?
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
mov al, NUM
cmp al, 0 ;直接跟0比较
;是否跳转可以通过看SF标志位,这是有符号数字,所以我们单看CF是否进位是不行的,
;当然可以用有符号的跳转指令,less和greater,这里我们都尝试一下
jl nee ;小于就跳转
;js nee ;SF符号位是1就表示负数,也要跳转,这个可以替换jl,等同效果
;负数就取补码
jnl none ;如果是正数需要跳过取补码的语句
nee: neg al
;正数绝对值是自己
none: mov Result, al
;结束代码段
mov ax, 4c00h
int 21h
codes ends
end start
- 优化:你还别说,还真有只用一个跳转就能实现取绝对值
其实我们只要反其道而行,判断是否不是负数,也就是说先判断是否是正数,正数就跳转直接存结果,这里通过跳转跳过了一条取补码的语句,所以说当不是正数的时候就会不跳转,直接执行取补码语句,然后自动执行原本就要执行的存结果。如下图所示
运行结果:
代码实现:
;计算AX的绝对值优化版本
assume cs:codes, ds:datas
datas segment
NUM db -5
Result db ?
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
mov al, NUM
cmp al, 0 ;直接跟0比较
;是否跳转可以通过看SF标志位,这是有符号数字,所以我们单看CF是否进位是不行的,
;当然可以用有符号的跳转指令,less和greater,这里我们都尝试一下
jnl none ;如果不是小于就直接存结果,因为正数绝对值是自己
;jns none ;同理这个判断SF不等于1即SF=0为正数就跳转,否则就执行下面取补码
neg al ;上面没有跳转就属于小于,就是负数,自动来到这里取补码
none: mov Result, al
;结束代码段
mov ax, 4c00h
int 21h
codes ends
end start
判断有无实根
题目要求:判断有无十根,就是判断有无解
首先判断公式就是:b2 - 4ac >= 0 的话就有解
细节:我这里的4 *ac我使用的是ac结果左移两位,当然可以使用传统的imul乘4操作,基本没啥细节可讲。
运行结果:
代码实现:
;判断有无实根
assume cs:codes, ds:datas
datas segment
_b db 4
_a db 2
_c db 2
;4*4 - 4*2*2 = 0
tag db 9 ;默认数值是9, 通过程序运行后,有解为1 无解为0
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
;计算b²
mov al, _b
imul al ;al * al = ax = b²
mov dx, ax
;计算4ac
mov al, _a
imul _c
mov cl, 2
shl ax, cl ;左移两位即乘4,即4 * ac
;开始比较b² - 4ac是否大于等于0,即是否有解
cmp dx, ax
jae yes ;有解就跳
;无解就不跳来到这里赋值完再跳到结束
mov tag, 0
jmp done
yes: mov tag, 1 ;有解,且下一条代码就是结束了,所以不用继续跳
;代码段结束
done:
mov ax, 4c00h
int 21h
codes ends
end start
地址表形成多分支
题目要求:
需要在数据段事先安排一个按顺序排列的转移地址表
输入的数字作为偏移量。因为只有2个字节16位偏移地址,所以偏移量需要乘2
注意:这里的地址表是在前头,然后我们disp这些我把他写在了代码段最后面。不用担心未定义,因为在汇编里面的标号翻译成地址都是汇编编译器做的。
细节:最重要的就是题目已经提醒过了,很显然我在做的过程中还是把他忘记了,因为只有2个字节16位偏移地址,所以偏移量需要乘2,这就是我哦们table[bx]用bx查找表的时候需要记得将地址乘以2,因为一个元素就占两个位置,在汇编中就是这样,我们8086是以字节为单位,这里的table一个地址元素就是dw字型,所以我们要乘以2!乘以2!乘以2!,更多细节我都写在代码注释里面了,不明白为什么有的人写代码会忍得住不写注释。。。
其他没啥好注意的,这个代码敲起来还是比较爽的,分支结构越来越像我们高级语言了,实现的时候简直不要太优雅~
代码实现:
;table是一个标号入口表,
;这些标号都在程序后面,
;每一个标号对应将msg_num的IP地址存入dx然后使用中断号09显示
assume cs:codes, ds:datas
datas segment
msg db 'Input number(1~8):',0dh, 0ah, '$'
msg1 db 'Chapter 1 : ...' ,0dh, 0ah, '$'
msg2 db 'Chapter 2 : ...' ,0dh, 0ah, '$'
msg3 db 'Chapter 3 : ...' ,0dh, 0ah, '$'
msg4 db 'Chapter 4 : ...' ,0dh, 0ah, '$'
msg5 db 'Chapter 5 : ...' ,0dh, 0ah, '$'
msg6 db 'Chapter 6 : ...' ,0dh, 0ah, '$'
msg7 db 'Chapter 7 : ...' ,0dh, 0ah, '$'
msg8 db 'Chapter 8 : ...' ,0dh, 0ah, '$'
table dw disp1,disp2,disp3,disp4 ;取得各个标号的偏移地址
dw disp5,disp6,disp7,disp8
datas ends
codes segment
start:
;常规修改段地址
mov ax, datas
mov ds, ax
;准备工作,打印提示用户输入数字
mov dx, offset msg
mov ah, 09h
int 21h
;等待用户输入一个字符,这就需要用到01中断号,
;刚好是等待一个按键按下,输入的数据送到al中
mov ah, 01h
int 21h
;首先判断是否是1-8之间的数字
cmp al, '1'
;如果小于1就重新输入
jb start
;如果大于8就重新输入
cmp al, '8'
ja start
;开始找table表然后打印字符串
;获取al中的字符ascii数,并将其转化为对应的数值
and ax, 000fh
;这是种常见的转换数值,
;因为ascii转为二进制的时候,
;低四位是对应的顺序012345
;同样的字母也是,
;应该说字母a-z,A-Z不论大小写,
;还有0-9都是可以只保留低4位来指明第几个
dec ax ;因为输入的数字是1-9,但是下标是从0开始的,所以要减一
;由table是dw类型,所以需要找到对应的地址还需要地址转换
shl ax, 1
mov bx, ax ;先乘以2,即移位两位,然后存入bx中
;跳转
jmp table[bx] ;通过table找到对应的入口地址
showString:
;开始显示找好的字符串,
;使用09h中断号,ds:dx作为字符串参数入口
;因为字符串后面有$作为结束符
mov ah, 09h
int 21h
;结束代码段
mov ax, 4c00h;
int 21h
disp1:
mov dx, offset msg1
jmp showString
disp2:
mov dx, offset msg2
jmp showString
disp3:
mov dx, offset msg3
jmp showString
disp4:
mov dx, offset msg4
jmp showString
disp5:
mov dx, offset msg5
jmp showString
disp6:
mov dx, offset msg6
jmp showString
disp7:
mov dx, offset msg7
jmp showString
disp8:
mov dx, offset msg8
jmp showString
codes ends
end start
从100,99,…,2,1倒序累加
题目要求:将100…1相加,然后存到一个sum中
细节:我们的目的操作数是内存的时候,该运算是多少位的就要看源寄存器位置位数是多少,我们这个sum最后用8位二进制位肯定装不下,所以我们要控制他进行运算的位数是16位,所以一定要将源操作数位置中使用16位的寄存器。
代码实现:
;从100,99,...,2,1倒序累加
assume cs:codes, ds:datas
datas segment
sum dw 0
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
mov cx, 100
s:
add sum, cx
;由于sum是内存,所以决定运算位数的是源操作数,
;因此一定要用cx,不能用cl,否则会变成8位运算装不下的情况
loop s
;代码段结束
mov ax, 4c00h
int 21h
codes ends
end start
输入一个字符,然后输出它的二进制数
题目要求:你输入一个字符,然后需要你将这一个字符的ascii码的二进制数以字符的形式显示出来。
细节:记得将存在al的字符取出来。其次,需要使用adc将左移出去存在CF中的位加进去。
代码实现:
;输入一个字符,然后输出它的二进制数
assume cs:codes
codes segment
start:
;录入一个字符,然后字符存入al中
mov ah, 01h
int 21h
mov bl, al
;输出一个:作为分隔符,使用02中断,
;dl是输出的字符,并且右移一位
mov dl, ':'
mov ah, 02h
int 21h
mov cx, 8
s:
shl bl, 1 ;移除的位存进CF中,可以使用adc加进去
mov dl, 0 ;清空dl再相加
adc dl, 30h;因为要显示字符01,所以我们加上30h
int 21h
loop s
;代码段结束
mov ax, 4c00h
int 21h
codes ends
end start
大小写转换
大写转小写
题目要求:
将字符串中,碰到有大写的字符转为小写字符
不需要操作小写字符
碰到结尾符为0就结束
细节:小写字母中,二进制的从第0位开始数到第五位是1的就是小写字母字符的ascii,强制转小写就是:ax = ‘A’ 的时候 那就or ax , 00100000B
实现大写转小写的运行结果:
代码实现:
;将字符串中,碰到有大写的字符转为小写字符
;不需要操作小写字符
;碰到结尾符为0就结束
assume cs:codes, ds:datas
datas segment
string db "aBCDeFghIJkL"
db 0
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
mov di, 0
again:
mov bl, string[di]
or bl, bl ;判断是否为0了,是的话就结束
jz done
;由于不需要操作小写字符,就要判断是否是大写范围内
cmp bl, 'Z'
;这里先判断是否大于Z,如果是大于的话肯定是小写
;假设我们先判断A的话,每次进来的是小写,小写字符肯定大于A
ja next ;是否大于Z,是就不用转换
cmp bl, 'A'
jb next ;是否小于A,是就不用转换
or bl, 20h ;字母的ascii中二进制数中的第五位为1 , 那就是小写
mov string[di], bl ;需要将转换好的字符存回去
next:
inc di
jmp again
done:
mov ax, 4c00h
int 21h
codes ends
end start
小写转大写
同理,逻辑差不多,修改一下跳转指令和转换操作修改即可。
大写字母中,二进制的从第0位开始数到第五位是0的就是大写字母字符的ascii,强制转大写就是:ax = ‘a’ 的时候 那就and ax , 11011111B
实现大写转小写的运行结果:
代码实现:
assume cs:codes, ds:datas
datas segment
string db "aBCDeFghIJkL"
db 0
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
mov di, 0
again:
mov bl, string[di]
or bl, bl ;判断是否为0了,是的话就结束
jz done
cmp bl, 'a'
jb next ;是否小于A,是就不用转换
cmp bl, 'z'
ja next ;是否大于Z,是就不用转换
and bl, 0dfh ;字母的ascii中二进制数中的第五位为0 , 那就是大写
mov string[di], bl ;需要将转换好的字符存回去
next:
inc di
jmp again
done:
mov ax, 4c00h
int 21h
codes ends
end start
冒泡排序
题目要求:
将下面这段数据从小到大排序,使用冒泡排序
datas segment
list db 32, 85, 16, 15, 8
datas ends
既然学汇编了,那必然不是什么小人物了,所以冒泡就不介绍了。
细节:我们的list是db类型,记得使用8位寄存器来交换,否则会连累到后面的数据。别问我为什么知道会这样
代码实现:
assume cs:codes, ds:datas
datas segment
list db 32, 85, 16, 15, 8
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
;精华就是内循环次数和剩余的外循环次数每次都是一样的
mov cx, 5
dec cx
mov dx, cx
mov bx, 0
outer:
inner:
mov al, [bx]
cmp al, [bx + 1]
jle next ;如果小于等于就直接跳过不交换
xchg al, [bx + 1]
mov [bx], al
next:
inc bx
cmp bx, dx
jl inner ;小于就继续,大于等于就退出
mov bx, 0
dec dx
loop outer
;代码段结束
mov ax, 4c00h
int 21h
codes ends
end start
剔除空格
题目要求:
现有一个以$结尾的字符串,要求剔除其中的空格
assume cs:codes, ds:datas
datas segment
string db ‘Let us have a try !’, ‘$’
datas ends
细节:还是别忘记了字符是db,所以交换的时候记得用8位寄存器。其次我们最后的
mov al, [di-1]
cmp al, ' ′ 这两句差点把我搞崩了, d i − 1 这里需要 − 1 是因为我在之前 i n c d i 了,所以如果要找到原本的字符就要 ' 这两句差点把我搞崩了,di-1这里需要-1是因为我在之前inc di了,所以如果要找到原本的字符就要 ′这两句差点把我搞崩了,di−1这里需要−1是因为我在之前incdi了,所以如果要找到原本的字符就要,否则当你到最后的时候,由于inc di,下标过了$字符,那就永远跳不出循环了,
然后就是cmd控制台直接给你卡住…
;现有一个以$结尾的字符串,要求剔除其中的空格
assume cs:codes, ds:datas
datas segment
string db 'Let us have a try !', '$'
datas ends
codes segment
start:
mov ax, datas
mov ds, ax
mov si, 0
;使用最烂的方法,每碰到一次空格就全部向前移动一次
mov al, string[si]
outer:
cmp al, ' '
jnz next ;不是空格就下一个字符
mov di, si
inner: ;如果是字符就进行移位
xchg al, [di+1]
mov [di], al
inc di
mov al, [di-1]
cmp al, '$'
jnz inner ;如果不是$就继续
next:
inc si
mov al, string[si]
cmp al, '$'
jnz outer ;如果不是$就继续
;代码段结束
mov ax, 4c00h
int 21h
codes ends
end start
本文来自博客园,作者:竹等寒,转载请注明原文链接。