La Aventura Espacial: AVENTURA.B

  0 REM ! LET <>"CHR$ / STEP I] NEXT  GO SUB {=/ LLIST ! RESTORE !v RESTORE  CLEAR  THEN INKEY$PEEK *O/ FOR ![ STEP  DATA ]. STEP  VERIFY ] STEP ` INVERSE }ATN (q GO SUB [ POKE /xG NEW _z THEN 8 THEN 8 THEN 8 THEN 8W GO SUB S POKE /q STEP  VERIFY ]! INPUT ][▞ GO SUB VAL !["Fp.""p CLS v> OPEN # RETURN vvvCODE  OPEN # RETURN vCODE  FLASH  RETURN / NEW ( RUN vCODE  FLASH  RETURN / NEW   RUN NOT `!` RESTORE  RESTORE  STEP  DATA ] LLIST  MOVE  NEXT NOT [/ NEXT NOT =>> NEXT 2;[ GO SUB W2a[>? GO SUB G GO SUB V! THEN /[A][p GO SUB VAL  INVERSE 6s INVERSE  RESTORE  LLIST #>2] THEN !> RETURN (4 CLOSE #▗[!©>2h[ NEXT ![A][ THEN /p GO SUB VAL > GO SUB G GO SUB ^ CLS > OPEN # RETURN v CLEAR CODE  OPEN # RETURN <>0 CLS > MERGE CODE 2 RANDOMIZE /NOT = TRD by tiboh'20 
  1 CLEAR VAL "24575": RANDOMIZE USR VAL "23872"