home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1986 September
/
64er_Magazin_86-09_1986_Markt__Technik_de.d64
/
viza.patch.bas
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
466b
|
14 lines
100 data 169,24,133,43,169,121,133,44,169,37,133,45,169,133,133,46,169,45
110 data 141,25,3,141,23,3,169,152,141,24,3,141,22,3,169,177,141,248,7,169
120 data 120,141,0,208,169,52,141,1,208,169,30,141,24,208,169,14,141,39,208
130 data 169,8,76,210,255
140 fori=1to62:reada:b=b+a:next
150 if b<>6718 thenprint"fehler in datas":end
160 print"diskette einlegen! <return>"
170 geta$:ifa$<>chr$(13)then170
180 restore
190 open2,8,2,"viza.patch,p,w"
200 print#2,chr$(0);chr$(4);: rem ladeadresse $0400
210 fori=1to62:reada:print#2,chr$(a);:next
220 close2