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

Re: Bill Budge Preshift-table graphics

From	aiiadict@gmail.com
Newsgroups	comp.sys.apple2.programmer
Subject	Re: Bill Budge Preshift-table graphics
Date	2012-07-15 11:12 -0700
Organization	http://groups.google.com
Message-ID	<6eda28a1-5185-4cc6-a078-2cf46a6c1505@googlegroups.com> (permalink)
References	<f096e2ae-eccf-47a2-b996-82ba7b4db5a1@googlegroups.com>

Show all headers | View raw

On Sunday, July 15, 2012 8:15:46 AM UTC-7, (unknown) wrote:
> http://rich12345.tripod.com/preshift/index.html
> 
> 
> I finally got it to display garbage on HGR screen.
> 
> Check out the disk image if you have time, maybe
> proofread it?  I have tried over and over to get
> it to work.

Following this post is listing 5.

It loads preshift table (created by listing 2)
         div7 table (created by listing 4)
         hires1 table (created by listing1)

Line 63010 attempts to POKE some data into RAM using a monitor command...

I couldn't get this to work, so I manually entered the data, BSAVED it, and created a LISTING5 MOD(ified) program.  This modified listing5 skips trying to poke QQ$ into RAM through the monitor, BLOADS the data at the correct spot.

According to the article, this is the shape to be moved around the screen (an arrow pointing diagonally left, up)


Listing 5:


190 home:print "creating tablpak...."
200 tblsiz = 32
240 d$=chr$(4)
250 print d$;"BLOAD PRESHIFT TABLE,A$4000"
260 PRINT D$;"BLOAD DIV7 TABLE,A$4E00"
270 PRINT D$;"BLOAD HIRES1 TABLE,A$5000"
550 QQ$ = "5180:0D 0D 02 00 00 00 00 7C OF 7C 07 7C 03 7C 01 7C 03 7C 07 5C 0F 0C 1F 04 0E 00 04 00 00 00 00"
560 GOSUB 63000
610 PRINT D$;"BSAVE TABLPAK,A$4000,L";4480+TBLSIZ
615 PRINT :?"FILE SAVED TO DISK"
620 END
63000 QQ$=QQ$+" ND9C6G"
63010 FOR QQ = 1 TO LEN(QQ$):POKE 511+QQ,128+ASC(MID$(QQ$,QQ,1)):NEXT
63020 POKE 72,0:CALL -144
63030 RETURN

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

Thread

Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-15 08:15 -0700
  Re: Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-15 11:12 -0700
  Re: Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-15 11:19 -0700
    Re: Bill Budge Preshift-table graphics twalkowski <twalkowski32@att.net> - 2012-07-15 19:46 -0700
      Re: Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-16 08:02 -0700
        Re: Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-16 11:28 -0700
        Re: Bill Budge Preshift-table graphics twalkowski <twalkowski32@att.net> - 2012-07-16 11:23 -0700
          Re: Bill Budge Preshift-table graphics Michael J. Mahon <mjmahon@aol.com> - 2012-07-19 02:00 -0500
            Re: Bill Budge Preshift-table graphics twalkowski <twalkowski32@att.net> - 2012-07-19 07:34 -0700
            Re: Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-19 08:06 -0700
  Re: Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-16 08:04 -0700
  Re: Bill Budge Preshift-table graphics aiiadict@gmail.com - 2012-07-17 19:41 -0700

csiph-web