BMP_Write_DotData

: BMP_Write_DotData

  bmp.buf 

  BMP.fSize  BMP_Y 1 + BMP.ScanLineWidth * - BMP_X  3 * +  +  >r

  BMP_R r@  2 + c! 

  BMP_G r@  1 + c! 

  BMP_B r>  0 + c! 

  ;