Author Topic: Schieberegler geht nicht / GETJOYZ?  (Read 1177 times)

Offline Markus

  • Mr. Polyvector
  • ***
  • Posts: 125
  • Offline
    • View Profile
Schieberegler geht nicht / GETJOYZ?
« on: 2012-Apr-19 »
Ich kann den Schieberegler/Schubregler von meinem Cyborg 3D Gold nicht abfragen .
Habe alle Befehle aus der Anleitung da rein getan und der Kommentar Throttle kommt von dort
aber da wird kein Wert angezeigt . Unter Windows sehe ich den Balken , der geht jedenfalls .
Bitte bitte ich brauche den Wert auch .

 :help:

Code: GLBasic [Select]
TYPE TJoy
 jn$ = "?"
 x# = 0
 y# = 0
 z# = 0
 rx# = 0
 ry# = 0
 rz# = 0
 b%[32]
 dx# = 0
 dy# = 0
 
 FUNCTION Get: n //0 bis 9
        self.jn$ = GETJOYNAME$(n)
        self.x = GETJOYX(n)
        self.y = GETJOYY(n)
        self.z = GETJOYZ(n) // Throttle / Schieberegler geht nicht
        self.rx = GETJOYRX(n)
        self.ry = GETJOYRY(n)
        self.rz = GETJOYRZ(n)
        LOCAL bu
        FOR bu=0 TO 31
         self.b[bu] = GETJOYBUTTON(n, bu) //0-31 Buttons
        NEXT
        self.dx = GETDIGIX(n) // Hat switch
        self.dy = GETDIGIY(n)
 ENDFUNCTION

 FUNCTION Draw:
        LOCAL py=0,sy=10
        PRINT self.jn$ ,0,py ; py=py+sy
        PRINT "x "+self.x ,0,py ; py=py+sy //Links & Rechts
        PRINT "y "+self.y ,0,py ; py=py+sy //Oben & Unten
        PRINT "z "+self.z ,0,py ; py=py+sy
        PRINT "rx "+self.rx ,0,py ; py=py+sy
        PRINT "ry "+self.ry ,0,py ; py=py+sy
        PRINT "rz "+self.rz ,0,py ; py=py+sy //drehen
        LOCAL bu
        FOR bu=0 TO 31
                PRINT "b "+self.b[bu] ,0,py ; py=py+sy  //button
        NEXT
        PRINT "dx "+self.dx ,0,py ; py=py+sy //-1 links nach 1 rechts
        PRINT "dy "+self.dy ,0,py ; py=py+sy //-1 oben nach 1 unten
 ENDFUNCTION
 
ENDTYPE

LOCAL Joy AS TJoy
LOCAL n = GETNUMJOYSTICKS( )
//PRINT "Anzahl " + n,0,0
//SHOWSCREEN
//KEYWAIT

n = 0
Joy.Get(n)

LOCAL Liste[] AS TJoy
DIMPUSH Liste[], Joy

ALLOWESCAPE TRUE

REPEAT
        FOREACH Joy IN Liste[]
                Joy.Get(0)
                Joy.Draw()
                //DELETE Joy
        NEXT
        SHOWSCREEN
UNTIL FALSE
END
 

Offline Kitty Hello

  • code monkey
  • Administrator
  • Prof. Inline
  • *******
  • Posts: 10689
  • here on my island the sea says 'hello'
    • View Profile
    • http://www.glbasic.com
Re: Schieberegler geht nicht / GETJOYZ?
« Reply #1 on: 2012-Apr-19 »
Oh mei... Kann man am Treiber was einstellen. Ich schau mal. Evtl. Throttle oder so...

Offline Markus

  • Mr. Polyvector
  • ***
  • Posts: 125
  • Offline
    • View Profile
Re: Schieberegler geht nicht / GETJOYZ?
« Reply #2 on: 2012-Apr-19 »
Bei mir steht es ist ein HID-konformer Gamecontroller / USB Eingabeger├Ąt.
Der Wert des Reglers wird schon irgendwo ankommen auf Deiner Seite.  :)