1 :' Nightbreed - Ocean disk
2 :' by ANDY PRICE
3 :' Infinite Lives
4 :'
10 DATA af,cd,0e,bc,11
20 DATA 00,00,0e,41,21
30 DATA 00,01,df,1a,bf
40 DATA 21,1d,bf,22,ba
50 DATA 02,37,3f,c3,00
60 DATA 01,3c,c0,07,3e
70 DATA c3,32,03,5f,21
80 DATA 00,b3,22,04,5f
90 DATA 21,36,bf,11,00
100 DATA b3,01,30,00,ed
110 DATA b0,c3,84,03,e5
120 DATA d5,c5,21,14,b3
130 DATA 11,40,00,01,09
140 DATA 00,ed,b0,c1,d1
150 DATA e1,c3,40,00,cd
160 DATA fe,b6,af,32,cf
170 DATA 04,c9,ff,ff,00
180 FOR x=&BF00 TO &BF52
190 READ a$:a=VAL("&"+a$)
200 POKE x,a:chk=chk+a:NEXT
210 IF chk<>&2049-&FF THEN 250
220 PRINT"Insert Nightbreed,";
230 PRINT" Then Press A Key"
240 CALL &BB18:CALL &BF00
250 PRINT"Error in poke"