💾 Archived View for mirrors.apple2.org.za › archive › ground.icaen.uiowa.edu › apple8 › Pgms › hat.b… captured on 2023-01-29 at 10:55:30.

View Raw

More Information

-=-=-=-=-=-=-


On 26 Nov 2002 12:54:20 -0800, me@lazilong.com (Lazarus I. Long)
wrote:

>> I think I found it.. Sending you an e-mail with two GIF files, one
>> showing a LIST of the program, and the other a picture of the output.
>> 
>> // CHRIS
>
>oh c'mon!! Post the program source here!  :)

Here's the 2-liner (3 with the REM statement..)

0 REM MARK BUCHMAN-- AUSTIN, TX
10 HGR : FOR Z = 0 TO 10 STEP .2: FOR X = 0 TO 10 STEP .2: HCOLOR= 3:Y
= - 10 * COS (3 * SQR ((X - 5) ^ 2 + (Z - 5) ^ 2)) / 2 + 50: HPLOT X *
20 + 20 + Z * 3,Y + Z * 10
20 HCOLOR = 0: HPLOT X * 20 + 20 + Z * 3,Y + Z * 10 + 1 TO X * 20 + 20
+ Z * 3,180: NEXT : NEXT : END


I'm posting two GIF images to comp.binaries.apple2 so you can see the
output and the program listing (just in case my transcription isn't
100% accurate.)

Which leads me to an AppleWin feature Request!

How about a method for sending keystrokes (eg, Pasting) text into the
emulator.  Program source code like the above could be entered a lot
easier.

Cheers!
// CHRIS