// TOWN SPECIAL ENCOUNTERS
//    Town 40: Athron's Lair

beginzonescript;

variables;

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

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

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

	set_personality_name(800,"Athron");

	sf(40,27,0);
	
	set_crime_tolerance(max_crime);

	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(4050,"You've come far.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(4050,"Ask what you need.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(4050,"Erika sends you?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(4050,"Avoid my inner sanctum.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(4050,"Stay out of the west hall.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(4050,"Speak quickly.");

break;

beginstate 10;
	if (set_att == 0) {
		set_att = 1;
		set_attitude(30001,10);
		}
break;

beginstate 11;
	if ((char_ok(4050)) && (get_attitude(4050) < 10)) {
		ok_dlog(44,1);
		set_attitude(4050,10);
		activate_hidden_group(1);
		}
break;

beginstate 12;
	if (gf(40,25) == 0) {
		sf(40,25,1);
		activate_hidden_group(2);
		}
break;

beginstate 13;
break;

beginstate 14;
break;

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

