[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: ASCII art / FIGlet
- Subject: Re: ASCII art / FIGlet
- From: "Craig Bower" <to.email.me@post.a.request.message>
- Date: Mon, 07 Mar 2005 04:25:24 GMT
- Newsgroups: comp.sys.apple2
- References: <1gt0j4m.s2ov6nlneoN%email@DELETE_THIS.luddite.no-ip.com> <kNNWd.4379$i6.2547@edtnps90> <1gt0mhu.1s2emmo12tmxd0N%email@DELETE_THIS.luddite.no-ip.com> <wlQWd.11849$KI2.3889@clgrps12>
- Reply-to: "Craig Bower" <to.email.me@post.a.request.message>
- Xref: g2news1.google.com comp.sys.apple2:9214
"Craig Bower" <to.email.me@post.a.request.message> wrote in message
news:wlQWd.11849$KI2.3889@clgrps12...
Correction: This won't work! :(
> 110 GR
> 110 FOR I = 8192 TO 9210
> 115 REM ** TO 9210 should really be 9216, but is safety
> 116 REM ** net for any resident applesoft program.
> 120 POKE 9216 - I , PEEK(I)
> 130 NEXT I
Try this instead:
110 GR : X = 0
110 FOR I = 8192 TO 9210
120 POKE 1024 + X , PEEK ( I )
130 X=X+1
140 NEXT I
It's still not even remotely pretty ASCII art at the
end, but it'll get you started with more complex
displays.
Later,
Craig