home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 5 / ctrom5b.zip / ctrom5b / PROGRAM / ASM / ALIB30B / CONV22.ASM < prev    next >
Assembly Source File  |  1994-12-01  |  1KB  |  63 lines
  1.     page    66,132
  2. ;******************************** CONV22.ASM *********************************
  3.  
  4. LIBSEG           segment byte public "LIB"
  5.         assume cs:LIBSEG , ds:nothing
  6.  
  7. ;----------------------------------------------------------------------------
  8. .xlist
  9.     include  mac.inc
  10.     include  common.inc
  11. .list
  12. comment 
  13. ;- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -( CONVERT )
  14. DWORD_TO_DEC_STDOUT - display dword as decimal to stdout
  15. ;
  16. ; inputs  dx,ax = dword
  17. ; 
  18. ; output  dx.ax destroyed
  19. ;* * * * * * * * * * * * * *
  20. 
  21. ;==========================================================================
  22.     extrn    ten:word
  23.     public    dword_to_dec_stdout  
  24. DWORD_TO_DEC_STDOUT    proc    far
  25.     push    bx
  26.     call    local_proc
  27.     pop    bx
  28.     retf
  29. dword_to_dec_stdout    endp
  30.  
  31. local_proc:    push    ax
  32.         mov    ax,dx
  33.         xor    dx,dx
  34.         div    cs:ten
  35.         mov    bx,ax
  36.         pop    ax
  37.         div    cs:ten
  38.         xchg    bx,dx
  39. ;
  40. ; dx,ax = quotient
  41. ;    bx = remainder
  42.  
  43.         or    ax,ax
  44.         jnz    dd_more
  45.         or    dx,dx
  46.         jnz    dd_more
  47.         mov    dx,bx
  48.         jmp    ddb_display
  49. dd_more:
  50.         push    bx            ;save remainder        
  51.     
  52.         call    local_proc             ;recursion
  53.         pop    dx
  54. ddb_display:    add    dl,30h            ;convert char. to ascii
  55.         mov    ah,2
  56.         int    21h            ;display char. in -dl-
  57.         ret
  58. LIBSEG    ENDS
  59.     end
  60.  
  61.  
  62.  
  63.