This commit is contained in:
visionmercer 2026-05-27 13:52:39 +02:00
commit a746bef31c

View file

@ -76,7 +76,7 @@ dim oldheight as integer
oldwidth=_width
oldheight=_height
do
' 1. Check for window resizing first
' Check for window resizing first
if checkresize(_source)=-1 then
diffx=_width-oldwidth
diffy=_height-oldheight
@ -86,10 +86,9 @@ do
oldheight=_height
end if
' 2. Clear the screen BEFORE drawing anything for this frame
line (0,0)-(_width-1,_height-1),backgroundcolor1,bf
cls ,backgroundcolor1
' 3. Process all inputs and update offsets FIRST
' Process all inputs and update offsets
while _mouseinput:mw=mw+_mousewheel:wend
mouseclicked=0
rmouseclicked=0
@ -98,7 +97,7 @@ do
mousedown=_mousebutton(1)
rmousedown=_mousebutton(2)
' Panning (Middle Mouse)
' Panning
if _mousebutton(3) then
state.offsetx=state.offsetx+(_mousex-lastmx)
state.offsety=state.offsety+(_mousey-lastmy)
@ -150,13 +149,11 @@ do
end if
end select
' 4. Draw everything using the freshly updated math
canvas
if showtoolbox then toolbox
if showcolorpicker then colorpicker
if showcommands then commandlist
' 5. Flip the buffer to the monitor cleanly
_limit 30
_display
loop