用汇编语言编写一个小小程序

2025-02-12 22:57:56

推荐回答（2个）

回答1：

这个还不简单#includevoid main(){ float a,b,c,s;/*定义数据类型，数据初始化*/s=(a*b+c)/a;/*计算并把计算结果赋值给s*/printf("s=%f\n",s);/*输出计算结果*/}

回答2：

; 本程序通过编译，运行正确
Code Segment
Assume CS:Code,DS:Code
CR equ 000DH
LF equ 000AH
KBBack equ 0008H
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：显示指定地址（Str_Addr）的字符串
; 入口：
; Str_Addr＝字符串地址（要求在数据段）; 用法: Output Str_Addr
; 用法举例：Output PromptStrOutput MACRO Str_Addr
lea dx,Str_Addr
mov ah,9
int 21h
EndM
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：取光标位置
; 入口：无
; 出口：DH=行号，DL=列号
GetCursor Proc Near
PUSH AX
PUSH BX
PUSH CX
XOR BX,BX
MOV AH,3
INT 10H
MOV Cursor_Row,DH
MOV Cursor_Col,DL
POP CX
POP BX
POP AX
RET
Cursor_Row DB ?
Cursor_Col DB ?
GetCursor EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：置光标位置
; 入口：Cursor_Row=行坐标; Cursor_Col: 列坐标)
SetCursor Proc Near
PUSH CX
PUSH BX
PUSH AX
MOV DH,Cursor_Row
MOV DL,Cursor_Col
XOR BX,BX
MOV AH,2
INT 10H
POP AX
POP BX
POP CX
RET
SetCursor EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：输出回车换行
enter_CTLF proc Near
push ax
push dx
mov ah,02h
mov dl,0dh
int 21h
mov dl,0ah
int 21h
pop dx
pop ax
ret
enter_CTLF endp
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：输出一个字符
; 入口：dl=要显示的字符
enter_Chr proc Near
push ax
mov ah,02h
int 21h
pop ax
ret
enter_Chr endp
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：键盘输入一个N位的十进制数字，
; 用逻辑和移位指令将其转换成二进制数并保存在指定的内存单元。
; 入口：N=数字位数；di=保存输入的数字首地址
; 出口：转换后的二进制数保存在di所指的单元
Input_Digit Proc Near
push dx
push cx
push bx
push di
lea di,@@Save_Tmp
push di
cld
mov cx,N
push cx
@@Input: call GetCursor ;取光标位置
mov ah,1 ;从键盘接受一个字符
int 21h
cmp al,CR ;若键入的是回车，已经键入的数字不足N位
jz @@ASC_Dec ;转去处理已经键入的数字
cmp al,KBBack
jz @@KB_Back ;若是回空键，重新输入

cmp al,'0'
jb @@KBBack ;若低于数字'0'，重新输入
cmp al,'9'
ja @@KBBack ;若低于数字'9'，重新输入
jmp @@Save_Dig
@@KB_Back: dec Cursor_Col
inc cx
dec di
@@KBBack: call SetCursor ;置光标位置
jmp @@Input
@@Save_Dig: and al,0fh ;转换成二进制数

mov al,01h

stosb ;保存
loop @@Input ;接受下一个数字
@@ASC_Dec: mov ax,cx
pop cx
pop si
sub cx,ax ;实际输入的数字位数
xor bp,bp
xor dx,dx
xor ax,ax
jcxz @@Save_Ret ;若直接回车，没有输入任何数字，按输入'0'处理
dec cx ;实际输入的数字位数减1，准备把输入的这一串数字转换成二进制数
jcxz @@One_Digit ;若输入的数字只有一位，转去直接保存这个二进制数
mov bx,10
@@Mul_Ten: lodsb
cbw
add ax,bp
mul bx
mov bp,ax
loop @@Mul_Ten
@@One_Digit:lodsb
cbw
add ax,bp
@@Save_Ret: pop di
stosw
pop bx
pop cx
pop dx
ret
@@Save_Tmp db 16 dup(?)
Input_Digit EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：把AX中的二进制有、无符号数转换成显式的十进制ASCII码，并送显示屏显示
; 入口：AX=二进制数
; 出口：在当前光标位置显示转换后的ASCII码数字
Dec_ASCII Proc Near
push dx
push bx
push di
.IF Signed == 'y'
mov @@Carry_Yes,'+'
test ax,8000h
jz $+9
mov @@Carry_Yes,'-'
neg ax
.Endif
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
.IF Signed == 'y'
cmp @@Carry_Yes,'-'
jnz $+6
mov byte ptr [di],'-'
dec di
.Endif
inc di
push di
pop dx
mov ah,9
int 21h
pop di
pop bx
pop dx
ret
@@Temp_Save db 7 dup(?)
@@Carry_Yes db '+'
Dec_ASCII EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
N equ 3 ;输入的十进制整数位数
Signed db 'y' ;是否有符号数。'y'=有符号数，'n'=无符号数
Number1 dw ?
Number2 dw ?
Number3 dw ?
Period_Aft db 3 ;保留小数位数
prompt_title db 's=(a*b+c)/a',0ah,0dh,'$'
prompt_A db 'Please Input A: $'
prompt_B db 'Please Input B: $'
prompt_C db 'Please Input C: $'Start: push cs
pop ds
push cs
pop es ;使数据段、附加段与代码段同段
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 输入两个十进制数
Output prompt_title;提示题目
Output prompt_A ;提示输入第一个数
lea di,Number1 ;变量Number1的地址
call Input_Digit ;从键盘接受一个N位数字
call enter_CTLF ;输出一个回车、换行
Output prompt_B ;提示输入第二个数
lea di,Number2 ;变量Number2的地址
call Input_Digit ;从键盘接受一个N位数字
call enter_CTLF ;输出一个回车、换行
Output prompt_C ;提示输入第三个数
lea di,Number3 ;变量Number3的地址
call Input_Digit ;从键盘接受一个N位数字
call enter_CTLF ;输出一个回车、换行
call enter_CTLF ;输出一个回车、换行
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 运算

mov dl,'s'
call enter_Chr ;显示一个s

mov dl,'='
call enter_Chr ;显示一个等号

mov ax,Number1
imul Number2 ;Number1*Number2→AX
add ax,Number3 ;(Number1*Number2+Number3)→AX
idiv Number1 ;(Number1*Number2+Number3)/Number1→AX

call Dec_ASCII ;显示和
call enter_CTLF ;输出一个回车、换行
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－Exit_Proc: mov ah,4ch ;结束程序
int 21h
Code ENDS
END Start ;编译到此结束

最新问答

用汇编语言编写一个小小程序

成都哪里有一个轮子的电动独轮平衡车？单轮独轮的？

免费解签大全

上海到济南多少公里?

济宁圣运工程机械有限公司怎么样？

以韩麦尔先生为第一人称，改写课文中改写课文中上课到下课的部分内容,（200字）

哒哒哒哒哒响，有没有解决方案

淘宝卖的亿纬磷酸铁锂电池56A的说是全新的，是真的吗？怎么价格也不一样？140到450元加

腾讯视频电视剧要用会员看的那个，可以缓存吗？

蜡笔小新全部剧场版的。名字