bitmap drawing

% draw a bitmap


matrix
currentmatrix           % Save scaling

10.0 10.0 translate     % origin.x origin.y
40.0 40.0 scale         % width height

40 40 8 [ 40 0 0 40 0 40]   % pixelsWide pixelsHigh bitsPerSample [ pixelsWide 0 0 pixelsHigh 0 pixelsHigh ]

{currentfile 320 string readhexstring pop} % 320 == pixelsWide*samplesPerPixel

false 8 colorimage


% bitmap hex data following ...