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

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-29 01:35 +0000
Organization	Mac GUI
Message-ID	<mmphosis-1335663325@macgui.com> (permalink)
References	<4f966e32$0$12520$ba4acef3@reader.news.orange.fr> <mmphosis-1335568130@macgui.com> <2139877211357269825.977594mjmahon-aol.com@news.giganews.com>

Show all headers | View raw

Un exemple de comment faire l'écran bleu HGR, en utilisant Applesoft POKE:

1 FOR I=B TO E:POKE I,C:I=I+U:POKE I,D:NEXT:IF B THEN RETURN
20 B = 8192 :REMau debut de HGR
30 E = 24567:REMfin de HGR
40 C = 213  :REMbyte0 bleu
50 D = 170  :REMbyte1 bleu
60 U = 1    :REMun
100 REMhaute resolution
110 POKE 49293,0
120 REMen plein ecran
130 POKE 49234,0
140 REMla premiere page
150 POKE 49236,0
160 REMgraphique
170 POKE 49232,0
180 GOSUB 1
190 GET K$:TEXT

Une façon plus rapide de faire le bleu écran HGR, dans Applesoft sans
utiliser POKE:

HGR:POKE49234,0:HCOLOR=6:HPLOT 0,0:CALL-3082:WAIT49152,128:POKE49168,0: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