主题:哪个大虾能帮助小弟做道题啊~~!!!
新手求助
[专家分:0] 发布于 2005-12-19 02:01:00
[em10]用汇编语言求1-200之间的偶数之和~~!![em10][em10][em10]
回复列表 (共5个回复)
沙发
新手求助 [专家分:0] 发布于 2005-12-19 12:44:00
急救啊,要不小弟就完蛋拉,各位大侠帮下小弟吧``11
板凳
erping [专家分:3660] 发布于 2005-12-19 15:06:00
.model small
.stack
.data
strBuff db 5 dup(?)
.code
_main:
mov ax, @data
mov ds, ax
mov cx, 200
xor ax, ax
_loop:
add ax, cx
dec cx ;cx - 1
loop _loop ;cx - 1
mov si, offset strBuff
call BinToDecString
mov dx, offset strBuff
mov ah, 9
int 21H
mov ax, 4C00H
int 21H
;****************************************************
;BinToDecString
;功能:
; 机器数转换为十进制字符串
;入口参数:
; AX 存放机器数
; SI 存放要转换后的字符串的地址
;****************************************************
BinToDecString proc
push dx
push cx
mov cx, 10
mov bp, sp
_@BinToDecString_1:
xor dx, dx
div cx ;除以 10
add dl, '0'
dec bp
mov byte ptr [bp], dl
test ax, ax
jnz _@BinToDecString_1
_@BinToDecString_2:
cmp bp, sp
je _@BinToDecString_3
mov al, byte ptr [bp]
mov byte ptr [si], al
inc bp
inc si
jmp _@BinToDecString_2
_@BinToDecString_3:
mov byte ptr [si], '$'
pop cx
pop dx
ret
BinToDecString endp
end _main
3 楼
新手求助 [专家分:0] 发布于 2005-12-19 16:19:00
[em11]多谢拉!!
4 楼
pigshy [专家分:0] 发布于 2005-12-19 16:23:00
hahahahah[em5]
5 楼
pigshy [专家分:0] 发布于 2005-12-19 16:25:00
这位哥哥真强http://www.programfan.com/club/showbbs.asp?id=130621
[em5][em4]
我来回复