鱼C论坛

 找回密码
 立即注册
查看: 3107|回复: 6

[技术交流] 实验十,第三问完整代码,干了几天!终于抠出来了!分享一下!

[复制链接]
发表于 2011-11-16 11:34:25 | 显示全部楼层 |阅读模式

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

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

x

                               
登录/注册后可看大图

assume cs:code,ds:data
data segment
     db 128 dup (0)
     dw 123,2000,12666,1,3,38
data ends


code segment
start:
      mov bx,data
      mov ds,bx
      mov si,0
      mov di,0
      mov bx,0
      mov bp,0

   s3:mov ax,[bp+128]
      mov cx,ax
      jcxz over

      call stoc
      mov dh,8
      mov dl,3
      mov cl,2

      call show_str
      jmp short s3
over:
      mov ax,4c00h
      int 21h

stoc:
      push ax
      push bx
      push cx
      push dx

    s:mov dx,0
      mov cx,10d
      div cx
      mov cx,ax
      jcxz ok
      add dx,30h
      push dx

      inc bx
      jmp short s

   ok:add dx,30h
      push dx
      inc bx

      mov cx,bx
   s1:pop ax
      mov ds:[si],al
      inc si
      loop s1

      pop dx
      pop cx
      pop bx
      pop ax

      ret
show_str:
      push ax
      push bx
      push cx
      push dx
      push si
      push bp

      mov ax,0b800h
      mov es,ax
      mov si,0

      mov ax,160
      dec dh
      mul dh
      mov bx,ax

      mov ax,2
      dec dl
      mul dl
      add bx,ax

      mov al,cl
      mov di,0
   s2:mov cl,[si]
      mov ch,0
      jcxz ok1
      mov es:[bx+di],cl
      mov es:[bx+di+1],al

      inc si
      add di,2

      loop s2
  ok1:
      pop bp
      pop si
      pop dx
      pop cx
      pop bx
      pop ax

      add bp,2
      ret
code ends
end start

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
头像被屏蔽
发表于 2011-11-16 12:49:17 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-11-16 13:48:39 | 显示全部楼层
干的好同志!
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-11-16 22:28:06 | 显示全部楼层
一堆push,没有注释,没法子看
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-11-17 08:40:55 | 显示全部楼层
;P  送鲜花  送笑脸   
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-11-17 14:45:02 | 显示全部楼层
好像是实验十里面的第三个问题?还是三个问题用一个程序来解决?
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2011-11-17 16:55:30 | 显示全部楼层
不错!就是要这种精神,加油
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-11-19 10:25

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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