10 E$=CHR$(27)
20 LPRINT E$;"1"
30 LPRINT E$;"S1"
40 INPUT "Compressed";E$
50 IF E$="Y" THEN 70
60 IF E$<>"Y" THEN 80
70 LPRINT CHR$(15)
80 SYSTEM