// Town 14: Island Camp
// Two pens are 6 x 8 and 8 x 8; lizard pen is 5 x 4
// All tents and portables are 4 x 4
begintownscript;

variables;

short choice,i,j,k;
string dlgstr;

body;

beginstate INIT_STATE;
	set_crime_tolerance(2);
	
	if (get_flag(14,0) == 0) {
		force_instant_terrain_redraw();
		if (get_flag(16,1) == 0)
			message_dialog("You enter a small wooded island in the middle of this ocean of lava. Unlike the small islands and narrow stepping-stone paths, this island provides enough shelter for a camp, at least for a short while.","Now if you can find a way out of this area, you can tell the expedition to come this way.");
		else
			message_dialog("You enter a small wooded island in the middle of this ocean of lava. Unlike the small islands and narrow stepping-stone paths, this island provides enough shelter for a camp, at least for a short while.","Since you have reason to believe that the expedition will not stay here long, you have enough to go on now; you should go back to Pithoss and tell him what you've found. The expedition can come this way now.");
		set_flag(14,0,1);
		}
		
break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
break;

beginstate 10;
break;