home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1990 November
/
64er_Magazin_90-11_1990_Markt__Technik_de_Side_A.d64
/
makechr
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
426b
|
11 lines
1 poke56334,0:poke1,51:fora=0to1023:poke8192+a,peek(56320+a):next:poke1,55
2 poke56334,1:fora=1to6:readc:forb=0to7:readd:pokec+b,d:next:next
3 open1,8,1,"plachrs":print#1,chr$(0)chr$(204);
4 fora=8192to9215:print#1,chr$(peek(a));:next:close1
10 data8664,153,255,195,249,193,153,193,255
11 data8424,153,231,195,153,129,153,153,255
12 data8656,153,255,195,153,153,153,195,255
13 data8408,153,195,153,153,153,153,195,255
14 data8192,153,255,153,153,153,153,193,255
15 data9168,153,219,153,153,153,153,195,255