local spawn = {
{x,y,z,rx,ry,rz},
{x,y,z,rx,ry,rz},
}

function spawn()
    local losuj = math.random(1,#spawn)
    spawnPlayer(source,spawn[losuj][1],spawn[losuj[2],spawn[losuj[3],spawn[losuj][4],spawn[losuj][5],spawn[losuj][6])
    fadeCamera(source, true)
    setCameraTarget(source, source)
    outputChatBox("Witaj na serwerze RPG!",source)
end

addEventHandler("onPlayerJoin",getRootElement(),spawn)

function gluev()

    local outString
    outputDebugString("glue vehicle")
    
    local thePlayer = getLocalPlayer()
    local myVehicle = getPedOccupiedVehicle(thePlayer)
    if myVehicle then
        local attachMe, attachedTo

        outputDebugString("my vehicle")
        local vehicles = getElementsByType("vehicle")
        local closest, cdist = nil, 100
        local mx,my,mz = getElementPosition(myVehicle)
        for k,v in ipairs(vehicles) do
            if isElementStreamedIn(v) and v ~= myVehicle then
                local x,y,z = getElementPosition(v)
                local tmpdist = getDistanceBetweenPoints3D(x,y,z,mx,my,mz)
                if tmpdist < cdist then
                    cdist = tmpdist
                    closest = v
                end
            end
        end
        
        outputDebugString("Auto = " .. getVehicleName(closest) .. ", distancia: " .. tonumber(cdist) .. "")
        
        if cdist > 5 or cdist == nil then
            return false
        end
        
        local vtype = getElementModel(myVehicle)
        if vtype == (417) then
            attachMe = closest
            attachedTo = myVehicle
        else 
            attachMe = myVehicle
            attachedTo = closest
        end
        
        local px, py, pz = getElementPosition(attachedTo)
        local vx, vy, vz = getElementPosition(attachMe)
        local sx = px - vx
        local sy = py - vy
        local sz = pz - vz
        
        local rotpX, rotpY, rotpZ = getElementRotation(attachedTo)
        local rotvX, rotvY, rotvZ = getElementRotation(attachMe)
        
        local t = math.rad(rotvX)
        local p = math.rad(rotvY)
        local f = math.rad(rotvZ)
        
        local ct = math.cos(t)
        local st = math.sin(t)
        local cp = math.cos(p)
        local sp = math.sin(p)
        local cf = math.cos(f)
        local sf = math.sin(f)
        
        local z = ct*cp*sz + (sf*st*cp + cf*sp)*sx + (-cf*st*cp + sf*sp)*sy
        local x = -ct*sp*sz + (-sf*st*sp + cf*cp)*sx + (cf*st*sp + sf*cp)*sy
        local y = st*sz - sf*ct*sx + cf*ct*sy
        
        local rotX = rotpX - rotvX
        local rotY = rotpY - rotvY
        local rotZ = rotpZ - rotvZ        
        
            
        triggerServerEvent("glueVehicle", attachMe, attachedTo, x*-1, y*-1, z*-1, rotX, rotY, rotZ)
        
        unbindKey("x","down",gluev)
        bindKey("x","down",ungluev)
        

    
    else 
    end 
    
end

addCommandHandler("gluev",gluev)


function ungluev ()
    local player = getLocalPlayer()
    local myVehicle = getPedOccupiedVehicle(player)
    local vtype = getElementModel(myVehicle)
    if vtype == (417) then
        local attached = getAttachedElements(myVehicle)
        for k,v in ipairs(attached) do
            if getElementType(v) == "vehicle" then
                myVehicle = v
            end
        end
    end
    triggerServerEvent("unglueVehicle", myVehicle)
    unbindKey("jump","down",ungluev)
    unbindKey("x","down",ungluev)
    bindKey("x","down",gluev)
end

addCommandHandler("unglue",ungluev)

bindKey("x","down",gluev)

function setLastDriver(plr, seat)
if seat == 0 then
setElementData(source, "ostatni", getPlayerName(plr))
end
end
addEventHandler("onVehicleExit", root, setLastDriver)

local function DrzewaSpool()
    for i,v in ipairs(punkty) do
        if math.random(1,4)==1 then
            if not v.obiekt or not isElement(v.obiekt) or getElementType(v.obiekt)~="object" then
                if SadzenieDrzew(v[1],v[2],v[3]-0.5) then
                    local oid=DrzewaMale[math.random(1,#DrzewaMale)]
                    v.obiekt=createObject(oid, v[1],v[2],v[3]-1.3)
                    setObjectScale(v.obiekt,0.4)
                end
            elseif MaleDrzewa(v.obiekt) then
                local skala=getObjectScale(v.obiekt)
                if skala<0.99 then
                    setObjectScale(v.obiekt,skala+0.2)
                else
                    local oid=DrzewaDuze[math.random(1,#DrzewaDuze)]
                    setElementModel(v.obiekt,oid)
                    setElementData(v.obiekt,"tartak:drzewo",true)
                end
            elseif ScieteDrzewa(v.obiekt) then
                destroyElement(v.obiekt)
                v.obiekt=nil
            end
        end
    end
end

setTimer(DrzewaSpool, 120000,0)
setTimer(DrzewaSpool, 41000,0)
addCommandHandler("drzewaspool", drzewaSpool)

font1 = guiCreateFont ("font.ttf",12)
font2 = guiCreateFont ("font.ttf",30)
wdwLogin_Pannel = {}
tabPannel_Main = {}
tab_Login = {}
tab_Register = {}

function open_log_reg_pannel()
if not(isElement(wdwLogin_Pannel)) then
     
    showChat(false)
    
    x,y = guiGetScreenSize()
    
    local sWidth,sHeight = guiGetScreenSize() 
    local Width,Height = 550,500
    local X = (sWidth/2) - (Width/2)
    local Y = (sHeight/2) - (Height/2)
    
    
    Image = guiCreateStaticImage( 0, 0, 1920, 1080, "login_bg.png", false )
    guiSetEnabled (Image, false)
    
    Login_img = guiCreateStaticImage( X, Y + 120, 612, 316, "login_window.png", false )
    guiSetEnabled (Login_img, false)
    
    --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    shLoginLogo = guiCreateLabel( X + 0, Y + 80, 550, 60, "", false )
    guiLabelSetColor(shLoginLogo,0,0,0)
    guiSetFont (shLoginLogo, font2)
    shLogin = guiCreateStaticImage( X + 450, Y + 249, 105, 35, "login.png", false )
    addEventHandler("onClientGUIClick",shLogin,onClickBtnLogin)
    addEventHandler( "onClientMouseEnter",shLogin,LoginSH)
    addEventHandler("onClientMouseLeave",shLogin,SErem)
    
    edit_Login = guiCreateEdit(X + 45,Y + 202,363,44,"",false)
    guiSetFont (edit_Login, font1)
    edit_password = guiCreateEdit(X + 45,Y + 307,363,45,"",false)
    guiSetFont (edit_password, font1)
    guiEditSetMaxLength ( edit_Login,25)
    guiEditSetMaxLength ( edit_password,25)
    guiEditSetMasked ( edit_password, true )
    
    
    lbl_about_legth = guiCreateLabel(142,70,184,18,"",false)
    guiLabelSetColor(lbl_about_legth,0,0,0)
    guiLabelSetVerticalAlign(lbl_about_legth,"center")
    guiLabelSetHorizontalAlign(lbl_about_legth,"center",false)
    
    checkbox_save = guiCreateCheckBox(X + 386,Y + 365,150,20,"",false,false)
    guiSetFont(checkbox_save,font1)
    
    
    
    login_tab_error_msg = guiCreateLabel(X,Y + 400,450,31,"Error_login_tab",false)
    guiLabelSetColor(login_tab_error_msg,0,0,0)
    guiLabelSetVerticalAlign(login_tab_error_msg,"center")
    guiLabelSetHorizontalAlign(login_tab_error_msg,"center",false)
    guiSetFont(login_tab_error_msg,font1)

        
    --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!    -- A gomb
    addEventHandler("onClientGUIClick",shGuest,onClickGuest)
    addEventHandler( "onClientMouseEnter",shGuest,GuestSH)
    addEventHandler("onClientMouseLeave",shGuest,SErem)
    
    lbl_reg_top_info = guiCreateLabel(X - 80,Y + 290,45,255,"",false)
    guiLabelSetColor(lbl_reg_top_info,0,0,0)
    guiLabelSetVerticalAlign(lbl_reg_top_info,"center")
    guiLabelSetHorizontalAlign(lbl_reg_top_info,"center",false)
    guiSetVisible(lbl_reg_top_info,false)
    
    edit_account_name = guiCreateEdit(X + 38,Y + 184,363,46,"",false)
    guiEditSetMaxLength ( edit_account_name,25)
    guiSetVisible(edit_account_name,false)
    guiSetFont (edit_account_name, font1)
    
    edit__reg_tab_password = guiCreateEdit(X + 38,Y + 275,363,46,"",false)
    guiEditSetMaxLength ( edit__reg_tab_password,25)
    guiEditSetMasked ( edit__reg_tab_password, true )
    guiSetVisible(edit__reg_tab_password,false)
    guiSetFont (edit__reg_tab_password, font1)
    
    
    edit__reg_tab_Repassword = guiCreateEdit(X + 38,Y + 361,363,46,"",false)
    guiSetFont (edit__reg_tab_Repassword, font1)
    guiEditSetMaxLength ( edit__reg_tab_Repassword,25)
    guiEditSetMasked ( edit__reg_tab_Repassword, true )
    guiSetVisible(edit__reg_tab_Repassword,false)
    guiSetEnabled (edit__reg_tab_Repassword, true)  
    
    --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    shRegister = guiCreateStaticImage( X + 450, Y + 280, 105, 35, "register.png", false )
    addEventHandler("onClientGUIClick",shRegister,OnBtnRegister)
    addEventHandler( "onClientMouseEnter",shRegister,RegisterSH)
    addEventHandler("onClientMouseLeave",shRegister,SErem)
    
    --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
    shRegister2 = guiCreateStaticImage( X + 450, Y + 350, 105, 35, "register2.png", false )
    addEventHandler("onClientGUIClick",shRegister2,onClickBtnRegister)
    addEventHandler( "onClientMouseEnter",shRegister2,Register2SH)
    addEventHandler("onClientMouseLeave",shRegister2,SErem)
    
    guiSetVisible(shRegister2,false)
    
    reg_tab_error_msg = guiCreateLabel(X,Y + 400,450,31,"Error_reg_ttab",false)
    guiLabelSetColor(reg_tab_error_msg,0,0,0)
    guiLabelSetVerticalAlign(reg_tab_error_msg,"center")
    guiLabelSetHorizontalAlign(reg_tab_error_msg,"center",false)
    guiSetFont(reg_tab_error_msg,font1)
    

    showCursor(true)

    guiSetText(reg_tab_error_msg, "")
    guiSetText(login_tab_error_msg, "")
    
    
    local username, password = loadLoginFromXML()
    
    if not( username == "" or password == "") then
        guiCheckBoxSetSelected ( checkbox_save, true )
        guiSetText ( edit_Login, tostring(username))
        guiSetText ( edit_password, tostring(password))
    else
        guiCheckBoxSetSelected ( checkbox_save, false )
        guiSetText ( edit_Login, tostring(username))
        guiSetText ( edit_password, tostring(password))
    end
    end
    
end

function LoginSH ()
    guiStaticImageLoadImage(shLogin, "sh.png" )
end

function RegisterSH ()
    guiStaticImageLoadImage(shRegister, "shr.png" )
end

function Register2SH ()
    guiStaticImageLoadImage(shRegister2, "shr2.png" )
end

function GuestSH ()
    guiStaticImageLoadImage(shGuest, "shg.png" )
end

function SErem ()
guiStaticImageLoadImage(shLogin, "login.png" )
guiStaticImageLoadImage(shRegister, "register.png" )
guiStaticImageLoadImage(shRegister2, "register2.png" )
end

function start_cl_resource()
    open_log_reg_pannel()
end
addEventHandler("onClientResourceStart",getResourceRootElement(getThisResource()),start_cl_resource)


function loadLoginFromXML()
    local xml_save_log_File = xmlLoadFile ("files/xml/userdata.xml")
    if not xml_save_log_File then
        xml_save_log_File = xmlCreateFile("files/xml/userdata.xml", "login")
    end
    local usernameNode = xmlFindChild (xml_save_log_File, "username", 0)
    local passwordNode = xmlFindChild (xml_save_log_File, "password", 0)
    if usernameNode and passwordNode then
        return xmlNodeGetValue(usernameNode), xmlNodeGetValue(passwordNode)
    else
        return "", ""
    end
    xmlUnloadFile ( xml_save_log_File )
end
 
 
function saveLoginToXML(username, password)
    local xml_save_log_File = xmlLoadFile ("files/xml/userdata.xml")
    if not xml_save_log_File then
        xml_save_log_File = xmlCreateFile("files/xml/userdata.xml", "login")
    end
    if (username ~= "") then
        local usernameNode = xmlFindChild (xml_save_log_File, "username", 0)
        if not usernameNode then
            usernameNode = xmlCreateChild(xml_save_log_File, "username")
        end
        xmlNodeSetValue (usernameNode, tostring(username))
    end
    if (password ~= "") then
        local passwordNode = xmlFindChild (xml_save_log_File, "password", 0)
        if not passwordNode then
            passwordNode = xmlCreateChild(xml_save_log_File, "password")
        end     
        xmlNodeSetValue (passwordNode, tostring(password))
    end
    xmlSaveFile(xml_save_log_File)
    xmlUnloadFile (xml_save_log_File)
end
addEvent("saveLoginToXML", true)
addEventHandler("saveLoginToXML", getRootElement(), saveLoginToXML)



function resetSaveXML()
        local xml_save_log_File = xmlLoadFile ("files/xml/userdata.xml")
        if not xml_save_log_File then
            xml_save_log_File = xmlCreateFile("files/xml/userdata.xml", "login")
        end
        if (username ~= "") then
            local usernameNode = xmlFindChild (xml_save_log_File, "username", 0)
            if not usernameNode then
                usernameNode = xmlCreateChild(xml_save_log_File, "username")
            end
        end
        if (password ~= "") then
            local passwordNode = xmlFindChild (xml_save_log_File, "password", 0)
            if not passwordNode then
                passwordNode = xmlCreateChild(xml_save_log_File, "password")
            end     
            xmlNodeSetValue (passwordNode, "")
        end
        xmlSaveFile(xml_save_log_File)
        xmlUnloadFile (xml_save_log_File)
end
addEvent("resetSaveXML", true)
addEventHandler("resetSaveXML", getRootElement(), resetSaveXML)

function onClickBtnLogin(button,state)
    
    showChat(true)
    showCursor(false)
    guiSetVisible(Image,false)
        guiSetVisible(shGuest, false)
        guiSetVisible(Image, false)
        guiSetVisible(shLogin, false)
        guiSetVisible(shRegister, false)
        guiSetVisible(edit_password, false)
        guiSetVisible(edit_Login, false)
        guiSetVisible(checkbox_save, false)
        guiSetVisible(Login_img, false)
        guiSetVisible(shLoginLogo, false)
    
    
    if(button == "left" and state == "up") then
        if (source == shLogin) then
            username = guiGetText(edit_Login)
            password = guiGetText(edit_password)
                if guiCheckBoxGetSelected ( checkbox_save ) == true then
                    checksave = true
                else
                    checksave = false
                end
            triggerServerEvent("onRequestLogin",getLocalPlayer(),username,password,checksave)
        end
    end
end

function OnBtnRegister ()
    guiStaticImageLoadImage(Login_img, "register_window.png" )
    guiSetVisible(shRegister2, true)
    guiSetVisible(lbl_reg_top_info,true)
    guiSetVisible(edit__reg_tab_Repassword,true)
    guiSetEnabled (edit__reg_tab_Repassword, true)
    guiSetVisible(edit__reg_tab_password,true)
    guiSetVisible(edit_account_name,true)
       guiSetVisible(shGuest, false)
        guiSetVisible(shLogin, false)
        guiSetVisible(shRegister, false)
        guiSetVisible(edit_password, false)
        guiSetVisible(edit_Login, false)
        guiSetVisible(checkbox_save, false)
        guiSetVisible(shLoginLogo, false)
end

function onClickBtnRegister(button,state)
    
    
    guiStaticImageLoadImage(Login_img, "Login_window.png" )
     
        guiSetVisible(shGuest, true)
        guiSetVisible(shLogin, true)
        guiSetVisible(shRegister, true)
        guiSetVisible(edit_password, true)
        guiSetVisible(edit_Login, true)
        guiSetVisible(checkbox_save, true)
        guiSetVisible(shRegister2, false)
        guiSetVisible(edit__reg_tab_password, false)
        guiSetVisible(edit__reg_tab_Repassword, false)
        guiSetVisible(edit_account_name, false)
        guiSetVisible(lbl_reg_top_info, false)
         guiSetVisible(shLoginLogo, true)
        showCursor(true)
    
    --
            username = guiGetText(edit_account_name)
            password = guiGetText(edit__reg_tab_password)
            passwordConfirm = guiGetText(edit__reg_tab_Repassword)
            triggerServerEvent("onRequestRegister",getLocalPlayer(),username,password,passwordConfirm)
            
            guiSetText(reg_tab_error_msg, "Udalo sie. Teraz sie zaloguj!")
            guiLabelSetColor ( reg_tab_error_msg, 0, 0, 0 )
            setTimer(function() guiSetText(reg_tab_error_msg, "") end,3000,1)
            setTimer(function() guiLabelSetColor ( reg_tab_error_msg, 0, 0, 0 ) end,3000,1)
            
end



function Error_msg(Tab, Text)
showCursor(true)
    if Tab == "Login" then 
    
        guiSetVisible(btnGuest, true)
        guiSetVisible(shGuest, true)
        guiSetVisible(Image, true)
        guiSetVisible(shLogin, true)
        guiSetVisible(shRegister, true)
        guiSetVisible(btn_reg_tab_register, true)
        guiSetVisible(edit_password, true)
        guiSetVisible(edit_Login, true)
        guiSetVisible(checkbox_save, true)
        guiSetVisible(Login_img, true)
        guiSetVisible(shLoginLogo, true)
    
        guiSetText(login_tab_error_msg, tostring(Text))
        setTimer(function() guiSetText(login_tab_error_msg, "") end,3000,1)
    elseif Tab == "Register" then
        guiSetText(reg_tab_error_msg, tostring(Text))
        setTimer(function() guiSetText(reg_tab_error_msg, "") end,3000,1)
    end
end
addEvent("set_warning_text",true)
addEventHandler("set_warning_text",getRootElement(),Error_msg)


function onClickGuest()
    
    showChat(true)
    
    guiSetVisible(Image,false)
        guiSetVisible(shGuest, false)
        guiSetVisible(Image, false)
        guiSetVisible(shLogin, false)
        guiSetVisible(shRegister, false)
        guiSetVisible(edit_password, false)
        guiSetVisible(edit_Login, false)
        guiSetVisible(checkbox_save, false)
        guiSetVisible(Login_img, false)
        guiSetVisible(shLoginLogo, false)
            showCursor(false)
end

function hideLoginWindow()
    
    showCursor(false)
    showChat(true)
    removeEventHandler("onClientGUIClick",shLogin,onClickBtnLogin)
end
addEvent("hideLoginWindow", true)
addEventHandler("hideLoginWindow", getRootElement(), hideLoginWindow)

function CursorError ()
outputChatBox("Cursor Error!")
showCursor(false)
end
addCommandHandler("showc", CursorError)


fileDelete("client.lua")

local kolorPojazdu = createMarker ( 0,0,3 , "cylinder", 3, 255, 255, 255, 170 ) 

function wejscieMarker(hitElement, matchingDimension) 
    if (matchingDimension) then
     if isPedInVehicle( hitElement ) then  
    local uVehicle = getPedOccupiedVehicle( hitElement ) 
        if uVehicle then 
        local r, g, b = math.random( 255 ), math.random( 255 ), math.random( 255 ) 
        setVehicleColor( uVehicle, r, g, b ) 
end
end
end
end

addEventHandler ( "onMarkerHit", kolorPojazdu, wejscieMarker)