Posted by Jaz on 1998-03-02
I have an array, 54 bytes in size (1-dimensional) eaach byte is either 0 or 1. These "0"s and "1"s, put in a 6*9 pixels large rectangle result in a small icon: 000000 011100 111 100010 1 1 100010 1 1 100010 1 1 111110 11111 100010 1 1 100010 1 1 000000 This would be the letter "A". What is the fastest way to turn the array data into the icon (the "1"s should get drawn pixels, nothing should be drawn at the "0" positions) with Pascal? This is going to be a text output routine so I need a really fast Pascal or Assembler routine (please no for x := 0 to 5 do for y := 0 to 8 do if array[y*6+x] = 1 then putpixel(x,y) ... ). Jaz --- luna.kil@xxxxxxx.xxx === member of the Coder's Guild: --- http://www.paracatz.com/codersguild/
Previous post | Next post | Timeline | Home