RPG Tut1 Frage

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

Snade

Betreff: RPG Tut1 Frage

BeitragSo, Jan 25, 2009 17:30
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo nochmal ich bin gerade am verzweifeln hab den RPG1 Tut code zur veraschaulichung abgeschrieben:

Code: [AUSKLAPPEN]
Graphics 1024,768,16,1

map1 = LoadAnimImage ("map1.bmp",32,32,0,5)

Dim map(20,20)

;0.Rosa
;1.Blau
;2.Brunnen
;3.Gelb
;4.Orange

Data 3,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,3,2               
Data 4,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,3
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,4,4,4,4,4,4,4,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,1,1,1,1,1,1,1,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,1,1,1,1,1,1,1,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,1,1,1,1,1,1,1,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,1,1,1,2,1,1,1,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,1,1,1,1,1,1,1,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,1,1,1,1,1,1,1,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,1,1,1,1,1,1,1,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,4,4,4,4,4,4,4,4,4,0,0,0,0,0,1
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
Data 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1
Data 4,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,3
Data 3,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,3,2


 
For y = 0 To 20
For x = 0 To 20
Read map(x,y)
Next
Next


Repeat
SetBuffer BackBuffer()

Cls
If KeyDown(1) Then End
For y = 0 To 20
For x = 0 To 20


DrawImage map1,x*32,y*32,map(x,y)

Next
Next

Flip
Forever


Dann wollte ich meine eigenen grafik einfügen ging nicht dachte ich mir gut nehm ich eben die Beispiel Grafik die ging aber auch nicht immer der Fehler "Out of Data" so wiet ich das interpretieren kann ist doch mein DatenFeld komplett oder nicht?


mfg. Snade
 

Roma3ht

BeitragSo, Jan 25, 2009 17:45
Antworten mit Zitat
Benutzer-Profile anzeigen
Nein. Dein data feld muss 21 "Datas" nach unten gehn und 21 "Zahlen" nach rechts. Bei einem Dim feld wird immer ab 0 gezählt und nicht ab 1.

Roma3ht

Snade

BeitragSo, Jan 25, 2009 18:10
Antworten mit Zitat
Benutzer-Profile anzeigen
das mit der "0" wusste ich wahr bloß ein müdigkeits fehler so ein mist Embarassed
 

Roma3ht

BeitragSo, Jan 25, 2009 20:24
Antworten mit Zitat
Benutzer-Profile anzeigen
Passiert jedem mal^^ Very Happy

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group