------------------------------
--#Copyright by StylezZ 2012--
------------------------------
paneltus = "F3"

local sWidth, sHeight = guiGetScreenSize()

local px = sWidth/800
local py = sHeight/600

function Messenger_On_Render ()
    dxDrawText("Chat History",415.0*px,144.0*py,565.0*px,168.0*py,tocolor(10,10,10,255),1.0*py,"default-bold","center","center",false,false,false)
end

addEventHandler("onClientResourceStart",resourceRoot,
    function()
       panel = guiCreateWindow(298.0*px,176.0*py,320.0*px,280.0*py,"Sohbet Paneli",false)
       guiSetProperty(panel, "CaptionColour", "FF12FE00") 
	   Messanger_Gridlist = guiCreateGridList(5*px,27*py,109*px,250*py,false,panel)
        guiGridListSetSelectionMode(Messanger_Gridlist,1)

        Messanger_Spieler_Column = guiGridListAddColumn(Messanger_Gridlist,"Oyuncular",0.8,panel)
		
        Messanger_edit = guiCreateEdit(115*px,240*py,155*px,33*py,"",false,panel)
        Messanger_button_send = guiCreateButton(275*px,240*py,41*px,31*py,"Gönder",false,panel)
		guiSetProperty(Messanger_button_send, "NormalTextColour", "FF17FE00")
       -- Messanger_button_abbrechen = guiCreateButton(80*px,149*py,19*px,21*py,"X",false,panel)
		--Messenger_button_block = guiCreateButton(387*px,440*py,165*px,23*py,"block player",false,panel)
		
		Messanger_memo = guiCreateMemo(115*px,27*py,202*px,206*py,"",false,panel)
		guiMemoSetReadOnly(Messanger_memo, true)
    end
)

function Messanger_Resourcestart ()
        guiSetVisible (panel, false)	
        guiSetVisible (Messanger_Gridlist, false)
	guiSetVisible (Messanger_edit, false)
	guiSetVisible (Messanger_button_send, false)
	guiSetVisible (Messanger_button_abbrechen, false)
	guiSetVisible (Messenger_button_block, false)
	guiSetVisible (Messanger_memo, false)
	
end
addEventHandler("onClientResourceStart", getResourceRootElement(getThisResource()), Messanger_Resourcestart)


function staticsPanelAcKapat ()
	if guiGetVisible (panel) == true then
		guiSetVisible(panel, false)
		guiSetInputEnabled(false)
                guiSetVisible (Messanger_Gridlist, false)
		guiSetVisible (Messanger_edit, false)
		guiSetVisible (Messanger_button_send, false)
		guiSetVisible (Messanger_button_abbrechen, false)
		guiSetVisible (Messenger_button_block, false)
		guiSetVisible (Messanger_memo, false)
                showCursor(false)		
	else
		guiSetVisible(panel, true)
		guiSetVisible (Messanger_Gridlist, true)
		guiSetVisible (Messanger_edit, true)
		guiSetVisible (Messanger_button_send, true)
		guiSetVisible (Messanger_button_abbrechen, true)
		guiSetVisible (Messenger_button_block, true)
		guiSetVisible (Messanger_memo, true)
                showCursor (true)
		Messanger_Gridlist_refresh()
                guiSetText(Messanger_memo, "")
		showCursor(true)	
	end
end
bindKey ( paneltus, "down", staticsPanelAcKapat )


function Messanger_Gridlist_refresh ()
	guiGridListClear ( Messanger_Gridlist )
	for index, cPlayer in pairs(getElementsByType( "player" )) do
		local player = getLocalPlayer()
		local cPName = getPlayerName(cPlayer)
		local row = guiGridListAddRow ( Messanger_Gridlist )
		if cPlayer ~= player then
			guiGridListSetItemText ( Messanger_Gridlist, row, Messanger_Spieler_Column, getPlayerName(cPlayer), false, false )
			if getElementData(player, cPName.."New_Message_Count") then
				local Message_Abgerufen = getElementData(player, cPName.."Message_Abgerufen_Count")
				if Message_Abgerufen > 0 then
					guiGridListSetItemColor ( Messanger_Gridlist, row, Messanger_Spieler_Column, 0, 255, 0, 255 )
				else
					guiGridListSetItemColor ( Messanger_Gridlist, row, Messanger_Spieler_Column, 255, 255, 255, 255 )
				end
			end
		end
	end
end

addEventHandler("onClientGUIClick", getRootElement(),
	function ( player )
		if player == "left" then
			if source == Messanger_button_abbrechen then
				Messanger_Open_or_Close()
			end
		end
	end
)

function Messanger_Text_Send_On_Enter (button, press)
	if button == "enter" then
		if press then
			local player = getLocalPlayer()
			local target = guiGridListGetItemText ( Messanger_Gridlist, guiGridListGetSelectedItem(Messanger_Gridlist), 1 )
			if target~= "" and target ~= " " then
				local message = guiGetText(Messanger_edit)
				if message ~= "" and message ~= " " then
					triggerServerEvent ( "Messanger_send_message_serverside", getLocalPlayer(), player, target, message)
					guiSetText(Messanger_edit, "")
				else
					outputChatBox("You haven't entered a message!", 255, 0 , 0)
				end
			else
				outputChatBox("You haven't selected a player!", 255, 0, 0)
			end
		end
	end
end


addEventHandler("onClientGUIClick", getRootElement(),
	function ( player )
		if player == "left" then
			if source == Messanger_button_send then
				local player = getLocalPlayer()
				local target = guiGridListGetItemText ( Messanger_Gridlist, guiGridListGetSelectedItem(Messanger_Gridlist), 1 )
				if target~= "" and target ~= " " then
					local message = guiGetText(Messanger_edit)
					if message ~= "" and message ~= " " then
						triggerServerEvent ( "Messanger_send_message_serverside", getLocalPlayer(), player, target, message)
						guiSetText(Messanger_edit, "")
					else
						outputChatBox("You haven't entered a message!", 255, 0 , 0)
					end
				else
					outputChatBox("You haven't selected a player!", 255, 0, 0)
				end
			end
		end
	end
)

function refresh_messange_playerlist ()
	local Selected_Item = guiGridListGetSelectedItem(Messanger_Gridlist)
	Messanger_Gridlist_refresh()
	guiGridListSetSelectedItem ( Messanger_Gridlist, Selected_Item, Messanger_Spieler_Column)
end
addEvent( "refresh_messange_playerlist", true )
addEventHandler( "refresh_messange_playerlist", getRootElement(), refresh_messange_playerlist )


function refresh_messange_chatverlauf (message, Pname)
	local player = getLocalPlayer()
	local Lname = getPlayerName(player)
	if Pname then
		local selected_player = guiGridListGetItemText ( Messanger_Gridlist, guiGridListGetSelectedItem(Messanger_Gridlist), 1 )
		if selected_player == Pname then
			guiSetText(Messanger_memo, message)
			local Msg_Char_Count = tonumber(getElementData(player, Pname.."Msg_Char_Count"))
			guiMemoSetCaretIndex(Messanger_memo, Msg_Char_Count)
		end
	else
		local selected_player = guiGridListGetItemText ( Messanger_Gridlist, guiGridListGetSelectedItem(Messanger_Gridlist), 1 )
		guiSetText(Messanger_memo, message)
		local Msg_Char_Count = tonumber(getElementData(player, selected_player.."Msg_Char_Count"))
		guiMemoSetCaretIndex(Messanger_memo, Msg_Char_Count)
	end
	local getVisible = guiGetVisible (Messanger_Gridlist)
	if (getVisible == true) then
		if Pname then
			local getMessageSound = playSound ( "messanger_bling.mp3", false )
			setSoundVolume(getMessageSound, 0.5)
		end
	else
		if Pname then
			outputChatBox("You have a new message from #FFFFFF"..Pname, 255, 40, 0, true)
			local getMessageSound = playSound ( "messanger_bling.mp3", false )
			setSoundVolume(getMessageSound, 0.5)
		end
	end
end
addEvent( "refresh_messange_chatverlauf", true )
addEventHandler( "refresh_messange_chatverlauf", getRootElement(), refresh_messange_chatverlauf )


function set_Message_Text_on_Gridklick ()
	local getVisible = guiGetVisible (Messanger_Gridlist)
	if (getVisible == true) then
		local player = getLocalPlayer()
		local Text_selected_player = guiGridListGetItemText ( Messanger_Gridlist, guiGridListGetSelectedItem(Messanger_Gridlist), 1 )
		if Text_selected_player ~= "" then
			if getElementData(player, Text_selected_player.."Player_Message") then
				local Message_Abgerufen = tonumber(getElementData(player, Text_selected_player.."Message_Abgerufen_Count"))
				local Trigger_Currendt_Messages = getElementData(player, Text_selected_player.."Player_Message")
				guiSetText(Messanger_memo, Trigger_Currendt_Messages)
				local Msg_Char_Count = tonumber(getElementData(player, Text_selected_player.."Msg_Char_Count"))
				guiMemoSetCaretIndex(Messanger_memo, Msg_Char_Count)
				if Message_Abgerufen == 1 then
					setElementData(player, Text_selected_player.."Message_Abgerufen_Count", 0 )
					refresh_messange_playerlist()
				end
			else
				guiSetText(Messanger_memo, "There are no messages!")
			end
		else
			guiSetText(Messanger_memo, "No player selected!")
		end
	end
end
setTimer(set_Message_Text_on_Gridklick, 200, 0 )