10 ' DEATH
20 MODE 1:BORDER 0
30 POKE &BE80,0:POKE &BE81,0:POKE &BE82,0:POKE &BE83,0:POKE &BE84,0:POKE &BE85,0:POKE &BE86,0
40 FOR i=0 TO 15:INK i,0:NEXT i
50 MEMORY &3FFF:LOAD"Mort.cmp"
60 POKE &A634,&C8:POKE &A635,0:POKE &A636,0:CALL &A60B
70 POKE &C7F1,&C9:CALL &C7D0
80 CALL &A60B
85 LOCATE 4,21:PEN 3:PRINT "Do you want to play again (Y/N)?"
90 k$=INKEY$
100 IF k$="Y" OR k$="y" THEN RUN"Caire.bas"
110 IF k$="N" OR k$="n" THEN CALL 0
120 IF k$<>"Y" AND k$<>"y" AND k$<>"N" AND k$<>"n" THEN GOTO 90