ein parr Bilder CPC 6128

[EBO]

Ich habe noch mehr Bilder für euch wo ich selper Umgewadelt habe
Die Bilder sind für den CPC 6128 gedacht
Wer lust hat kann sie runterladen

[Devilmarkus]

Danke Dir.
Was leider fehlt, ist jegliche Angabe von Palette, Mode und so.
Hast Du auch ein Programm zum Anzeigen?

[EBO]

10 mode 2
20 Load"Bild.scr",&c000


Das reich doch oder

[Devilmarkus]

Ja. Auch, wenn ein Paar in MODE 1 sind

Mit welchem Programm hast Du denn die Bilder gemacht?
Scanner? Digicam am CPC?

[EBO]

Mit dem Program geht es ser schnell

Brauchst du auch noch andere Bilder

[Devilmarkus]

Ich mache meine Bilder selber in JavaCPC -> Da ist eine komplette Paint-Anwendung drin enthalten.
Sie kann noch wesentlich mehr, als nur Bilder umwandeln...

Aber Pixel doch mal selber Bilder... Umwandeln kann ja jeder...

[TFM]

So ein einfacher Lader in Basic wäre nicht schlecht,  vor allem um die Farben zu setzen.

Danke für die Bilder.

Schönes WE Euch allen: 

[EBO]

5´Vom EBO
10 INK 0, 26: INK 1, 0: BORDER 26: MODE 2 
20 FOR x=1 TO 10
30 READ x$   
40 `Bilder Namen eingeben
50 DATA KATZE1  .SCR,KATZE2  .SCR,SCHLUMF1.SCR,SCHLUMF2.SCR,SCHLUMF3.SCR,SCHLUMF4.SCR,SCHLUMF5.SCR,SCHLUMF6.SCR,SCHLUMF7.SCR,SCHLUMF
8.SCR
50 LOAD x$   
60 PRINT x$
70 NEXT   
80 PRINT"ENDE

[Devilmarkus]

Korrektur:

Code Select Expand

5´Vom EBO
10 INK 0,26:INK 1,0:BORDER 26:MODE 2
20 FOR x=1 TO 10
30 READ x$   
40 `Bilder Namen eingeben
50 DATA "KATZE1","KATZE2","SCHLUMF1","SCHLUMF2","SCHLUMF3","SCHLUMF4","SCHLUMF5","SCHLUMF6","SCHLUMF7","SCHLUMF8"
50 LOAD x$+".SCR"
60 PRINT x$:CALL &BB18
70 NEXT
80 PRINT"ENDE"

[TFM]

Und auf welche DSK soll das jetzt drauf? Sorry, aber das war es echt besser das DSK auf den neuesten Stand zu bringen. Müsst ihr aber wegen mir nicht machen.

[Devilmarkus]

Auf das Blaue.

[TFM]

Und ich dachte schon auf das klassische.

[EBO]

Nach besserung  Von EBO   

Code Select Expand

5 'Vom EBO
10 INK 0,26:INK 1,0:BORDER 26:MODE 2
20 FOR x=1 TO 10
30 READ x$   
40 'Bilder Namen eingeben
50 DATA KATZE1,KATZE2,SCHLUMF1,SCHLUMF2,SCHLUMF3,SCHLUMF4,SCHLUMF5,SCHLUMF6,SCHLUMF7,SCHLUMF8
55 LOAD x$+".SCR"
60 PRINT x$:CALL &BB18
70 NEXT
80 PRINT"ENDE"

Verwende bitte den Code-Tag!!!!!!!!!!!!!!!!!!!

[Devilmarkus]

Strings in Datazeilen setzt man immer in Anführungszeichen.
So kann es nicht passieren, dass Leerzeichen ignoriert werden.

[TFM]

Stimmt, denn die Dateinamenauswertungsroutine des CPC-OS hat dann alle Hände voll damit zu tun diese verlorenen Leerzeichen (Lost Spaces - the movie!) wieder einzufügen!

Es ist ja nicht so, dass es hier um Erdnusse geht, nein... 

Wir reden hier von einer Zeitverschwendung im Bereich von einigen Dutzen Mikrosekunden! Und das muss ja nicht sein ;-)