Top Cat: TOP_CAT.B

  0 REM  NEXT 1 COPY _ CLEAR !:/ CLEAR  THEN INKEY$! LET <>"CHR$ /% STEP INT ] STEP INT ]CODE 2USR ]e STEP INT ] CLS [G]v CLEAR ![ COPY Zu GO SUB LN !8<= STEP STR$ ] STEP 8<= CLS > OPEN # RETURN v CLEAR CODE  OPEN # RETURN  STEP  OPEN #]!XX?u GO SUB VAL NOT FN a--Released01.11.08-------CODE  OPEN # RETURN !FN a RESTORE  GO SUB [ POKE / CLS CODE  FLASH  RETURN / NEW ( SAVE  NEXT <>![ COPY Zu GO SUB LN <> GO SUB [ POKE /{ RETURN 8 PRINT  GO SUB S POKE /<>
  10 PAPER NOT PI: BORDER NOT PI: INK NOT PI: CLS : RANDOMIZE USR VAL "23872": REM SG-TEAM '2008