home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / MAGAZINE / MISC / PJ_9_6.ZIP / ALIB.ZIP / TOUPPER.ASM < prev    next >
Encoding:
Assembly Source File  |  1991-06-25  |  214 b   |  21 lines
  1.     include    asm.inc
  2.  
  3.     public    toupper
  4.  
  5.     .code
  6.  
  7. ;;    toupper
  8. ;
  9. ;    entry    AL    char
  10. ;    exit    AL    upper cased AL
  11. ;
  12. toupper proc
  13.     cmp    al,'a'
  14.     jb    tou1
  15.     cmp    al,'z'
  16.     ja    tou1
  17.     xor    al,20h
  18. tou1:    ret
  19. toupper endp
  20.     end
  21.