Moritz Strikes Back: MSB.B

Is a part of release: Moritz Strikes Back
File size: 26624
md5: 805fc4d4b0cbfe39a068ebe4689553aa
  0 REM ! LET <>"CHR$ / STEP I] NEXT  GO SUB {=/ LLIST ! RESTORE !v RESTORE  CLEAR  THEN INKEY$PEEK *O/ FOR  LINE ]! LPRINT Z6G,  CLS ! FOR ] POKE P RESTORE  MERGE ~▜o&))~# IF  MOVE  LLIST #  DIM v RETURN © GO SUB x THEN _( OUT  GO SUB x THEN g  INPUT 2ASN ] STEP  LINE ] STEP  BRIGHT ]S STEP  BRIGHT ]>ATN (>ACS 2▛ABS  CLS > OPEN # RETURN vvvCODE  OPEN # RETURN <> CLS vCODE  OPEN # RETURN ! COPY Z RETURN Z COPY w GO SUB LN <>!d/ STEP =NOT dCHEAT (Y/N)? TRD by tiboh'22 
  10 CLEAR VAL "25599": RANDOMIZE USR VAL "23872"
  15 BORDER NOT PI: PAPER NOT PI: INK VAL "7"
  40 POKE VAL "23606",VAL "192": POKE VAL "23607",VAL "142": PAUSE NOT PI: PAUSE NOT PI
  64 CLS : LET k=VAL "11": PRINT  INK VAL "4";AT VAL "9",k;"1 EASY"; INK VAL "6";AT VAL "12",k;"2 MEDIUM"; INK VAL "2";AT VAL "15",k;"3 HARD": POKE VAL "48549",VAL "177": POKE VAL "48550",VAL "187": POKE VAL "51445",VAL "46": POKE VAL "51446",VAL "28"
  65 LET k=CODE INKEY$-CODE "0": IF k<=NOT PI OR k>INT PI THEN  GO TO VAL "65"
  66 POKE VAL "48005",VAL "8-2*k": IF k = 1 THEN  POKE VAL "48549",VAL "117" : POKE VAL "48550",VAL "188"
  67 CLS : LET k=VAL "11": PRINT  INK VAL "5";AT VAL "12",k;"4 KEYBOARD"; INK VAL "3";AT VAL "15",k;"5 SINCLAIR"
  68 IF INKEY$="4" THEN  POKE 50501,37: POKE 50502,38: POKE 50503,26: POKE 50504,34: POKE 50505,16: POKE 50506,32: POKE 50507,1: GO TO 71
  69 IF INKEY$="5" THEN  POKE 50501,27: POKE 50502,19: POKE 50503,3: POKE 50504,11: POKE 50505,35: GO TO 71
  70 GO TO 68
  71 RANDOMIZE USR VAL "27060"
  80 RANDOMIZE USR VAL "33805"
  90 PAUSE NOT PI
  110 PRINT #0,AT 1,0; INK 2; PAPER 0;"        "; INK 6; PAPER 0;"           "; INK 7; PAPER 0;"           "
  111 POKE VAL "51445",VAL "64": POKE VAL "51446",VAL "20": RANDOMIZE USR VAL "48000"
  115 
  117 IF PEEK VAL "51433"= 3 THEN  GO TO VAL "140"
  120 PRINT AT VAL "6",VAL "12"; INK 2; FLASH 1;"GAME OVER"
  124 PAUSE NOT PI
  125 RANDOMIZE USR VAL "26840"
  128 GO TO VAL "63"
  140 RANDOMIZE USR VAL "30850"
  142 PAUSE VAL "100"
  150 GO TO VAL "63"