execute at @e[type=marker,tag=dir1,sort=nearest,limit=1] at @e[type=marker,tag=dir2,sort=nearest,limit=1] at @e[type=marker,tag=dir3,sort=nearest,limit=1] at @e[type=marker,tag=dir4,sort=nearest,limit=1] as @e[tag=room,type=marker,limit=1,sort=nearest] at @s run function ws:misc/flat/check