' File: Hardcopy.lst
' Starting a screendump to the printer
'
PRINT AT(10,10);"Press any key to start screendump to printer."
WHILE INKEY$=""
WEND
'
SDPOKE &H4EE,0