// .txt

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 5;
short last_abil;
short counter = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

	add_range_to_group(12424,12427,37);
	set_name(30037,"Huge Lizard");
	set_level(30037,15);
	set_aggression(30037,60);
	set_aggression(12428,60);
	
	set_name(12429,"Gless-Thsss");
	set_name(12430,"Aktitoss");
	set_name(12431,"Pelin-Ath");
	set_name(12432,"Ethssyn");
	set_name(12433,"Seleeass");
	set_name(12434,"Slith Farmer");
	set_name(12435,"Slith Farmer");
	set_name(12436,"Slith Farmer");
	set_name(12437,"Slith Farmer");

	set_name(12451,"Treviass");
	if (gf(161,3) == 0)
		erase_char(12451);

//	add_range_to_group(,,groupn);

	set_crime_tolerance(max_crime);

	break;

beginstate EXIT_STATE;

break;

beginstate START_STATE;
		
	if ((get_crime_level() >= max_crime) && (im_hostile == 0)) {
		make_zone_hostile(); 
		im_hostile = 1;
		//erase_char(30000);
		begin_talk_mode(299);
		}


	if (gf(115,7) < 2) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12429,"What has he done?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12429,"I let this happen.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12429,"Ah, a soldier.");
		}
	if (gf(115,7) == 2) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12429,"The crisis is over.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12429,"Are the humans friendly?");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12429,"So tired.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(12429,"Who will follow me?");
		}
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12430,"A good likenessss.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12430,"Tink! Tink!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12430,"Whack ... WHACK!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12431,"Stop that!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12431,"Back in the pool.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12431,"Aiiii!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12431,"Where is that meat?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12432,"Sharpen the tinesss ...");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12432,"Heat the metal ...");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12432,"Form the fork ...");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12432,"Isss no future here ...");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12433,"Be at peace.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12433,"You are welcome here.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12433,"I will share knowledge.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12433,"This is my sanctum.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12451,"I would be better dead.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12451,"I tried. I failed.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12451,"It is all futile.");

	//	}

	//if (((is_combat()) && (tick_difference(last_abil,get_current_tick()) > 0)) || ((is_group()) && (tick_difference(last_abil,get_current_tick()) > 5))) {
	//	last_abil = get_current_tick();
	//	}
break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 22;
		if (revive_party()) {
			print_str_color("Entering or leaving Gnass heals your wounds",2);
			print_str_color("  and restores your spell energy.",2);
			}
break;

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