Es parte de la publicación: | Titanic 2 |
Tamaño del archivo: | 477 |
md5: | 1f8d3685d63c51cae04cd7dd7af46eaa |
0 REM *S/N#F>NOT 2©/ GO SUB C/!VPI GO SUB B( FLASH [P] INVERSE !CODE 7 STEP ©/ INVERSE ! CIRCLE aT▞> COPY 7 STEP ©/ INVERSE !CODE 7 STEP ©/ INVERSE !@u> COPY 7 STEP ©/ FLASH STEP RETURN a GO SUB K/!VPI GO SUB B( FLASH [P] INVERSE !CODE 7 STEP ©/ INVERSE !V@0> COPY 7 STEP ©/NOT bV
10 BORDER 0: INK 0: PAPER 0: CLEAR 25047
20 PRINT AT 0,10; BRIGHT 1; INK 4;"~ZX-MACTEP~";AT 1,11;"Presents:"
30 FOR I=0 TO 7: PRINT AT 8,8; BRIGHT 1; INK I;"TITANIC PART II": PAUSE 4: NEXT I
40 PRINT AT 12,2; BRIGHT 1; INK 6;"DISTRIBUTION BY ANDY HARDEST"
50 RANDOMIZE USR (VAL "256"*PEEK VAL "23636"+PEEK VAL "23635"+VAL "5")
59648