10 REM This file was created
20 REM          using zmakebas
30 CLEAR 32767
40 LOAD ""CODE
50 RANDOMIZE USR 32768