鱼C论坛

 找回密码
 立即注册
查看: 3399|回复: 2

[技术交流] 今天完成了实验十!搞的我脚抽筋呀! 完全自写的

[复制链接]
发表于 2011-5-26 00:35:20 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
本帖最后由 loop 于 2011-5-27 00:23 编辑

这道题目,有点小问题!如果那些数 带0话  就出问题了
assume cs:code
data segment 
dd   123,12666,1,894,42,573   ; 24 
dd   44444444,123456789   ;8
data ends 

da segment 
db   255  dup(0) 
da ends


code segment
start:  mov cx,8 
        mov di,0
        
to:        
        mov ax,data
        mov ds,ax
        
        mov ax,[bx]
        mov dx,[bx+2] 
        push cx
        push bx
        mov bx,0
        call dtoc 
        pop bx
        pop cx 
        add bx,4
        loop to        
        
        mov dh,8
        mov dl,16
        mov cl,2
        call show_str

        mov ax,4c00h
        int 21h 
        
        
dtoc:   push ax
        mov ax,da
        mov ds,ax
        pop ax

go:     
        mov cx,10
        
        call divdw 
        jcxz  save
        add cx,30h
        push cx
        
        inc bx
        
        jmp short go
        
save:   
        
        mov cx,bx 
        mov bx,0
      s:pop ax
        mov [di+bx],ax
        inc bx 
        loop s
       
        mov [di+bx],1fh ;插个空格
        
        add di,bx
        inc di
        
        ret
        
divdw: ;参数    cx-除数  dx-被除数高位  ax-被除数低位    
       ;返回值  ax-商的低位  dx-商的高位 cx-余数
        push bx
        mov bx,ax                          
        mov ax,dx
        mov dx,0 
        div cx
        push ax
        mov ax,bx
        div cx
        mov cx,dx
        pop dx
        pop bx
        ret
        
        
show_str:
        push cx
        MOV AX,0b800h
        MOV ES,AX
        
        dec dh
        mov ax,160
        mul dh
        push ax
        
        dec dl
        mov ax,2
        mul dl
        push ax 
        
        pop bx
        pop di
        pop dx
begin:        
        mov cl,[si]
        mov ch,0
        jcxz over1

        mov es:[di+bx],cl
        inc bx 
        mov es:[di+bx],dl
        inc bx
        inc si
        jmp short begin
over1:        
        ret                                        
code ends  
end start

评分

参与人数 2荣誉 +2 鱼币 +5 收起 理由
loop + 3 赞一个!
小甲鱼 + 2 + 2 很给力!

查看全部评分

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-5-26 20:32:41 | 显示全部楼层
{:soso__97499771577211151_2:}不错哈,支持分享!
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-5-27 23:01:06 | 显示全部楼层
好样的。继续努力。加油!
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2025-1-5 13:08

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表