Blending two images

[Ikerkaz]

Code: (Select All)

Screen _NewImage(800, 600, 32)

image& = _LoadImage("1.png", 32)
W = _Width(image&): H = _Height(image&)

newimage& = _NewImage(W - 1, H - 1, 32)

_PutImage (W \ 2, 0)-(W, H), image&, newimage&, (W \ 2, 0)-(W, H) 'right half
_PutImage (0, 0)-(W \ 2, H), image&, newimage&, (W, 0)-(W \ 2, H) 'left half

_PutImage (100, 100), newimage& 'place done image

PutImage is enought for this use.

Thank you Petr... I tried your code with my image, and this is the output:



This is not what I am looking for...




This is my original image. I would like to paint two of them very close without problems. I don't know if it is possible in QB64... anyway thank you very much.