Ongoing Graphics Woe...
- Posted by John DeHope <jwap at SOUTHEAST.NET> Aug 17, 1997
- 696 views
Well I tried a generic bitmap-drawing procedure that looks like this: procedure my_display_image(sequence l, sequence b) atom offx, offy offx = l[1] - 1 offy = l[2] - 1 for x = 1 to length(b) do for y = 1 to length(b[x]) do if b[x][y] != 0 then pixel(b[x][y],{l[1]+x,l[2]+y}) end if end for end for end procedure But it was too slow. I still need to write a routine that does this quickly in 1024x768x256 graphics mode. Anybody have any ideas on how to do this? John DeHope