image of READY prompt

Wang2200.org

Listing of file='3277DUMP' on disk='vmedia/bsc_3271_rel_1.14.04.wvd.zip'

# Sector 1229, program filename = '3277DUMP'
9980 REM .3277DUMP 12/10/85
9981 DEFFN'10
   : PRINT
   : PRINT "I$=";HEXOF(I$())
9982 PRINT "VALUES IN ASCII"
   : PRINT P$()
   : PRINT
9983 FOR A=1 TO 1920
   : PRINT HEXOF(STR(P$(),A,1));".";
   : IF A/20=INT(A/20)THEN PRINT
   : IF A/80=INT(A/80)THEN PRINT A
9984 NEXT A
   : RETURN