REM ***********************************************
REM Title: pDot
REM Author: Coding Fodder
REM Downloaded from: http://dbcc.zimnox.com/
REM ***********************************************
 
function pDot(x as integer, y as integer, color_value as dword )
   if x > 0 and x < width and y > 0 and y < height
      start = get pixels pointer()
      repeat_number = get pixels pitch()
      bits_per_pixel = bitmap depth(num)/8
      pointer = start + y*repeat_number + x*bits_per_pixel
      *pointer = color_value
   endif
endfunction