GLBasic forum

Codesnippets => Code Snippets => Topic started by: Fauk on 2008-Nov-30

Title: Primitiver Leveleditor
Post by: Fauk on 2008-Nov-30
Ich habe mich gestern und heute mal ne Stunde hingesetzt und nen primitiven Karteneditor gebastelt. Ist nichts besonderes und eher für kleine Sachen bzw. Tests gedacht.

Hier könnt ihr euch das Programm mit Quellcode und Testmaterialen runterladen:
http://rapidshare.com/files/168859303/Leveleditor.rar

Und hier ist die Funktion zum Laden von den Karten:

Code (glbasic) Select

// ------------------------------------------------------------------------------ //
// -----> MapLaden <----- //
// ------------------------------------------------------------------------------ //

SUB MapLaden:
Map$ = FILEREQUEST$(TRUE,"")
TempMap = OPENFILE(1,Map$,TRUE)

IF TempMap = TRUE
READWORD 1,Map_X
READWORD 1,Map_Y

DIM Karte[Map_X][Map_Y]

FOR x = 0 TO (Map_X - 1)
FOR y = 0 TO (Map_Y -1)
READWORD 1,Tile
Karte[x][y] = Tile
NEXT
NEXT
ELSE
PRINT "Karte konnte nicht geladen werden." ,200,200
ENDIF
ENDSUB


Dann muss man nur noch die Map zeichnen, im Falle der Testfiles sähe das so aus:
Code (glbasic) Select

FUNCTION Map:
FOR x = 0 TO (Map_X - 1)
FOR y = 0 TO (Map_Y - 1)
IF Karte[x][y] = 0 THEN DRAWSPRITE 0,(x*32) + Scroll_X,(y*32) + Scroll_Y
IF Karte[x][y] = 1 THEN DRAWSPRITE 1,(x*32) + Scroll_X,(y*32) + Scroll_Y
IF Karte[x][y] = 2 THEN DRAWSPRITE 2,(x*32) + Scroll_X,(y*32) + Scroll_Y
IF Karte[x][y] = 3 THEN DRAWSPRITE 3,(x*32) + Scroll_X,(y*32) + Scroll_Y
NEXT
NEXT
ENDFUNCTION


Am Anfang gibt man erstmal ein welche Größe das Datenfeld haben soll (Erste Eingabe lx und zweite ly bei Karte[lx][ly]).
Zwischen den verschiedenen Tiles kann man mit den Tasten 1 - 4 wechseln. Zum Speichern drückt man 's'.

Vielleicht kanns ja wer brauchen :whistle:

Gruß
Fauk
Title: Re: Primitiver Leveleditor
Post by: mathux on 2008-Dec-01
Nettes Ding, erinnert mich an meinen ersten Karteneditor für ein 3D Labyrinthspiel, dass ich in Blitz3D geschrieben hab.
Hach ja, wann kommt endlich die Freizeit wieder  :'(
Und GLBasic 6 natürlich, ich freu mich schon so auf die GUI Befehle. Dann hab ich ne Ausrede es auch in der Uni zu benutzen  :whistle:
Title: Re: Primitiver Leveleditor
Post by: Fauk on 2008-Dec-01
Ach, GLBasic bekommt GUI-Befehle? =D Wann kommt den das gute Update?^^
Title: Re: Primitiver Leveleditor
Post by: Schranz0r on 2008-Dec-01
Wenns fertig ist  :nana:
Title: Re: Primitiver Leveleditor
Post by: trucidare on 2009-Jan-21
Ehh? ihr solltet mal in den samples Ordner schauen. :)

Title: Re: Primitiver Leveleditor
Post by: Schranz0r on 2009-Jan-21
Schau mal aufs Datum du Held...
Title: Re: Primitiver Leveleditor
Post by: trucidare on 2009-Jan-22
Heul doch :D
Title: Re: Primitiver Leveleditor
Post by: Foo on 2009-Oct-05
Sorry, dass ich den Thread aus der Versenkung hole, aber hat jemand noch die rar-Datei?