Was ist denn das ??? -- Schneider CPC ?

[eto]

Ja, OK können wir machen. Schike mir den Code.
Mach Dir keine Gedanken wg. Porto. Das verkrafte ich  ;-)

Code Select Expand


100 DEFINT a-z
110 MEMORY &3EFF
120 cs=0
130 DATA E,7,CD,F,B9,78,32,26
140 DATA 3F,79,32,27,3F,21,0,C0
150 DATA 11,0,40,1,0,40,ED,B0
160 DATA 3A,27,3F,4F,CD,F,B9,3A
170 DATA 26,3F,CD,C,B9,C9,8D,0
180 FOR i=&3F00 TO &3F27:READ a$:v=VAL("&"+a$):POKE i,v:cs=cs+v:NEXT
190 IF cs<>3301 THEN PRINT "check data values":END
200 FOR i=2 TO 6
210 POKE &3F01,i:REM ROM number
220 CALL &3F00
230 s$="dump"+HEX$(i,1)+".rom"
240 PRINT "save rom";i
250 SAVE s$,b,&4000,&4000
260 NEXT


Zeile 200 bitte dann noch in "for i=8 to 15" ändern und auf Seite B ausführen. Ich vermute dass es das nicht braucht, aber sicher ist sicher.

Du hast eine PM mit meiner Adresse.

1000 Dank

[TFM]

Falls dabei ein DSK rauskommt, dann bitte hier einstellen. 

[eto]

Diskette ist unterwegs.

Wenn ich sie zurück bekommen, schau ich mir die ROM Dumps an und lade die relevanten ROMs natürlich hier hoch.

[xesrjb]

Diskette ist unterwegs.

Wenn ich sie zurück bekommen, schau ich mir die ROM Dumps an und lade die relevanten ROMs natürlich hier hoch.

...und, schon was erhalten?

xesrjb

[Raineu]

... am 8.12.22 per Brief raus.

[eto]

Diskette kam heute wieder an. Montag werde ich es mir ansehen.

[TFM]

Danke Euch beiden!