{
    function ch_stop_running()
        print_globes_clean()
    end

    
    function print_globes_clean()
        crawl.mpr("\nLUA POOPED TO CHARACTER DUMP.")
        for key, value in pairs(_G) do
            crawl.take_note("\n")
            crawl.take_note("[H1]" .. key .. "[OPEN]" .. value_to_string(value) .. "[CLOSE]")
            if type(value) == "table" then     
                for key2, value2 in pairs(value) do
                    crawl.take_note("\n")
                    crawl.take_note("[H2][TAB]" .. key2 .. "[OPEN]" .. value_to_string(value2) .. "[CLOSE]")
                    if type(value2) == "table" then
                         for key3, value3 in pairs(value2) do
                            crawl.take_note("\n")
                            crawl.take_note("[H3][TAB][TAB]" .. key3 .. "[OPEN]" .. value_to_string(value3) .. "[CLOSE]")
                            if type(value3) == "table" then 
                                for key4, value4 in pairs (value3) do 
                                    crawl.take_note("\n")
                                    crawl.take_note("[H4][TAB][TAB][TAB]" .. key4 .. "[OPEN]" .. value_to_string(value4) .. "[CLOSE]")
                                end
                            end
                            
                         end
                    end
                end
            end
        end
    end
    function value_to_string(obj)
        local msg = ""
        if type(obj) == "function" then
            msg = "[function]"
        elseif type(obj) == "table" then
            msg = "[table]"
        else
            msg = tostring(obj)
        end
        return msg
    end
}