Gegner soll schießen -.-'

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

 

Darthshoot

Betreff: Gegner soll schießen -.-'

BeitragDi, Dez 26, 2006 15:22
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo!

Warum bekomm ich Array out of Bounds? P.S. Ich blick selber kaum noch über den Code drüber...

Code: [AUSKLAPPEN]
; Gegner1
Gegner1 = LoadImage("Gegner1.bmp")
Dim Gegner1A(WieVielGegner1, 2)
For Gegner1B = 1 To WieVielGegner1
XG1 = Rnd(0, 750)
Gegner1A(Gegner1B, 1) = XG1
YG1 = Rnd(-10, -100000)
Gegner1A(Gegner1B, 2) = YG1
Next

; Standart-Schuss von Gegner1
Dim Schuss2B(50)
For A = 1 To 50
Schuss2B(A) = LoadImage("Schuss2.bmp")
Next
Dim Schuss2(50, 3)

; Gegner1
For Gegner1C = 1 To WieVielGegner1
MaskImage Gegner1, 255, 0, 255
DrawImage Gegner1, Gegner1A(Gegner1C, 1), Gegner1A(Gegner1C, 2)
Gegner1A(Gegner1C, 2) = Gegner1A(Gegner1C, 2) + 3

; wenn er ins Feld kommt.. soll er loslegen mit schießen
If Gegner1A(Gegner1C, 2) >= 0 Then
Schuss2(Gegner1C, 1) = 1
Schuss2(Gegner1C, 2) = Gegner1A(Gegner1C, 1) + 24
Schuss2(Gegner1C, 3) = Gegner1A(Gegner1C, 2) + 50
EndIf

If Schuss2(Gegner1C, 1) = 1 Then
Schuss2(Gegner1C, 3) = Schuss2(Gegner1C, 3) + 8
DrawBlock Schuss2B(Gegner1C), Schuss2(Gegner1C, 2), Schuss2(Gegner1C, 3)
EndIf
;If Schuss2(Gegner1C, 3) >= 600 Then
;Schuss2(Gegner1C, 2) = Schuss2(Gegner1C, 2) + 2000
;EndIf


Embarassed dieser ganze Block macht immer den Array Fehler...

Code: [AUSKLAPPEN]
If Schuss2(Gegner1C, 1) = 1 Then
Schuss2(Gegner1C, 3) = Schuss2(Gegner1C, 3) + 8
DrawBlock Schuss2B(Gegner1C), Schuss2(Gegner1C, 2), Schuss2(Gegner1C, 3)
EndIf


Danke im Voraus.
MfG Darthshoot

ToeB

BeitragDi, Dez 26, 2006 15:41
Antworten mit Zitat
Benutzer-Profile anzeigen
Versuchs doch ma mit Types Wink
Religiöse Kriege sind Streitigkeiten erwachsener Männer darum, wer den besten imaginären Freund hat.
Race-Project - Das Rennspiel der etwas anderen Art
SimpleUDP3.0 - Neuste Version der Netzwerk-Bibliothek
Vielen Dank an dieser Stelle nochmal an Pummelie, welcher mir einen Teil seines VServers für das Betreiben meines Masterservers zur verfügung stellt!

BladeRunner

Moderator

BeitragDi, Dez 26, 2006 15:50
Antworten mit Zitat
Benutzer-Profile anzeigen
Dein Code ist so qie du ihn pastest nicht lauffähig, also können wir nur raten woran es liegt. Ich tippe mal am ehesten an 'wievielgegner1', von dem wir hier nicht den wert erkennen. Allerdings ist deine Namensgebung unter aller Sau. Kein Wunder das Du nicht mehr durchblickst.
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
 

Darthshoot

BeitragDi, Dez 26, 2006 16:44
Antworten mit Zitat
Benutzer-Profile anzeigen
Jojo Very Happy das stimmt schon. Aber WievielGegner1 - daran liegts nicht. Das hat den Wert 100. Es muss warum auch immer an DIM Schuss2 liegen. Ich verstehe einfach nicht warum o_O vorallem weil das so ungefähr bei dem Player geklappt hat.

BladeRunner

Moderator

BeitragDi, Dez 26, 2006 16:48
Antworten mit Zitat
Benutzer-Profile anzeigen
Wenn wievieleGegner1 100 ist, kann es nicht funzen, da Du bis 100 in der for-schleife zählen willst. Allerdings ist schuss2 nur bis 50 dimensioniert. Schnackelts ?
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
 

Darthshoot

BeitragDi, Dez 26, 2006 20:17
Antworten mit Zitat
Benutzer-Profile anzeigen
Hmm jo naja gut vielen Dank auf jedenfall.

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group