start tok64 d64-LORJcv 10 OPEN1,8,15,"m-w"+CHR$(7)+CHR$(28)+CHR$(1)+CHR$(15) 20 PRINT#1,"m-w"+CHR$(106)+CHR$(0)+CHR$(1)+CHR$(32) 30 CLOSE1 stop tok64 (bastext 1.0)