900 "H" PRINT "Dump HEXA de la memoire": IF G<>&6C30 THEN "I 910 INPUT "@dr. debut:";M,"Fin:";N 920 PRINT "Impression (O/N):*";: GOSUB 2 930 IF K$="O" PRINT "SIO (O/N):*";: GOSUB 2: PRINT = LPRINT : IF K$="O" OPEN 940 FOR I=M TO N STEP 8:L=0,A=I :GOSUB 3: PRINT " "; 950 FOR J=0 TO 7: CALL P, A+J: C= PEEK O, L=L+C: GOSUB 1: PRINT K$;: NEXT J 960 C=L AND 255: GOSUB 1:PRINT ":";K$: NEXT I