You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
64 lines
1.8 KiB
64 lines
1.8 KiB
AR_Logic()
|
|
if ds_exists(global.roommap, 1)
|
|
ds_map_destroy(global.roommap)
|
|
global.roommap = ds_map_create()
|
|
map = global.roommap
|
|
access = global.accessnodes
|
|
list = global.nodelist
|
|
if file_exists("AreaRando/seed.txt")
|
|
file_delete("AreaRando/seed.txt")
|
|
fid = file_text_open_append("AreaRando/seed.txt")
|
|
while (ds_list_size(access) > 0)
|
|
{
|
|
ds_list_shuffle(access)
|
|
node1 = ds_list_find_value(access, 0)
|
|
ds_list_delete(access, 0)
|
|
if (ds_list_size(list) > 0)
|
|
{
|
|
loop = 1
|
|
while (loop == 1)
|
|
{
|
|
loop = 0
|
|
ds_list_shuffle(list)
|
|
node2 = ds_list_find_value(list, 0)
|
|
ds_list_delete(list, 0)
|
|
if is_array(node2)
|
|
targetnode = node2[1]
|
|
else
|
|
targetnode = node2
|
|
if ((!is_undefined(ds_map_find_value(map, targetnode))) || ds_list_find_index(access, targetnode) != -1 || node1 == targetnode)
|
|
loop = 1
|
|
}
|
|
}
|
|
if (ds_list_size(list) == 0)
|
|
{
|
|
if is_undefined(node2)
|
|
{
|
|
ds_list_shuffle(access)
|
|
targetnode = ds_list_find_value(access, 0)
|
|
ds_list_delete(access, 0)
|
|
}
|
|
}
|
|
ds_map_add(map, node1, targetnode)
|
|
ds_map_add(map, targetnode, node1)
|
|
if is_array(node2)
|
|
{
|
|
for (i = 2; i < array_length_1d(node2); i += 1)
|
|
{
|
|
if (ds_list_find_index(access, node2[i]) == -1)
|
|
{
|
|
if is_undefined(ds_map_find_value(map, node2[i]))
|
|
{
|
|
if (node2[i] != node2[1])
|
|
ds_list_add(access, node2[i])
|
|
}
|
|
}
|
|
}
|
|
}
|
|
file_text_write_string(fid, ((string(node1) + "-") + string(targetnode)))
|
|
file_text_writeln(fid)
|
|
}
|
|
file_text_close(fid)
|
|
ds_list_destroy(list)
|
|
ds_list_destroy(access)
|