05-07-2022, 04:49 PM
A quick proof of concept for reflecting an image using _PutImage
Code: (Select All)
_Title "Reflection of an image" ' b+ 2022-05-07
Screen _NewImage(200, 300, 32)
_ScreenMove 400, 200
img& = _LoadImage("qb64.png")
_PutImage (0, 0)-(199, 199), img&, 0
_PutImage (0, 200)-(199, 299), img&, 0, (0, _Height(img&) - 1)-(_Width(img&) - 1, 0)
Line (0, 199)-(199, 200), &HFF000066, BF
Sleep
b = b + ...