Re: RE: assembly
- Posted by Jiri Babor <jbabor at PARADISE.NET.NZ> Oct 08, 2001
- 390 views
Sorry, I was in a bit of a rush... The second block should, obviously, read: for b = 1 to 256 do a[b] = phl[b][2] x1[b] = phl[b][1][1] - 2 y1[b] = phl[b][1][2] - 2 x2[b] = phl[b][1][1] + 1 y2[b] = phl[b][1][2] + 1 end for I am of course assuming you can prepare your data ahead of time ;) jiri ----- Original Message ----- From: "Jiri Babor" <jbabor at PARADISE.NET.NZ> To: "EUforum" <EUforum at topica.com> Sent: Tuesday, 9 October 2001 09:18 Subject: Re: RE: assembly > > -- decompose phl sequence - try something like this: > > a = repeat(0, 256) > x1 = a > x2 = a > y1 = a > y2 = a > > for b = 1 to 256 do > a = phl[b][2] > x1 = phl[b][1][1] - 2 > x1 = phl[b][1][2] - 2 > x1 = phl[b][1][1] + 1 > x1 = phl[b][1][2] + 1 > end for > > > -- then one level indexing is MUCH faster: > > for b = 1 to 256 do > if a[b] = i then > ellipse(a[b], 1, {x1[b], y1[b]}, {x2[b], y2[b]}) > end if > end for > > -- jiri > > >