var isolated, list, map, node1, node2;
isolated = ds_list_create()
list = ds_list_create()
map = global.roommap
ds_list_add(isolated, 136531)
ds_list_add(isolated, 135089)
ds_list_add(isolated, 135090)
ds_list_add(isolated, 136897)
ds_list_add(isolated, 135814)
ds_list_add(isolated, 146591)
ds_list_add(list, 108769)
ds_list_add(list, 134437)
ds_list_add(list, 111696)
ds_list_add(list, 127588)
ds_list_add(list, 120066)
ds_list_add(list, 134436)
ds_list_add(list, 129355)
ds_list_add(list, 134438)
ds_list_add(list, 134435)
ds_list_add(list, 134626)
ds_list_add(list, 135165)
ds_list_add(list, 134228)
ds_list_add(list, 134598)
ds_list_add(list, 134093)
ds_list_add(list, 134599)
ds_list_add(list, 111718)
fid = file_text_open_append("AreaRando/seed.txt")
while (ds_list_size(list) > 0)
{
    if (ds_list_size(isolated) > 0)
    {
        ds_list_shuffle(isolated)
        ds_list_shuffle(list)
        node1 = ds_list_find_value(list, 0)
        node2 = ds_list_find_value(isolated, 0)
        ds_list_delete(list, 0)
        ds_list_delete(isolated, 0)
    }
    else
    {
        ds_list_shuffle(list)
        node1 = ds_list_find_value(list, 0)
        node2 = ds_list_find_value(list, 1)
        ds_list_delete(list, 0)
        ds_list_delete(list, 0)
    }
    file_text_write_string(fid, ((string(node1) + "-") + string(node2)))
    file_text_writeln(fid)
    ds_map_add(map, node1, node2)
    ds_map_add(map, node2, node1)
}
file_text_close(fid)
ds_list_destroy(list)
ds_list_destroy(isolated)