Mal wieder Probleme mit Schießen...

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

 

Darthshoot

Betreff: Mal wieder Probleme mit Schießen...

BeitragDo, Dez 28, 2006 15:14
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo!

Ich wollte vorerst einen Schuss machen, der einmal abgeschossen werden kann und sobald er aus dem Bildschirm rausgeflogen ist ( XGun1 > 800 ) dann soll er wieder abfeuerbar werden. Aber irgendwie ist er nur einmal abfeuerbar.

Code: [AUSKLAPPEN]
; Lade Gun1
Include "Gun1.bb"
; Initialisiere Gun1 Daten
Gun1Image = LoadImage("Gun1.bmp")
Global XGun1 = XPlayer + 52
Global YGun1 = YPlayer + 19
Global AGun1 = 0


Code: [AUSKLAPPEN]
; Gun1
Function Gun1(Gun1Image)

; Berechne Gun1 Koordinaten
If KeyHit(57) And AGun1 = 0 Then AGun1 = 1

If AGun1 = 1 Then
XGun1 = XGun1 + 10

; Render Gun1
DrawBlock Gun1Image, XGun1, YGun1

EndIf

If XGun1 > 800 Then AGun1 = 0

End Function


Woran liegts?

Danke im Voraus.
MfG Darthshoot

Eingeproggt

BeitragDo, Dez 28, 2006 15:30
Antworten mit Zitat
Benutzer-Profile anzeigen
Musst du die Funktion Gun1() nicht auch irgendwann ausführen?
Gewinner des BCC 18, 33 und 65 sowie MiniBCC 9
 

Darthshoot

BeitragDo, Dez 28, 2006 20:21
Antworten mit Zitat
Benutzer-Profile anzeigen
Jo doch aber ich habs schon behoben. Musste nochmal alles neu machen aber danke trotzdem.

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group