Groups > comp.sys.apple2.programmer > #282

Re: applesoft basic : how to poke hires screen

From	mmphosis@macgui.com ( mmphosis)
Newsgroups	comp.sys.apple2.programmer
Subject	Re: applesoft basic : how to poke hires screen
Date	2012-04-27 23:08 +0000
Organization	Mac GUI
Message-ID	<mmphosis-1335568130@macgui.com> (permalink)
References	<4f966e32$0$12520$ba4acef3@reader.news.orange.fr>

Show all headers | View raw

An example of how to make the HGR2 screen orange, in Applesoft using POKE:

1 FOR I=B TO E:POKE I,C:I=I+U:POKE I,D:NEXT:IF B THEN TEXT:END              

20 B = 16384:REMstart of HGR2
30 E = 24567:REM  end of HGR2
40 C = 170  :REMorange byte0
50 D = 213  :REMorange byte1
60 U = 1    :REMone
100 REMhi-resolution
110 POKE -16297,0
120 REMfull screen
130 POKE -16302,0
140 REMsecond page
150 POKE -16299,0
160 REMgraphics
170 POKE -16304,0
180 GOTO 1

A faster way to make the HGR2 screen orange, in Applesoft without using
POKE:

HGR2:HCOLOR=5:HPLOT 0,0:CALL-3082:TEXT

Back to comp.sys.apple2.programmer | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

applesoft basic : how to poke hires screen andré lozano <nws@provsoire.com> - 2012-04-24 11:11 +0200
  Re: applesoft basic : how to poke hires screen dempson@actrix.gen.nz (David Empson) - 2012-04-24 23:07 +1200
    Re: applesoft basic : how to poke hires screen andré lozano <nws@provsoire.com> - 2012-04-24 14:23 +0200
  Re: applesoft basic : how to poke hires screen mmphosis@macgui.com ( mmphosis) - 2012-04-27 23:08 +0000
    Re: applesoft basic : how to poke hires screen Michael J. Mahon <mjmahon@aol.com> - 2012-04-27 20:40 -0500
      Re: applesoft basic : how to poke hires screen mmphosis@macgui.com ( mmphosis) - 2012-04-29 01:35 +0000
        Re: applesoft basic : how to poke hires screen "Bill Garber" <willy46pa@comcast.net> - 2012-04-28 23:58 -0400
        Re: applesoft basic : how to poke hires screen andré lozano <nws@provsoire.com> - 2012-05-02 19:54 +0200
    Re: applesoft basic : how to poke hires screen mmphosis@macgui.com ( mmphosis) - 2012-05-01 23:20 +0000
  Re: applesoft basic : how to poke hires screen aiiadict@gmail.com - 2012-05-26 09:21 -0700
    Re: applesoft basic : how to poke hires screen aiiadict@gmail.com - 2012-05-26 09:25 -0700
      Re: applesoft basic : how to poke hires screen "Michael J. Mahon" <mjmahon@aol.com> - 2012-05-26 23:42 -0700

csiph-web