home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 7 / 64er_Magazin_Sonderheft_07_86-07_1986_Markt__Technik_de_Side_A.d64 / hires-reset (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1986-01-01  |  218 b   |  7 lines
  1. 51000 rem grafikpunkt loeschen (hi-res)
  2. 51010 ga=8192:rem startadresse grafikspeicher
  3. 51020 ad=320 * int(y/8) + (y and 7) + (8 * int(x/8)):rem adresse berechnen
  4. 51030 bn= 7-(x and 7):rem bitnummer
  5. 51040 poke ga+ad, peek(ga+ad) and (255-2^bn)
  6. 51050 end
  7.