home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 65
/
64er_Magazin_Sonderheft_65_19xx_Markt__Technik_de_Side_A.d64
/
einbindungs-bsp.
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
432b
|
14 lines
10 rem bilddaten logo-painter laden
20 rem von nikolaus heusler 2.91
30 ifa=0thena=1:load"screen*",8,8:rem bilddaten laden
40 ifa=1thena=2:load"char*",8,8:rem zeichensatz laden
50 print"[147]"
60 fori=0to239
70 poke1384+i,peek(6144+i):rem bilddaten umkopieren
80 poke55656+i,9:rem farbe setzen
90 next
100 poke53272,24:rem zeichensatz einschalten
110 poke53270,216:rem multicolor einschalten
120 poke53280,0:poke53281,0:rem hintergrundfarbe
130 poke53282,11:poke53283,15:rem multicolor-farben