Seite 1 von 1
KeyboardReleased(#PB_Key_Y) keine Funktion
Verfasst: 17.06.2007 23:45
von hmi222
Hi zusammen....
Beim mir hat die Funktion
KeyboardReleased(#PB_Key_Y)
KeyboardPushed(#PB_Key_Y)
keine Auswirkung
PB Version 4.02
Code: Alles auswählen
Enumeration
#Sprite2D
#Sprite3D
EndEnumeration
InitSprite()
InitSprite3D()
InitKeyboard()
OpenScreen(800,600,16,"DX_Transformsprite3D")
UsePNGImageDecoder()
LoadSprite(#Sprite2D,"..\data\whitewolf\dawnducksplash_small.png",#PB_Sprite_Texture )
CreateSprite3D(#Sprite3D,#Sprite2D)
x1.l=100
x2.l=500
x4.l=100
x3.l=500
Repeat
ClearScreen($402040)
Start3D()
TransformSprite3D(#Sprite3D,x1,100,#PB_Any,x2,100,#PB_Any,x3,500,#PB_Any,x4,500,#PB_Any)
DisplaySprite3D(#Sprite3D,100,0)
Stop3D()
FlipBuffers(0)
Delay(1)
ExamineKeyboard()
If KeyboardReleased(#PB_Key_A):x1+5:EndIf
If KeyboardReleased(#PB_Key_Y):x1-5:EndIf ;/ Taste hat keine Funktion!
If KeyboardReleased(#PB_Key_S):x2+5:EndIf
If KeyboardReleased(#PB_Key_X):x2-5:EndIf
If KeyboardReleased(#PB_Key_D):x4+5:EndIf
If KeyboardReleased(#PB_Key_C):x4-5:EndIf
If KeyboardReleased(#PB_Key_F):x3+5:EndIf
If KeyboardReleased(#PB_Key_V):x3-5:EndIf
Until KeyboardPushed(#PB_Key_Escape)
End
Verfasst: 17.06.2007 23:50
von D@nte
Nimm halt
oder stell die Tastatur auf englisch
Verfasst: 18.06.2007 03:57
von hmi222
Na so 'n Geistesblitz hätt ich auch haben können....
Verfasst: 18.06.2007 09:51
von D@nte
hmi222 hat geschrieben:Na so 'n Geistesblitz hätt ich auch haben können....
Anscheinend nit...
Sonst hätteste ja gemerkt das KeyboardReleased(#PB_Key_Y) sehr wphl funktioniert, allerdings hat PB standardmäßig nur QWERTY und nicht QWERTZ als Tastaturmodus eingestellt (w.l.k.i.k.i.V.) also wo ist jetzt das Problem?!
Verfasst: 18.06.2007 09:51
von nco2k
@hmi222
einfach das nächste mal die hilfe genauer lesen:
Code: Alles auswählen
Enumeration
#Sprite2D
#Sprite3D
EndEnumeration
InitSprite()
InitSprite3D()
InitKeyboard()
OpenScreen(800,600,16,"DX_Transformsprite3D")
KeyboardMode(#PB_Keyboard_International)
UsePNGImageDecoder()
LoadSprite(#Sprite2D,"..\data\whitewolf\dawnducksplash_small.png",#PB_Sprite_Texture )
CreateSprite3D(#Sprite3D,#Sprite2D)
x1.l=100
x2.l=500
x4.l=100
x3.l=500
Repeat
ClearScreen($402040)
Start3D()
TransformSprite3D(#Sprite3D,x1,100,#PB_Any,x2,100,#PB_Any,x3,500,#PB_Any,x4,500,#PB_Any)
DisplaySprite3D(#Sprite3D,100,0)
Stop3D()
FlipBuffers(0)
Delay(1)
ExamineKeyboard()
If KeyboardReleased(#PB_Key_A):x1+5:EndIf
If KeyboardReleased(#PB_Key_Y):x1-5:EndIf ;/ Taste hat keine Funktion!
If KeyboardReleased(#PB_Key_S):x2+5:EndIf
If KeyboardReleased(#PB_Key_X):x2-5:EndIf
If KeyboardReleased(#PB_Key_D):x4+5:EndIf
If KeyboardReleased(#PB_Key_C):x4-5:EndIf
If KeyboardReleased(#PB_Key_F):x3+5:EndIf
If KeyboardReleased(#PB_Key_V):x3-5:EndIf
Until KeyboardPushed(#PB_Key_Escape)
End
@D@nte
> allerdings unterstützt PB nur QWERTY und nicht QWERTZ
mit solchen vermutungen wär ich vorsichtig.
c ya,
nco2k
Verfasst: 18.06.2007 10:17
von D@nte
Hab's ja noch korrigiert hatte mich gestern auch kurz verlesen
PB Hilfe hat geschrieben: #PB_Keyboard_Qwerty : Die Tastaturabfrage ignoriert die Standard-Tastasturbelegung und verwendet immer das QWERTY-Schema (Standard-Verhaltensweise).
#PB_Keyboard_International : Die Tastaturabfrage verwendet die Standard-Tastasturbelegung zur Abbildung ("mappen") der Tasten (kann nützlich bei Tastaturen
sein, die nicht dem QWERTY-Schema entsprechen, wie z.B. einer üblichen deutschen Tastatur).
Hab bei #PB_Keyboard_International sozusagen nur
dem QWERTY-Schema entsprechen gelesen
Nicht's desto trotz hätte sich der ganze Thread erübrigt wenn man mal F1 drücken würde und sich diesen sinnlosen Buchstabensalat mal durchgelesen hätte.
Und der Thread nicht's mit "Fragen und Bugreports zur PureBasic 4.0-Beta" zu tun hat sondern eher zu "Anfängerfragen zum Programmieren mit PureBasic." gehört...
Verfasst: 18.06.2007 11:51
von hmi222
entschuldige mich in höchster Form....
muß zugegen , hab die Hilfe zu KEYOARD noch nie gelesen
@DANTE : Sorry
bin immer davon ausgegangen das die Deutsche Tastatur eingestelllt
da ich diese TASTE Y nur zu testzwecken brauchten...
[/quote]