Posted By
Csabo
on 2020-11-04
17:28:24
|  Re: ASCII Art Mandelbrot
Here's what I was talking about above (disabling $0312/$0314). This gives roughly a 3% speedup, doesn't reduce the available memory and it can be used with Litwr's program. The downside is that keyboard handling, etc which is provided by those routines are not available.
0 FORI=1TO68STEP2
1 V$=MID$("A2548AA003D006A942A20EA0CE788D12038C13038E14038C150358600E09FF4CBEFC",I,2)
2 POKE824+I/2,DEC(V$):NEXT
A little test for it:
4 SYS824
5 FORI=0TO200:V=INT(I/3):PRINTV;:NEXTI
6 SYS831
SYS824 turns those routines off, SYS831 puts everything back to normal.
|
