11-15-2022, 01:58 AM
(11-15-2022, 01:49 AM)bplus Wrote: Checking out access to the Source Image, let's see if we can isolate the QB64 image in the middle third across and 1/3 down from top of QB64pe Logo. Yes and have a little fun with it!Is this picture depicting the recent diversification of QB64?
Code: (Select All)Screen _NewImage(800, 600, 32) ' screen width, height, 32 is _RGBA colors
_Delay .2
Logo& = _LoadImage("qb64pe.png")
' OK lets see if we can isolate the QB64 print from the Source side
' it looks to be the middle 1/3 going across and the top 1/3 going down
xThird = _Width(Logo&) / 3 ' = 1/3 width
yThird = _Height(Logo&) / 3
_PutImage , Logo&, 0, (xThird - 1, 0)-Step(xThird + 1, yThird + 1)
For y = 10 To _Height - 1 Step 2 * (xThird + 3)
For x = 10 To _Width - 1 Step 2 * (yThird + 3)
_PutImage (x, y), Logo&, 0, (xThird - 1, 0)-Step(xThird + 1, yThird + 1)
Next
Next
sleep
Oh looks like a pixel short at least on the Q side, a little flat. I will try and fix?
Of all the places on Earth, and all the planets in the Universe, I'd rather live here (Perth, W.A.) 