function check_line_text()
{
	
	checking_string_var = str_cmp(chat_text_line1, clean_checking); //checks the string line against the clean string to see if it is used already (1 is a yes  0 is a no)
	if(checking_string_var == 1)
	{
		chat_line_number = 1;
		str_cpy(chat_text_line1, chat_text);
		make_playername_string(1);
	}
	if((checking_string_var = str_cmp(chat_text_line2, clean_checking)) == 1)
	{
		chat_line_number = 2;
		str_cpy(chat_text_line2, chat_text);
		make_playername_string(2);
	}
	if((checking_string_var = str_cmp(chat_text_line3, clean_checking)) == 1)
	{
		chat_line_number = 3;
		str_cpy(chat_text_line3, chat_text);
		make_playername_string(3);
	}
	if((checking_string_var = str_cmp(chat_text_line4, clean_checking)) == 1)
	{
		chat_line_number = 4;
		str_cpy(chat_text_line4, chat_text);
		make_playername_string(4);
	}
	if((checking_string_var = str_cmp(chat_text_line5, clean_checking)) == 1)
	{
		chat_line_number = 5;
		str_cpy(chat_text_line5, chat_text);
		make_playername_string(5);
	}
	if((checking_string_var = str_cmp(chat_text_line6, clean_checking)) == 1)
	{
		chat_line_number = 6;
		str_cpy(chat_text_line6, chat_text);
		make_playername_string(6);
	}
	if((checking_string_var = str_cmp(chat_text_line7, clean_checking)) == 1)
	{
		chat_line_number = 7;
		str_cpy(chat_text_line7, chat_text);
		make_playername_string(7);
	}
	if((checking_string_var = str_cmp(chat_text_line8, clean_checking)) == 1)
	{
		chat_line_number = 8;
		str_cpy(chat_text_line8, chat_text);
		make_playername_string(8);
	}
}

function init_textbox()
{
	
	if(is(show_chat, SHOW))//if the main chat is shown
	{
	toggle(show_chat,SHOW);//turns off the main chat text box (if it is visible)
	}
	
//	make_playername_string(); 
	
	set(text_box, SHOW);//shows the type in chat box
	
	inkey_value = inkey(text); //gets the chat text
	
	str_cpy(chat_text, text);//copies the chat text for the main chat text box
	
	blank_chat_text = str_cmp(chat_text, chat_text_plain);//checks to see if the chat_text is blank in case pressed esc or something returns 1 if it is blank 0 if it is different
	
	
	//str_cpy(chat_text_line1, chat_text);//sends the chat line to the 1st line display on the chat_text panel
	
	toggle(text_box,SHOW); //hides the type in chat text box
	
	if (blank_chat_text != 1 && inkey_value != 27)//if the chat_Text is empty dont show a blank text
	{
	check_line_text();
	set(show_chat, SHOW);//unhides the main text box
	}
	
	str_cpy(text, clean);
	
	//pan_setdigits(show_chat, 0, value_x, value_y, "%.f", courier, 1, 0);
	//value_y += 18;
}

if (blank_chat_text != 1

STRING* text = "                                                                                                                               ";
STRING* chat_text = "                                                                                                                                ";
STRING* chat_text_plain = "                                                                                                                                ";
//string for emptying the textbox when it is shown again
STRING* clean = "                                                                                                                               ";


/////////////////////////////////////////////////
//these chat_text_lines correspond to the lines of text
//from the chat text box
//
////////////////////////////////////////////////
STRING* clean_checking = "                                                                                                                               ";
STRING* chat_text_line1 = "                                                                                                                               ";
STRING* chat_text_line2 = "                                                                                                                               ";
STRING* chat_text_line3 = "                                                                                                                               ";
STRING* chat_text_line4 = "                                                                                                                               ";
STRING* chat_text_line5 = "                                                                                                                               ";
STRING* chat_text_line6 = "                                                                                                                               ";
STRING* chat_text_line7 = "                                                                                                                               ";
STRING* chat_text_line8 = "                                                                                                                               ";


FONT* arial = "arial#20bi";

STRING* playername = "FANGED SCORPION"; //this sets up the string for getting the player's name
//STRING* playername2 = "FANGED SCOPRION"
STRING* playername1 = "";
STRING* playername2 = "";
STRING* playername3 = "";
STRING* playername4 = "";
STRING* playername5 = "";
STRING* playername6 = "";
STRING* playername7 = "";
STRING* playername8 = "";

STRING* DEBUG_STRING = ""; ///REMOVE THIS BEFORE RELEASE!!!!!!!!!!!!!!
 
var blank_chat_text = 0; //this value is used to compare the updated chat_text to the original chat_text (1 means strings are same 0 is no)

var inkey_value;//checks the inkey value if the inkey functio nwas terminated

var chat_line_number = 1; //this var helps to scroll the text as the var is increased, higher number = next line of text on chat_text panel

var checking_string_var;//string is empty if this is 1 ((((can put in the check line text if need to)

int value_x = 0; //the x value of the digits for the main chat box
int value_y = 16; //the y value of the digits for the main chat box

if ((checking_string_var = str_cmp(chat_text_line2, clean_checking)) == 1)

if (str_cmp(chat_text_line2, clean_checking) == 1)