fjs2009 发表于 2011-11-16 11:34:25

实验十，第三问完整代码，干了几天！终于抠出来了！分享一下！

http://bbs.fishc.com/data/attachment/album/201111/16/1127327r2zinbsl2vgnl41.jpg
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,
      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:,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,
      mov ch,0
      jcxz ok1
      mov es:,cl
      mov es:,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

z310394543 发表于 2011-11-16 12:49:17

关键是感觉 发表于 2011-11-16 13:48:39

干的好同志！

小B同学 发表于 2011-11-16 22:28:06

一堆push，没有注释，没法子看

bingghost 发表于 2011-11-17 08:40:55

;P送鲜花送笑脸   

eons 发表于 2011-11-17 14:45:02

好像是实验十里面的第三个问题？还是三个问题用一个程序来解决？

小生我怕怕 发表于 2011-11-17 16:55:30

不错！就是要这种精神，加油
页: [1]
查看完整版本: 实验十，第三问完整代码，干了几天！终于抠出来了！分享一下！