Wolf3D test

[1micha.elok]

This is just a walls, floor and ceiling layout of the first level modeled after the actual Wolf3D game... This is just a navigable concept level of 64x64 tiles...

DISPLAYING MAP

   
click the image to zoom - in

Hi, the rooms are very big. It's great. I can't imagine how hard to make it manually on notepad with just 1 and 0 ...
Just an idea, how about if you add something like a little guide green map ...

Code:

...

'-------------------------------------------------------------------------
' Generate little guide map.
map = []
map.img = 0
map.scale = 2
create image map.img, w3d.mw*map.scale, w3d.mh*map.scale
set image map.img
set color 0,50,0; cls
for z = 0 to w3d.mh - 1
    for x = 0 to w3d.mw - 1
        if w3d.Wall(x, z) > 0 then
            set color 0,255,0
            draw rect x*map.scale, z*map.scale, map.scale, map.scale, true
        endif
    next
next
set image primary
'-------------------------------------------------------------------------


do
    ...
   
    '----------------------------------------------------------------------------------------------   
    'Display green map, white player
    x = width(primary)-width(map.img)-10
    y = height(primary)-height(map.img)-110
    set color 255,255,255
    draw image map.img, x, y
    draw rect x + int(ply.x*map.scale) - 1, y + int(ply.z*map.scale) - 1, map.scale, map.scale, true
    '----------------------------------------------------------------------------------------------
       
    redraw

    fwait 60
until keydown(KEY_ESCAPE)