微机原理程序打印版本

冒泡法排序并显示
.model small
.386 .data
array dw 0002h,00b8h,0016h,003ah,0015h ;定义数据字（也可为字节或双字）
count ($-array)/2 ;求数据个数(若为字节则为1，若为双字则为4)
flag db -1 ;(交换标志初值为-1) .code
.startup
mov di,count ;
lp1: cmp flag,0 ;判断数组是否有序je exit ;有序则排序结束
dec di ;无序
mov cx,di ;无序则置扫描比较次数
mov bx,0 ;置数组的偏移地址
mov flag,0 ;预置交换标志为0（有序）lp2: mov ax,array[bx] ;取一个数据给AX
cmp ax,array[bx+2] ;与下一个数据比较（若是字节+1，双子+4）
jge next1 ;前一个大则转移到NEXT
xchg ax,array[bx+2] ;否则交换数据
mov array[bx],ax
mov flag,-1 ;置交换标志为-1 next1: add bx,2 ;修改指针地址loop lp2 ;循环进行两两数据的比较
jmp lp1 ;内循环结束继续下一遍排序（直至排序完成）
exit: mov cx,count ; 置循环次数
mov bx,0 ;置数组的偏移地址again1: mov ax,array[bx] ;去一个数给AX push cx ;将CX压入堆栈
mov cx,4 ;字有4个16进制，故循环4次（字节2，双字4）
again2: rol ax,4 ;循环左移4位
push ax ;将AX压入堆栈
call htoasc ;调用子程序（ASCII码显示程序）
mov ah,2
mov dl,al
int 21h ;显示字符
pop ax ;AX出栈
loop again2 ;循环进行ASCII 码显示程序并依此显示出字符
mov dl,'h'
mov ah,2
int 21h ;显示字符“h"
mov dl,' '
mov ah,2
int 21h
pop cx ;CX出栈
add bx,2 ;修改指针地址，指向下一个数据
loop again1 ;内循环结束即显示完一个字符再继续显示下一个
htoasc proc ;子程序and al,0fh
or al,30h
cmp al,39h ;判断是0~9还是字母
jbe next2
add al,07h
next2: ret
htoasc endp
.exit
end
显示字符的ASCII码
.model small
.386
.data
msg db 'Welcome to SDUST',0
.code
.startup
mov esi,offset msg
again: mov al,[esi]
cmp al,0
je end
and al,0f0h
shr al,4
cmp al,0ah
jb next
add al,07h
next: add al,30h
mov ah,2
int 21h
inc esi
jmp again
.exit
end
.model small
.386
.data
msg db 'Welcome to SDUST',0 ;还可用'$'代替0
.code
.startup
mov esi offset msg
again: mov ebx [esi]
cmp ebx,0 ;若代替则用cmp byte ptr ebx,'$'
je done ;与0比较若等于则结束
mov ecx,2 ;loop指令累计循环2次next: rol ebx,4 ;ebx 循环左移4位
call htoasc ;调用字符显示程序
mov dl,eax
mov ah,2
int 21h ;显示一个字符
loop next;
mov dl,'H'
mov ah,2
int 21h ;显示H
mov dl,','
mov ah,2
int 21h ;显示，
inc esi ;esi 自增1 ，移到下一个字符
jmp again ;无条件转移到again htoasc proc ;子程序
mov eax,ebx
and eax,0fh ;取其低4位
or eax,30h ;最高位变为3
cmp eax,39 ;与39H比较判断是0~9，还是字母
jbe htoend
add eax,07h
htoend: ret ;子程序返回
htoasc endp ;过程结束
done:
.exit
end。