aUCBLogo Demos and Tests / bitfilltest


to bitfilltest
   clearScreen
   disableLineSmooth
   box
   PenUp setXY -100 -100
   bmp=BitCopy 200 200
   BitFill bmp (BitMaxX bmp)*0.6 (BitMaxY bmp)*0.6
   Home
   setXY -100 -100
   BitPaste bmp
   Home
   PenDown
end