// TOWN SPECIAL ENCOUNTERS
//    Town 51: Harston

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

//	set_name(,);
//	add_range_to_group(,,groupn);

	set_personality_name(1020,"Carswin");
	set_personality_name(1021,"Renee");
	set_personality_name(1022,"Suzanne");
	set_personality_name(1023,"Scab");
	set_personality_name(1024,"Sharon");
	set_personality_name(1025,"Captain Anthony");
	set_personality_name(1026,"Delaria");
	set_personality_name(1027,"Packrin");
	set_personality_name(1030,"Cat");

	set_crime_tolerance(max_crime);

		if (revive_party()) {
			print_str_color("Entering a friendly town heals your wounds",2);
			print_str_color("  and restores your spell energy.",2);
			}
	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5100,"You're from Avernum.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5100,"We don't need you here.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5100,"Cough.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5100,"Place your order.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5109,"I have knowledge.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5109,"I trade with anyone.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5109,"I will live.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5109,"Wildlife is my specialty.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5101,"Zzz.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5101,"Yawn.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5101,"I don't know.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5101,"What is happening?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5110,"Sip.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5110,"Ugh.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5110,"Bah.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5105,"Hello, worm.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5105,"What is it?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5105,"Get this over with.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5106,"What do you want?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5106,"This is my home.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5106,"You just broke in.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5106,"Talk fast.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5107,"Bah!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5107,"Such filth.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5107,"How can the worms eat this?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5113,"Meow.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5113,"Meow. Meow.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5113,"Hiss.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5104,"I can buy.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5104,"I can sell.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(5104,"I make things.");


break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

