Date : Fri, 10 Mar 2006 22:56:18 -0000
From : "David Hunt" <dm.hunt@...>
Subject: Re: Mandelbrot plot times & host speedups
> Saved 9s. It's not so much "longer intervals between keyboard scans" as
> "anything hanging off the 100Hz tick is much slower".
>
> > - February 1988, p.89. Don't sample any ADC channels:
> > *FX 16,0
>
> Saved 3s, and at least left the machine useable,
> Sprow.
I've incorporated the above into this release;
10 MODE2:VDU23;8202;0;0;0;
20 *FX9
30 *FX151,69,255
40 *FX151,70,255
50 C%=0:AR=-2.1:AI=-1.2:S=3:D=S/1280:G%=0:TIME=0
60 REPEAT
70 FORY%=C%TO1024STEP16
80 U%=0:G%=0
90 FORX%=0TO1280STEP8
100 CR=X%*D+AR:CI=Y%*D+AI:ZR=CR:ZI=CI:I%=0
110 REPEAT:A=ZR*ZR:B=ZI*ZI:ZI=2*ZR*ZI+CI:ZR=A-B+CR:I%=I%+1:UNTIL
A+B>4 OR I%>15
140 IFG%<>I%THENGCOL0,G%:G%=I%:MOVEU%,Y%:DRAWX%,Y%:U%=X%
150 NEXT
160 GCOL0,I%:DRAW 1280,Y%
170 NEXT
180 C%=C%+2
190 UNTIL C%=16
200 T%=TIME
210 *FX151,69,14
220 *FX151,70,12
230 P=GET
240 PRINT;T%DIV6000;"m ";T%DIV100MOD60;"s ";T%MOD100;"0 ms"
LookOut has a bug, I deleted (well, I pressed delete and it disappeared) the
last post as it was in error, it sent it even though it has no record of
sending it. Good old Micro$oft. I exported the code to a text file, dragged
it onto a disc image in Jon Welch's DFS Explorer, then ran BeebEm and
*EXECed the file and there it is. Works the same with a real Beeb, replace
BeemEm with Omnidisc and make the image then turn to your trusty Beeb and
it's a go.
Dave ;)