CatchEvent OnMSO( $userName, $text ) # Player event
	$text = Tolower( $text );
	$idxOfFirstSpace = indexOf( $text, " ");
	IF( $idxOfFirstSpace == -1 ) THEN
	  $command = $text;
	  $argv = "";
	ELSE
	  $command = subStr( $text,0,$idxOfFirstSpace );
	  $argv = trim( subStr( $text,$idxOfFirstSpace ) );
	ENDIF
	SWITCH( $command )
		CASE "!language":
		CASE "!lang":
			OpenLangPanel($KeyFlags);
		BREAK;
	ENDSWITCH
EndCatchEvent

CatchEvent OnConnect( $userName )
	$language = GetUserStoredValue( $userName, "language" );
	SetCurrentPlayerVar("IdLang",$language);
EndCatchEvent

Sub OpenLangPanel($KeyFlags)
	openPrivButton( "hudbackground",50,50,100,100,5,-1,32, "");
	openPrivButton( "hudbackground2",51,51,98,98,5,-1,16, "");
	openPrivButton( "hudheader",50,40,100,9,5,-1,32, "");
	openPrivButton( "hudheader2",51,41,98,7,5,-1,16, langEngine("%{headertext}%"));
	openPrivButton( "hudclose",90,150,20,7,5,-1,32, "");
	openPrivButton( "hudclose2",91,151,18,5,5,-1,16, langEngine("%{closebutton}%"), CloseButton);
	
	openPrivButton( "lang_tr",52,52,30,20,5,-1,32, "^7Türkçe" ,SetLanguage);
	openPrivButton( "lang_en",85,52,30,20,5,-1,32, "^7English" ,SetLanguage);
	openPrivButton( "lang_pt",118,52,30,20,5,-1,32, "^7Português" ,SetLanguage);
	
	openPrivButton( "lang_de",52,74,30,20,5,-1,32, "^7Deutsch" ,SetLanguage);
	openPrivButton( "lang_fr",85,74,30,20,5,-1,32, "^7Français" ,SetLanguage);
	openPrivButton( "lang_it",118,74,30,20,5,-1,32, "^7Italiano" ,SetLanguage);
EndSub

Sub CloseButton($KeyFlags,$ButtonID)
	closeprivbutton("hudbackground&hudbackground2&hudheader&hudheader2&hudclose&hudclose2&lang_tr&lang_en&lang_pt&lang_de&lang_fr&lang_it&hudinfobox&hudinfobox2");
EndSub

Sub SetLanguage( $KeyFlags,$ButtonID )
    $language = trim( subStr( $ButtonID,5 ) );
	$userName = GetCurrentPlayerVar("UserName");
	
	SetUserStoredValue( $userName, "language", $language);
	SetCurrentPlayerVar("IdLang",$language);
	
	LanguageSelectInfo( $KeyFlags );
    OpenLangPanel($KeyFlags);
EndSub

Sub LanguageSelectInfo( $KeyFlags )
	openPrivButton( "hudinfobox",50,30,100,9,5,3,32, "");
	openPrivButton( "hudinfobox2",51,31,98,7,5,3,16, langEngine("%{infoboxtext}%"));
EndSub

Lang "EN"
    closebutton = "^2Close";
	headertext = "^7Language Select Menu";
	infoboxtext = "^1-- ^2System language set to English ^1--";
EndLang

Lang "TR"
    closebutton = "^2Kapat";
	headertext = "^7Dil Seçim Menüsü";
	infoboxtext = "^1-- ^2Sistem dili Türkçe olarak ayarlandı ^1--";
EndLang

Lang "PT"
    closebutton = "^2Fechar";
	headertext = "^7Menu de seleção de idioma";
	infoboxtext = "^1-- ^2Idioma do sistema definido para português ^1--";
EndLang

Lang "DE"
    closebutton = "^2Schließen";
	headertext = "^7Sprachauswahlmenü";
	infoboxtext = "^1-- ^2Die Systemsprache ist auf Deutsch eingestellt ^1--";
EndLang

Lang "FR"
    closebutton = "^2Fermer";
	headertext = "^7Menu de sélection de la langue";
	infoboxtext = "^1-- ^2La langue du système est définie sur le français ^1--";
EndLang

Lang "IT"
    closebutton = "^2Vicino";
	headertext = "^7Menù di selezione della lingua";
	infoboxtext = "^1-- ^2Lingua di sistema impostata su italiano ^1--";
EndLang