home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d0xx / d013 / basicprogs.lha / join.bas < prev    next >
Encoding:
BASIC Source File  |  1986-02-22  |  133 b   |  8 lines

  1. 100   input a: ? a
  2. 110   a$ = mks$(a)
  3. 120   for i = 1 to 4
  4. 130   b$ = mid$(a$,i,1)
  5. 131   ? hex$(asc(b$))
  6. 140   next i
  7. 200   goto 100
  8.