Quazatron: QUAZATRN.B

  10 CLEAR 25000
  15 POKE 23613,0
  16 RANDOMIZE USR 15619: REM : LOAD "q"CODE 54000
  17 BORDER 2: RANDOMIZE USR 54000: PAUSE 50: RANDOMIZE USR 60000: BORDER 2
  18 PAUSE 0
  20 RANDOMIZE USR 15619: REM : LOAD "q0"CODE 
  25 BORDER 4
  30 RANDOMIZE USR 34048
  40 RANDOMIZE USR 15619: REM : LOAD "q1"CODE 
  45 PAUSE 0
  50 RANDOMIZE USR 34097
  53 PRINT AT 21,0; PAPER 4; INK 0;"*** Leningrad *** RATCOPY'90 ***"
  60 RANDOMIZE USR 15619: REM : LOAD "q2"CODE 
  65 PAUSE 0
  70 RANDOMIZE USR 34136
  80 RANDOMIZE USR 15619: REM : LOAD "q3"CODE 
  85 PAUSE 0
  90 RANDOMIZE USR 56944
  6481600: POKE 00000,0: LOAD ""CODE : RANDOMIZE USR EXP 00.0000005: REM