Tut mir wirklich leid wollte ja eigentlich Montag morgen schon schreiben hatte aber kaum Zeit und jetzt ist schon Donnerstag...

Auf jedenfalls ich habe aber schon versucht ein Lösung für dein Problem zu finden.
Also habe ich versucht aus deinem kleinen Schnipsel nachzubauen.
Von Dir:
"Sprites werde geladen", wollte ich jetzt nicht alles aufzählen.
SYSTEMPOINTER TRUE
GLOBAL PLAYER AS TYPEPLAYER
GLOBAL MAP AS TYPEMAP
GOSUB INIT
WHILE TRUE
GOSUB UPDATE
SHOWSCREEN
WEND
Versuch doch mal das in deinem Schnipsel einzusetzen
Beispiel:
"Sprites werde geladen", wollte ich jetzt nicht alles aufzählen.
SYSTEMPOINTER TRUE
GLOBAL color1,color2,button1,button2,button3
GLOBAL mx,my,mb1,mb2
color1 = RGB(0x80, 0xff, 0xff)
color2 = RGB(0xff, 0xff, 0xb0)
GLOBAL PLAYER AS TYPEPLAYER
GLOBAL MAP AS TYPEMAP
GOSUB INIT
WHILE TRUE
button1 = FALSE
button2 = FALSE
button3 = FALSE
FOR i = 0 TO 2 // 3 x Mouse
SETACTIVEMOUSE i
MOUSESTATE mx,my,mb1,mb2
IF (i = 0 AND mb1 AND mx > 0 AND mx < 100 AND my > 0 AND my < 50) OR (i = 1 AND mb1 AND mx > 0 AND mx < 100 AND my > 0 AND my < 50) OR (i = 2 AND mb1 AND mx > 0 AND mx < 100 AND my > 0 AND my < 50)
button1 = TRUE
ENDIF
/////////////////////////////////////////
IF (i = 0 AND mb1 AND mx > 0 AND mx < 100 AND my > 100 AND my < 150) OR (i = 1 AND mb1 AND mx > 0 AND mx < 100 AND my > 100 AND my < 150) OR (i = 2 AND mb1 AND mx > 0 AND mx < 100 AND my > 100 AND my < 150)
button2 = TRUE
ENDIF
/////////////////////////////////////////
IF (i = 0 AND mb1 AND mx > 0 AND mx < 100 AND my > 200 AND my < 250) OR (i = 1 AND mb1 AND mx > 0 AND mx < 100 AND my > 200 AND my < 250) OR (i = 2 AND mb1 AND mx > 0 AND mx < 100 AND my > 200 AND my < 250)
button3 = TRUE
ENDIF
/////////////////////////////////////////
IF button1 = FALSE
DRAWRECT 0,0,100,50,color1
ELSE
DRAWRECT 0,0,100,50,color2
ENDIF
IF button2 = FALSE
DRAWRECT 0,100,100,50,color1
ELSE
DRAWRECT 0,100,100,50,color2
ENDIF
IF button3 = FALSE
DRAWRECT 0,200,100,50,color1
ELSE
DRAWRECT 0,200,100,50,color2
ENDIF
NEXT
GOSUB UPDATE
SHOWSCREEN
WEND
Hat bei mir jetzt Funktioniert ich kenne jetzt aber auch nicht dein Projekt.
Versuch es mal wen es noch nicht geht sag bescheid.