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 >
Commodore BASIC  |  2022-10-26  |  466b  |  14 lines
  1. 100 data 169,24,133,43,169,121,133,44,169,37,133,45,169,133,133,46,169,45
  2. 110 data 141,25,3,141,23,3,169,152,141,24,3,141,22,3,169,177,141,248,7,169
  3. 120 data 120,141,0,208,169,52,141,1,208,169,30,141,24,208,169,14,141,39,208
  4. 130 data 169,8,76,210,255
  5. 140 fori=1to62:reada:b=b+a:next
  6. 150 if b<>6718 thenprint"fehler in datas":end
  7. 160 print"diskette einlegen! <return>"
  8. 170 geta$:ifa$<>chr$(13)then170
  9. 180 restore
  10. 190 open2,8,2,"viza.patch,p,w"
  11. 200 print#2,chr$(0);chr$(4);: rem ladeadresse $0400
  12. 210 fori=1to62:reada:print#2,chr$(a);:next
  13. 220 close2
  14.