map_to_value_sorted_key_list

///@param map
///@param ascending

var map = argument0
var ascending = argument1

var keys = ds_list_create()
var values = ds_list_create()   //Helper structure

var key = map_first(map)
while (!is_undefined(key)) {
    var value = map[? key]
    var size = ds_list_size(keys)

    for (var i = 0; i < size; ++i) {
        var lesser = (value < values[| i])
        if (ascending == lesser)    //XNOR (true if both true or both false)
            break
    }

    ds_list_insert(values, i, value)
    ds_list_insert(keys, i, key)

    key = map_next(map, key)
}

ds_list_destroy(values)

return keys