GLBasic forum

Main forum => Bug Reports => Topic started by: Markus on 2012-Apr-23

Title: (Erledigt) HIBERNATE & MOUSEAXIS
Post by: Markus on 2012-Apr-23
Ich habe eben durch Zufall die HIBERNATE Funktion gefunden.
Die ist ganz nützlich.
Aber sobald ich die einbaue bekommt man von MOUSEAXIS keine gescheiten Werte mehr.
MouseWheel z.B. kommt noch ab und an ganz kurz durch und Geschwindigkeit ist 0.

Code (glbasic) Select

REPEAT

GETSCREENSIZE w,h
STRETCHSPRITE bgsprite3, 0, 0, w, h

//0=X - Geschwindigkeit
//1=Y - Geschwindigkeit
//2=Rad (1 auf, -1 ab)
//3=linke Maustaste
//4=rechte Maustaste
//5=mittlere Maustaste

mxsp%=MOUSEAXIS(0)
mysp%=MOUSEAXIS(1)

wheel%=MOUSEAXIS(2)
bm%=MOUSEAXIS(5)

b1click=b1
b2click=b2
MOUSESTATE mx,my,b1,b2
IF b1<>b1click AND b1=1
b1click=TRUE
ELSE
b1click=FALSE
ENDIF
IF b2<>b2click AND b2=1
b2click=TRUE
ELSE
b2click=FALSE
ENDIF

keyasc$ = INKEY$( )
keycode% = KEY(1) //ESC

//...

PRINT "mx="+mx+" my="+my + " b1click="+b1click,0,0
PRINT "mxsp="+mxsp+" mysp="+mysp +" wheel=" + wheel,0,16

SHOWSCREEN
HIBERNATE //dann geht mein Mouse Move nicht mehr und das Wheel

UNTIL FALSE
Title: Re: HIBERNATE & MOUSEAXIS
Post by: Kitty Hello on 2012-Apr-24
pack das HIBERNATE vor das Showscreen?
Title: Re: HIBERNATE & MOUSEAXIS
Post by: Markus on 2012-Apr-24
@Kitty Hello
jo, das geht dann, danke.

Habs aus dem Beispiel in der Hilfe, also da stand das drunter.
Die könnte nun einen Kommentar gebrauchen :-)