Arrays in BB

[Bastian Born]

Moin,
kann mir einer erklären wie ich in BlitzBasic Arrays machen kann???
Ein anständiges Tutorial würde mir auch weiterhelfen!

danke

 

[Ben]

Google macht Spaß.
--> http://de.wikibooks.org/wiki/BlitzBasic-Community-Tutorial#Arrays

 

[Bastian Born]

ok, ich habs grad gefunden(nur halt wo anders)

aber könnt ihr mir sagen was an dem code falsch is?

Cls
Graphics 1024,768,16,1
v1=LoadImage("vogel1.bmp")
v2=LoadImage("vogel2.bmp")
kreuz=LoadImage("kreuz.bmp")
hintergrund=LoadImage("hintergrund.bmp")
Repeat
rand1 = Rnd(1,50)
If rand1 = 1 Then 
 rand2 = Rnd(1,2)
 rand3 = Rnd(1,500)
 Dim vogelx(20)
 Dim vogely(20)
 Dim vogel(20)
 For i=0 To 20
  If vogel(i) = 0 Then 
   vogel(i) = rand2
   If rand2 = 1 Then vogelx(i) = 1
   Else vogelx(i) = 1024
   vogely(i) = rand3
  EndIf
 Next
EndIf
For n=0 To 20
 vogelx(n) = vogelx(n) + 1
 DrawImage v1,vogelx(n),vogely(n) 
Next
Cls
TileImage hintergrund, 1, 1
SetBuffer BackBuffer() 
x = MouseX()
y = MouseY()
DrawImage kreuz, x, y 
Flip
Until KeyHit(1)
End

also das soll sowas ähnliches wie moorhuhn werden!
hat nur noch nen fehlr!
da kommt "Array index out of bounds"
Heißt so viel wie Array außer der Grenze!

Aber die For schleife geht nur bis 20 und ich hab 20 Arrays, also?
Álso geguckt hab ich schon ob da was an der For schleife nit stimmt aber diemüsste in ordnung sein!

danke