三九宝宝网宝宝教育教学论文

用汇编语言产生随机数的小程序

01月07日 编辑 39baobao.com

; 本程序通过编译,运行正确

Code Segment

Assume CS:Code,DS:Code,ES:Code

; -------------------------------------

; 功能:输出一个字符

; 入口:dl=要显示的字符

Output_Chr proc Near

push ax

mov ah,02h

int 21h

pop ax

ret

Output_Chr endp

; -------------------------------------

; 功能:把AX中的二进制无符号数转换成显式的十进制ASCII码,并送显示屏显示

; 入口:AX=二进制数

; 出口:在当前光标位置显示转换后的ASCII码数字

Dec_ASCII Proc Near

push dx

push bx

push di

mov bx,10

lea di,Temp_Save[6]

mov byte ptr [di],'$'

dec di

cld

Divide: xor dx,dx

div bx

or dl,30h

mov [di],dl

dec di

test ax,0ffffh

jnz Divide

inc di

push di

pop dx

mov ah,9

int 21h

pop di

pop bx

pop dx

ret

Temp_Save db 7 dup(?)

Dec_ASCII EndP

; -------------------------------------

Start: push cs

pop ds

push es

pop es

L1: xor al,al

out 43h,al

in ax,40h

call Dec_ASCII ;显示输出这个数

mov dl,20h

call Output_Chr

mov ah,1

int 21h

cmp al,1bh ;Esc键结束程序

jnz L1

Exit_Proc: mov ah,4ch ;结束程序

int 21h

Code ENDS

END Start ;编译到此结束

推荐阅读
图文推荐