Re: Platform for BASIC?

[Phoenyx <quazar@dcnet2000.com>]

After playing with it a bit, I found one command that I know is
wrong. The fill command should be FILL WITH #value. So in the
prior list, just combine the FILL and the WITH which follows it.

Some of the commands are curious. For instance, turn on graphics
with the GRAPHMODE command, by default this turns on lores
graphics. Use HIRES to switch to the hires screen. By default, the
screen is not cleared. Here's a simple setup example.

5 REM SETUP GRAPHICS MODE
7 REM USE HIRES, TEXTMODE, LORES, MIXED
8 REM AND FULLPAGE FOR SCREEN VIEW TOGGLES.
10 HIRES : SCREEN 0 : FILL WITH 3 : GRAPHMODE

SCREEN works with a value of 0 or 1. It sets the screen in which
to draw. The hires screen 0 is always visible. If you draw on the
secondary screen (SCREEN 1) use the command SUPERIMPOSE. It will
copy the second page to the first. This makes for some really cool
program possibilities.

Here's the simple test program I used. Note, the parser replaces
the colon symbol normally used to separate Applesoft tokens with
spaces. It will not always do this though. For example, the code
below uses three functions. Between the HIRES and SCREEN commands
the space is used but, between the SCREEN 0 and FILL WITH 0
command, the colon must be there. I got some weird errors when I
didn't use colons, so I suggest you use them always in the input
line and let the parser do it's thing.

10 HIRES   SCREEN 0: FILL WITH 0

The program if saved, is saved as a BAS file. This might be a bit
confusing. Here I recommend you include a REM line at the top of
the file which states the program uses SBASIC.

Another note, I tested this on a GS. When inputting as lowercase,
the parser got confused. To avoid this, just use the capslock
key.

5 REM -={ LINES 10 - 20 SETUP SCREEN 0 AND SHOW IT  }=-
6 REM -={ LINE 25 PAUSES                            }=-
7 REM -={ LINE 30 - 50 DRAW ON SECONDARY SCREEN     }=-
8 REM -={ AND COPY IT TO THE MAIN (VIEW) SCREEN     }=-
9 REM -={ PAUSE THEN SUPERIMPOSE AND PAUSE AND EXIT }=-
10 HIRES :  SCREEN 0 : FILL WITH 0
20 GRAPHMODE
25 GET A$
30 SCREEN 1: FILL WITH 0
40 HCOLOR= 3 : HPLOT 0,0 TO 100,100
45 GET A$
50 SUPERIMPOSE
60 GET A$
70 TEXTMODE : END

-- 

Thank you for your time and interest. I hope it was helpful
or at least interesting.

Phoenyx,

Apple2 user since March 1984

Links to Phoenyx's pages:
preferred..... http://zip.to/Phoenyx_A2
alternate..... http://www.tinyangeldesigns.com/Apple2