CLEAR ALL
BITMAP 1 TEXTURE "blobs","583113536,5,1"
TARGET BITMAP 1
SPRITE 1 BIND BITMAP 1 SHOW XYSIZE 2,2
CLS:PRINT "Blobs"
GETKEY a$
FILTER BITMAP "maketileable","64"
CLS:PRINT "Filter Make Tileable"
GETKEY a$
FILTER BITMAP "tunnel","16"
CLS:PRINT "Filter Tunnel"
GETKEY a$
FILTER BITMAP "erode"
CLS:PRINT "Filter Erode"
GETKEY a$
FILTER BITMAP "erode"
CLS:PRINT "Filter Erode"
GETKEY a$
FILTER BITMAP "dilate"
CLS:PRINT "Filter Dilate"
GETKEY a$
FILTER BITMAP "noise","1234567,1"
CLS:PRINT "Filter Noise"
GETKEY a$
FILTER BITMAP "invert"
CLS:PRINT "Filter Invert"
GETKEY a$
FILTER BITMAP "maketileable","64"
CLS:PRINT "Filter Make Tileable"
GETKEY a$
SPRITE 1 TILE
CLS:PRINT "Tile"
