/* podstawowy korytarz kazamatow
 * napisane przez ALfena
 */

#include "local.h"

inherit LPATH + "korytarz";


void
create_twierdza()
{
	object ob;
	::create_twierdza();
	if (random(100)<60)
	{
		ob = clone_object(TPATH + "npc/zombi");
		ob->szykuj();
		ob->move_living("Ms",this_object());
	}
}