10 REM *****    Breakpoints    ***** 20 REM ***** By  R.A.Waddilove ***** 30 REM (c)Computing with the Amstrad 40 REM" —RUN,code address,breakpoint 50 MEMORY &97FF 60 address=&9800 70 FOR i=1 TO 27 80 sum=0:READ code$,check$ 90 FOR j=1 TO 21 STEP 2 100 byte=VAL("&"+MID$(code$,j,2)) 110 POKE address,byte 120 sum=sum+byte:address=address+1 130 NEXT 140 IF sum<>VAL("&"+check$) THEN PRINT "Error in data in line ";160+i*10:END 150 NEXT 160 CALL &9800 170 DATA 3E00A7C03C320198011198,356 180 DATA 211A98C3D1BC1698C31E98,54A 190 DATA 5255CE0000000000FE02C0,335 200 DATA 2100003922EB98DD6E00DD,427 210 DATA 66017E326D983EF7773EC3,4C9 220 DATA 323000214798223100DD6E,300 230 DATA 02DD6603E9ED432B99ED53,565 240 DATA 2D99222F99DD223199FD22,498 250 DATA 339921020039223599F5E1,3EE 260 DATA 222999E12BE52237993E00,405 270 DATA 77CD06990D0A2041462020,2E1 280 DATA 2042432020204445202020,1EE 290 DATA 484C202020495820202049,23E 300 DATA 5920202053502020205043,24F 310 DATA 0D0A001129990608EB5E23,264 320 DATA 5623EBCD10993E20CD5ABB,51A 330 DATA 10F0CD06990D0A53205A20,370 340 DATA 2E2048202E5056204E2043,25B 350 DATA 0D0A0006082129993E18CB,229 360 DATA 0617CD5ABB3E20CD5ABB10,44F 370 DATA F1CD06BBE6DFFE432807FE,6B2 380 DATA 5320F33100002A2999E5F1,459 390 DATA ED4B2B99ED5B2D992A2F99,4FC 400 DATA DD2A3199FD2A3399C9E17E,5EC 410 DATA CD5ABB23B720F8E97CCD15,61B 420 DATA 997DF50F0F0F0FCD1E99F1,4BC 430 DATA E60FC69027CE4027C35ABB,57F