Function com_status()
	If e_player<>e_server Then 
	Else 
	For player.player = Each player
		If player\id=id Then 
	con_add("",0,0)
	con_add("--- Status ---",0,0)
	con_add("Servername: "+e_sv_name,0,0)
	con_add("ServerIP: "+DottedIP(e_sv_ip)+":"+e_sv_port,0,0)
	con_add("Map: "+map_name$+", "+player\x+"x, "+player\y+"y, "+player\dir+"u",0,0)
	con_add("# Name Frags Deaths",0,0)
	EndIf
	Next 
	Local tcpport
	For player.player = Each player
		If player\bot Then
			con_add(player\id+" "+player\name+" "+player\frags+" "+player\deads,0,0)
		Else
			If player\id=e_server Then
				;con_add(player\id+"# "+player\name+" ("+DottedIP(player\ip)+":"+player\port+")",0,0)
				con_add(player\id+" "+player\name+" "+player\frags+" "+player\deads,0,0)
			EndIf
		EndIf
	Next
	EndIf 
	con_add("",0,1)
End Function

;Command: Disconnect
Function com_disconnect()
				;Server
				If e_player=e_server Then
					;Online Quit
					If e_bot=0 Then
						tcp_killserver(DottedIP(e_sv_ip))
						player_leave(e_player,3,1)
					;Offline Quit
					Else
						udp_clear()
						men_set(30)
					EndIf
				Else
					player_leave(e_player,0,1)
				EndIf
				e_cls()
				leave=1
			If key=2 Then hud_men_set(0)
End Function