Showcase - Socoder

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|633\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
SoCoder -> Showcase Home -> Apps and Utilities

mike_g	Created : 25 September 2006 Edited : 15 June 2008 Language : Blitz Tile Up 2d Tile editor With lots of features https://grundez.googlepages.com/Applications.html
Screenshots
I wanted a level editor that I could use for more or less any 2d game. This is what I got so far. Has some nice features such as, a config setup that makes it easy to configure any tileset for use within the program. Features random map generation tool. Draw selected areas of tiles. Draw tools like flood fill and rect draw. Saves and loads maps. up to 5 draw levels each with up to 5 placeable levels. Auto generates minimaps for your levels. Nice GUI.
Latest Update Very soon I'll put a draw tile function with this to use as an include file in blitzs progs. Then hopefully it should be quicker and easier to make 2d games

Comments
Monday, 25 September 2006, 04:38
Jayenkai	I like the Random Generation feature. If you incorporated something like that into an RPG, so that every game was different, then you'd have a pretty fun engine going on.
Thursday, 12 April 2007, 14:35
mike_g	Well its been almost a year now and I have finally got round to making the two functions to load and draw the maps so you can finally use it to make maps for your Blitz progs. Heres the code: Dim tile(10000) Global mapname$ Global tilesetname$ Global placeablesname$ Global x_cells, y_cells Global tilesize Global placeable_height Global levels Global placeable_layers Global isometric Global placeables_per_tile Global tile_pic Global tilesetwidth Global tilesetheight Global num_tiles Global tiles Global place_pic Global psetwidth Global num_placeables Global placeables Global current_level Global number_of_tiles ;-------------------------------------------------; ;DEMO LOAD_MAP("Map.dat") SetBuffer BackBuffer() While Not KeyHit(1) Cls DRAW_MAP(x_offset, y_offset) Flip Wend ;-----------------------------------------------------------------------------------------------------; ;****************************************************************************************************; ;-----------------------------------------------------------------------------------------------------; Function LOAD_MAP(m$) ;LOAD DATA load_file = ReadFile(m$) mapname$ = ReadLine(load_file) tilesetname$ = ReadLine(load_file) placeablesname$ = ReadLine(load_file) x_cells = ReadLine(load_file) y_cells = ReadLine(load_file) tilesize = ReadLine(load_file) placeable_height = ReadLine(load_file) levels = ReadLine(load_file) placeable_layers = ReadLine(load_file) isometric = ReadLine(load_file) placeables_per_tile = ReadLine(load_file) number_of_tiles =(((x_cells y_cells)(placeable_layers+1))levels) For i = 0 To number_of_tiles tile(i) = ReadInt(load_file) Next CloseFile(load_file) ;LOAD NEW TILESETS tile_pic = LoadImage(tilesetname$) tilesetwidth = ImageWidth(tile_pic): tilesetheight = ImageHeight(tile_pic) num_tiles = (tilesetwidth/tilesize) * (tilesetheight/tilesize) tiles = LoadAnimImage(tilesetname$, tilesize, tilesize, 0, num_tiles) MaskImage tiles, 255, 0, 255: MaskImage tile_pic, 255, 0, 255 If placeablesname$ <> "" ;only load placeables if they exist place_pic = LoadImage(placeablesname$) psetwidth = ImageWidth(place_pic): psetheight = ImageHeight(place_pic) num_placeables = (psetwidth/tilesize) * (psetheight/placeable_height) placeables = LoadAnimImage(placeablesname$, tilesize, placeable_height, 0, num_placeables) MaskImage placeables, 255, 0, 255: MaskImage place_pic, 255, 0, 255 EndIf End Function ;-----------------------------------------------------------------------------------------------------; ;****************************************************************************************************; ;-----------------------------------------------------------------------------------------------------; Function DRAW_MAP(x_offset, y_offset) bit= Sqr#(placeables_per_tile) placeable_y_cells = (y_cells bit)-1 placeable_x_cells = (x_cells * bit)-1 place_offset = (placeable_height - placeable_width) tilenum=0 For l = 1 To 6 If l > levels Then Exit ;DRAW EACH LEVEL For t_y = 0 To 1000 If t_y > (y_cells-1) Then Exit For t_x = 0 To 1000 If t_x > (x_cells-1) Then Exit If tile(tilenum) > -1 ;if not blank If view_l = 0 And l < current_level Else DrawImage tiles, ((t_xtilesize)-x_offset), ((t_ytilesize)-y_offset), tile(tilenum) EndIf EndIf tilenum = tilenum +1 Next Next ;Then DRAW PLACEABLES ON Each LEVEL If placeable_layers > 0 And view_p=1 For p = 1 To 6 If p > placeable_layers Then Exit For p_y = 0 To 50000 If p_y > placeable_y_cells Then Exit For p_x = 0 To 50000 If p_x > placeable_x_cells Then Exit If tile(tilenum) > -1 DrawImage placeables, ((p_x * placeable_width)-scroll_h+20), ((p_y*placeable_width)-place_offset-scroll_v+20), tile(tilenum) EndIf tilenum = tilenum +1 Next Next Next EndIf Next End Function --v Its only a quick hash up. I will work on optimizing it. If you use it then you will need to have both the tile and placeable set in the same directory.
Thursday, 12 April 2007, 15:51
Blitz3Dman	Once I learn a bit of C++ maybe I'll make a real nice level editor - that's what I'm going to do once I finish The Running Man, except I'm going to start off in blitz. By the way, would you mind letting me have a peek at your source? And I didn't look to see whose showcase this was but the file menu in the screenshot was a dead giveaway
Thursday, 12 April 2007, 18:24
mike_g	Err. I dont know how useful the code would be to you. Theres a lot of it and its a bit of a mess. To start off you might be best off looking at something simple that just shows how to do the basic stuff. Draw tiles, save maps, that sort of stuff. I have an smaller old tile editor that I made ages ago but tbh it sux.
Thursday, 12 April 2007, 18:47
Blitz3Dman	No, not because I don't know how to do it (see my level editor for The Running Man at least I don't think it sucks) but because I want to see how you did it to find out if you are using any better techniques than I so that I can improve my code.
Tuesday, 17 April 2007, 06:36
Blitz3Dman	Is there any chance I will get a peek at the code? If not, okay but I am curious how you did your floodfill and all.
Tuesday, 17 April 2007, 09:37
mike_g	No But if you want to know how I did the floodfill I used this algo replacing drawpixel with the tile to draw. Its pretty crude and slow so no good for realtime drawing, but for something like a tile editor its simple and works fine.

Tile Up

Latest Update

Comments