Exemplo n.º 1
0
object query_exit_destination()
{
	object obj;

	obj = query_local_property("exit_return");

	if (obj) {
		return obj->query_environment();
	}

	return query_local_property("exit_destination");
}
Exemplo n.º 2
0
int query_y_size()
{
	mixed ys;

	ys = query_local_property("size_y");

	return ys ? ys : 0;
}
Exemplo n.º 3
0
int query_x_size()
{
	mixed xs;

	xs = query_local_property("size_x");

	return xs ? xs : 0;
}
Exemplo n.º 4
0
int query_z_position()
{
	mixed zp;

	zp = query_local_property("pos_z");

	return zp ? zp : 0;
}
Exemplo n.º 5
0
int query_y_position()
{
	mixed yp;

	yp = query_local_property("pos_y");

	return yp ? yp : 0;
}
Exemplo n.º 6
0
int query_x_position()
{
	mixed xp;

	xp = query_local_property("pos_x");

	return xp ? xp : 0;
}
Exemplo n.º 7
0
int query_z_size()
{
	mixed zs;

	zs = query_local_property("size_z");

	return zs ? zs : 0;
}
Exemplo n.º 8
0
atomic void set_exit_destination(object obj)
{
	object lobj;

	lobj = query_local_property("exit_return");

	if (lobj && obj != nil) {
		error("Exit has a return exit");
	}

	set_local_property("exit_destination", obj);
}
Exemplo n.º 9
0
atomic void set_exit_return(object obj)
{
	object lobj;

	if (query_local_property("exit_destination")) {
		error("Exit already has a destination");
	}

	if (obj->query_local_property("exit_destination")) {
		error("Return exit already has a destination");
	}

	if (obj->query_local_property("exit_return")) {
		error("Return exit already has a return exit");
	}

	lobj = query_local_property("exit_return");

	if (lobj) {
		object llobj;

		llobj = lobj->query_local_property("exit_return");

		if (llobj == this_object()) {
			llobj->set_local_property("exit_return", nil);
		}
	}

	lobj = obj->query_local_property("exit_return");

	if (lobj) {
		error("Return exit already has a return exit");
	}

	obj->set_local_property("exit_return", this_object());
	set_local_property("exit_return", obj);
}
Exemplo n.º 10
0
object query_exit_return()
{
	return query_local_property("exit_return");
}