home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / debug / Debugger / PowerVisor / S / pv / ShowAscii.pv < prev    next >
Encoding:
Text File  |  1992-07-20  |  201 b   |  10 lines
  1. /* */
  2. 'unhide'
  3. a = ' 32 :  '
  4. do i=33 to 255
  5.     a = a||d2c(i)
  6.     if (i+1)//32==0 & i~=255 then a = a||d2c(10)||right(i+1,3)' : '
  7. end
  8. 'print "·    'a'    "'        /* Don't remove the tabs on this line!!! */
  9. 'print \n'
  10.