Minimap help

ID:1141106
 
Jan 27 2013, 5:28 pm
Keywords: code, help, map, minimap
(See the best response by Zaltron.)
Code:
mob/proc/cr_browsermap(zlevel=1,tilesizex=16,tilesizey=16,denytypes[0],windowname="map",browseopt="")
    ////////Send the map to the mob's browser window
    var/filename="crmap[ckey].tmp"

    //Display "please wait" message
    src << browse("<body bgcolor=black text=white><p align=center>\
    <font size=5 face='Verdana'>...please wait...</font></body>","window=[windowname],\
    size=[min(world.maxx*16+50,630)]x[min(world.maxy*16+150,450)],[browseopt]")

    var/html="<html><body bgcolor=black><table border=0 cellspacing=0 cellpadding=0>"

    //If the temp. file exists, delete it
    if (fexists(filename)) fdel(filename)

    //Display everything in the world
    for (var/y=world.maxy,y>=0,y--)
        html+="</tr><tr>"
        text2file(html,filename)
        html=""
        sleep(-1)
        for (var/x=1,x<=world.maxx,x++)
            //Turfs
            var/turf/T=locate(x,y,zlevel)
            if (!T) continue
            var/icon/I=icon(T.icon,T.icon_state)
            var/imgstring=dd_replacetext("[T.type]-[T.icon_state]","/","_")

            //Movable atoms
    /*      for (var/atom/movable/A in T)
                //Make sure it's allowed to be displayed
                var/allowed=1
                for (var/X in denytypes)
                    if (istype(A,X))
                        allowed=0
                        break
                if (!allowed) continue

                if (A.icon) I.Blend(icon(A.icon,A.icon_state,A.dir),ICON_OVERLAY)
                imgstring+=dd_replacetext("__[A.type]_[A.icon_state]","/","_")*/

            //Output it
            src << browse_rsc(I,"[imgstring].dmi")
            html+="<td><img src=\"[imgstring].dmi\" width=[tilesizex] height=[tilesizey]></td>"

    text2file("</table></body></html>",filename)

    //Display it
    src << browse(file(filename),"window=[windowname],\
    size=[min(world.maxx*16+50,630)]x[min(world.maxy*16+150,450)],[browseopt]")


mob/PC/verb/displaymap()
    set category = "Channels"
    set desc="See the mapper in action!"
    src << "Displaying map... (Size: [world.maxx]x[world.maxy])"
    src.cr_browsermap(src.z)
    src << "Map displayed."


Problem description:Well i want to make a minimap and a verb to display whatever z level i am on my map is 400x400 tho and it keeps bogging the game down and making it crash. This was a demo i downloaded was wondering if anything can be done? Also it's not getting by the please wait on the new browser that pops up.

Jan 27 2013, 6:39 pm (Edited on Jan 27 2013, 6:49 pm)
The icon() call is killing it (you're creating 160,000 icons). You need to find a better way to supply the pixel data.

One thing that can be done is a image(/obj/type/here) which uses the cache (otherwise, an icon() call actually generates graphical data and sends it to the client using bandwidth).

Another possible solution is to supply a 1x1 pixel color that represents each tile, and just use plain ole html to display those pixels using a table or something of the sort.

Another option is some javascript and a single image file that contains mini-versions of the tiles (4x4, 8x8) which can grab those tiny tiles and arrange them (like an external tileset mapper in html).
Jan 27 2013, 7:26 pm
Best response
When generating the minimap the way you are I would suggest not creating a new icon for every single tile. Instead I would search through all the tiles and cache the icon for that tile in a list if you haven't all ready cached that tile type. Then when you come across a tile that's all ready in your list you can use the icon that's been cached.

What I do in my mini map library is look through all the icon files in the project and get the average color of each icon_state and store it in a list based on the icon and icon_state. I then draw the minimap based all the tiles in the game based on color stored for their icon and icon_state.

http://www.byond.com/developer/Zaltron/MiniMapGenerator
Jan 28 2013, 4:33 am
Thanks i'll try an implement your demo with more success i mean the other code does generate the map just lags real bad obviously because it is creating a file for every tile lol can you pinpoint were i edit the list of colors?
Jan 28 2013, 8:42 am
In response to Hectorbrock
I probably should have put manual color list in the demo.

If you go to "MiniMap Generator >> Minimap >> Settings.dm" you can set the colors there.

proc/manualColor(r, i, list/l)//Specify a color manually. Good to do if all the tiles have similar colors.
    /*if(i == 'icon.dmi')
        if(findtext(r,"icon_state"))l[r] = "#008800"
        else if(findtext(r,"icon_state"))l[r] = "#656564"
    else if(i == 'icon.dmi')
        if(findtext(r,"icon_state"))l[r] = "#008800"
        else if(findtext(r,"icon_state"))l[r] = "#656564"


The code above is in the Settings file. All you need to do is specify the icon, icon_state and the hex value color in the function.
Jan 29 2013, 4:29 pm
Is there a way to save my .z on the map as a .png?
Jan 29 2013, 5:55 pm
 
#define RED rgb(255,0,0)

var/obj/minimap/minimap

obj/minimap
    var/icon/background_icon = new
    New()
        var/icon/i = new( 'minimap.png' )
        for(var/turf/Earth/t in world)
            i.DrawBox( t.color , t.x+1 , t.y+1 )
        icon = i
        background_icon = i
        ..()


world/New()
    minimap = new
    ..()

mob
    var/minimap_height = 400 ,\
        minimap_width  = 400

    var/locator_y = 5 ,\
        locator_x = 5

    density = 0

//  icon = 'mob.dmi'

    verb/changeSize( width as num , height as num )

        minimap_height = height
        minimap_width = width

        winset( src , "mapWindow" , "size=[minimap_width]x[minimap_height]" )

        displayMinimap()    // Though inefficient, this line will stop a small amount of delay in the minimap's resizing

    verb/changeLocatorSize( width as num , height as num )

        locator_x = min( width , 5 ) // Make sure it's not higher than 5
        locator_x = max( width , 1 ) // Make sure it's not lower than 1

        locator_y = min( height , 5 )
        locator_y = max( height , 1 )

        drawLocator()


    proc/displayMinimap() // Displays the minimap and resizes it with HTML tags accordingly.
        src << output("<img src = '\ref[minimap.icon]' height = '[minimap_height]px' width = '[minimap_width]px'>","minimap")


    proc/drawLocator() // Draws a pixelated locator on the minimap in a size according to locator_x and locator_y.
        var/icon/i = new( minimap.background_icon )
        i.DrawBox( RED , x+(15-locator_x) , y+(15-locator_y) , x+(13+locator_x) , y+(13+locator_y) )
        minimap.icon = i


    Login()

        spawn()
            while( 1 )
        //      drawLocator()
                displayMinimap()
                sleep( 7 )
        ..()
/*
turf

    var/color
    icon = 'turf.dmi'

    grass
        icon_state = "grass"

        New()
            color = rgb( 0 , rand( 165,175 ) , 0 )
            ..()

    water
        icon_state = "water"
        density = 1

        New()
            color = rgb( 0 , 0 , rand( 220,255 ) )
            ..()

    sand
        icon_state = "sand"

        New()
            color = rgb( 255 , rand(210,215) , 0 )
            ..()*/


This works but only shows me the left corner of the map.