$Console:Only
ChDir _StartDir$

TILE$ = MKL$(&HAAFFBB55)

' Paint with tiling, no border color.
' background is left black.
'
' Result should fill the entire circle with pattern
test1& = _NewImage(128, 50, 9)
_Dest test1&

Circle (64, 25), 25, 7
Paint (64, 25), TILE$

AssertImage test1&, "tile_noborder_black_bg.png"
System

'$include:'../utilities/imageassert.bm'
