creiman@headroom.ncsa.uiuc.EDU (Chuck Reiman) (03/07/91)
Hey folks! I was thinking you all must be getting tired of
postings about postings, postings about groups, postings
about ideas etc, so I thought I'd post an ACTUAL PROGRAM!
What a concept!
The program is based on an old apple ][ program that simply
drew cool graphic images on the hi-res screen. It was
written in Applesoft, I seem to remember it was called
Brian's Folley. Don't quote me though.
Anyway the HP version isn't quite so impressive. It takes
about a minute to draw the full image, then it leave you
in scrolling mode so you can look at the whole thing. The
entire graphic is 131x131, but you can rewrite the code
easily once you understand the basic idea.
This will give you something to try DISS on!
Later,
Charlie Reiman
%%HP: T(3)A(D)F(.);
\<< PICT PURGE # 131d
# 131d PDIM { # 0d
# 33d } PVIEW 0 130
FOR i # 130d i
R\->B DUP 3 ROLLD -
DUP # 0d 2 \->LIST 3
PICK # 130d 2 \->LIST
TLINE # 130d SWAP 2
\->LIST SWAP # 0d
SWAP 2 \->LIST TLINE
NEXT { } PVIEW
\>>
-----------
I'm a Comp E. and I'm okay, Charlie Reiman
I work all night and I work all day. creiman@ncsa.uiuc.edu
I SKIP and JUMP, c-reiman@uiuc.edu
I crash PCs, National Center for
I sort with binary trees. Superb Acronyms