Joypad Steuerung. Aber wie?

Übersicht

BlitzBasic

Allgemein

	Peak7810 Betreff: Joypad Steuerung. Aber wie?	Fr, Mai 28, 2004 14:25 Antworten mit Zitat
Hab hier im Forum schonmal einen Thread zu diesem Thema gefunden, in welchem aber nur steht wie man ein USB Joypad anspricht. Wie spricht man aber die einzelnen Tasten an?

Peak7810

Betreff: Joypad Steuerung. Aber wie?

Fr, Mai 28, 2004 14:25
Antworten mit Zitat

Hab hier im Forum schonmal einen Thread zu diesem Thema gefunden, in welchem aber nur steht wie man ein USB Joypad anspricht.

Wie spricht man aber die einzelnen Tasten an?

	BladeRunner Moderator	Fr, Mai 28, 2004 14:47 Antworten mit Zitat
Schau dir in der Onlinehilfe mal alle Befehle an die mit Joy... beginnen. Sollte alles klären.
Zu Diensten, Bürger. Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3 Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64 B3D BMax MaxGUI Stolzer Gewinner des BAC#48, #52 & #92

BladeRunner

Moderator

Fr, Mai 28, 2004 14:47
Antworten mit Zitat

Schau dir in der Onlinehilfe mal alle Befehle an die mit Joy... beginnen. Sollte alles klären.

Zu Diensten, Bürger.
Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3
Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64
B3D BMax MaxGUI
Stolzer Gewinner des BAC#48, #52 & #92

	General Alex	Fr, Mai 28, 2004 16:40 Antworten mit Zitat
Ob ein USB-Joypad oder ein gewöhnlicher per BB angesprochen wird, ergibt keinen Unterschied.

General Alex

Fr, Mai 28, 2004 16:40
Antworten mit Zitat

Ob ein USB-Joypad oder ein gewöhnlicher per BB angesprochen wird, ergibt keinen Unterschied.

	Bigmichi	Fr, Mai 28, 2004 17:53 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] graphics 1024,768,16,2 setbuffer backbuffer() X# = 500 Y# = 500 GLOBAL NormalX# = 0 GLOBAL NormalY# = 0 color 255,255,128 WHILE Kali = 0 Text 1024/2,768/2,"Drücken Sie eine Taste am Joystick!",1,1 IF waitjoy() > 0 THEN Kali = 1 flip cls WEND NormalX# = JOYX() NormalY# = JoyY() color 128,128,255 WHILE NOT keyhit(1) IF joydown(1) THEN Text 10,10,"1" SpeedX = (JOYX() - NormalX)40 SpeedY = (JOYY() - NormalY)40 TEXT 10,40,"X:" + SpeedX TEXT 10,80,"Y:" + SpeedY X = X + speedX Y = Y + speedY IF X > 1024 THEN X = 0 IF X < 0 THEN X = 1024 IF Y > 768 THEN Y = 0 IF Y < 0 THEN Y = 768 oval X,Y,20,20 flip cls WEND END Kleines Beispiel =)

Bigmichi

Fr, Mai 28, 2004 17:53
Antworten mit Zitat

Code: [AUSKLAPPEN]

graphics 1024,768,16,2
setbuffer backbuffer()

X# = 500
Y# = 500

GLOBAL NormalX# = 0
GLOBAL NormalY# = 0

color 255,255,128

WHILE Kali = 0

Text 1024/2,768/2,"Drücken Sie eine Taste am Joystick!",1,1

IF waitjoy() > 0 THEN Kali = 1

flip
cls
WEND

NormalX# = JOYX()
NormalY# = JoyY()

color 128,128,255

WHILE NOT keyhit(1)

IF joydown(1) THEN Text 10,10,"1"

SpeedX = (JOYX() - NormalX)*40
SpeedY = (JOYY() - NormalY)*40

TEXT 10,40,"X:" + SpeedX
TEXT 10,80,"Y:" + SpeedY

X = X + speedX
Y = Y + speedY

IF X > 1024 THEN X = 0
IF X < 0 THEN X = 1024

IF Y > 768 THEN Y = 0
IF Y < 0 THEN Y = 768

oval X,Y,20,20

flip
cls
WEND
END

Kleines Beispiel =)