home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 90xx / 9007a.d64 / 61110hex$ (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  141b  |  4 lines
  1. 61110 REM 61110HEX$        UZ/UZ$/UA,UB,UC
  2. 61111 UZ$="":UB=0:UC=UZ:FORUA=3TO0STEP-1:UB=INT(UC/16^UA)
  3. 61112 UZ$=UZ$+CHR$(48+UB+7*-(UB>9)):UC=UC-UB*16^UA:NEXT:RETURN
  4.