help pliz

[Jacobob14]

what is the problem I get this error

http://prntscr.com/3q2p3x

client

function buy ()  
triggerServerEvent("buycar", localPlayer) 
end 
addEventHandler("onClientGUIClick", comprar, buy) 
  

server

function buycar( source) 
 if isPedInVehicle(source) then 
 local vehicle = getPedOccupiedVehicle( source ) 
if ( getPlayerMoney(source) >= getElemetData(vehicle,"price")) then 
     local sx, sy, sz = getElementPosition( source ) 
     local rx, ry, rz = getElementRotation ( source )   
     local id = getElementID( vehicle ) 
     local r1, g1, b1, r2, g2, b2 = getVehicleColor (vehicle) 
local userr =getAccountName( getPlayerAccount (source) ) 
     if vehicles[id] then 
                    vehicles[id]["x"] = sx 
                    vehicles[id]["y"] = sy 
                    vehicles[id]["z"] = sz 
                    vehicles[id]["rotX"] = rx 
                    vehicles[id]["rotY"] = ry 
                    vehicles[id]["rotZ"] = rz 
                    vehicles[id]["r"] = r 
                    vehicles[id]["g"] = g 
                    vehicles[id]["b"] = b 
                    vehicles[id]["sr"] = r2 
                    vehicles[id]["sg"] = g2 
                    vehicles[id]["sb"] = b2 
                    vehicles[id]["ptype"] = "user" 
                    vehicles[id]["owner"] = userr 
                    vehicles[id]["model"] = "411" 
                    setVehicleDamageProof(vehicle, true) 
                    setVehicleColor(vehicle, 255,255,0) 
                    setElementFrozen ( vehicle, false ) 
                    fromCacheToXML() 
                    end 
                    else 
                    outputChatBox("Error 5674: Dinero Insuficiente", source, 250,230,0) 
                    end 
                    end 
                    end 
addEvent ( "buycar", true ) 
addEventHandler ( "buycar", root, buycar)    

[xXMADEXx]

Replace:

function buycar( source) 

with

function buycar( ) 

source is defined by MTA.

[Max+]

addEventHandler('onClientGUIClick', root, 
function () 
if ( localPlayer == comprar ) then 
triggerServerEvent('buycar', localPlayer) 
 end 
end 
) 
  
  
---------ServerSide 
addEvent('buycar', true) 
addEventHandler('buycar', root, 
function (player)  
local thevehicle = getPedOccupiedVehicle( player ) 
if isPedInVehicle( player ) then 
if ( getPlayerMoney(source) >= getElementData(vehicle,"price")) then 
local sx, sy, sz = getElementPosition( player ) 
local rx, ry, rz = getElementRotation ( player )   
local id = getElementID( thevehicle ) 
local r1, g1, b1, r2, g2, b2 = getVehicleColor (thevehicle) 
local userr = getAccountName( getPlayerAccount (player) ) 
     if vehicles[id] then 
                    vehicles[id]["x"] = sx 
                    vehicles[id]["y"] = sy 
                    vehicles[id]["z"] = sz 
                    vehicles[id]["rotX"] = rx 
                    vehicles[id]["rotY"] = ry 
                    vehicles[id]["rotZ"] = rz 
                    vehicles[id]["r"] = r 
                    vehicles[id]["g"] = g 
                    vehicles[id]["b"] = b 
                    vehicles[id]["sr"] = r2 
                    vehicles[id]["sg"] = g2 
                    vehicles[id]["sb"] = b2 
                    vehicles[id]["ptype"] = "user" 
                    vehicles[id]["owner"] = userr 
                    vehicles[id]["model"] = "411" 
                    setVehicleDamageProof(thevehicle, true) 
                    setVehicleColor(thevehicle, 255,255,0) 
                    setElementFrozen (thevehicle, false ) 
                    fromCacheToXML() 
                    end 
                    else 
                    outputChatBox("Error 5674: Dinero Insuficiente", player, 250,230,0) 
                     
               end 
            end 
             
        end 
      ) 

[xXMADEXx]

addEventHandler('onClientGUIClick', root, 
function () 
if ( localPlayer == comprar ) then 
triggerServerEvent('buycar', localPlayer) 
 end 
end 
) 
  
  
---------ServerSide 
addEvent('buycar', true) 
addEventHandler('buycar', root, 
function (player)  
local thevehicle = getPedOccupiedVehicle( player ) 
if isPedInVehicle( player ) then 
if ( getPlayerMoney(source) >= getElementData(vehicle,"price")) then 
local sx, sy, sz = getElementPosition( player ) 
local rx, ry, rz = getElementRotation ( player )   
local id = getElementID( thevehicle ) 
local r1, g1, b1, r2, g2, b2 = getVehicleColor (thevehicle) 
local userr = getAccountName( getPlayerAccount (player) ) 
     if vehicles[id] then 
                    vehicles[id]["x"] = sx 
                    vehicles[id]["y"] = sy 
                    vehicles[id]["z"] = sz 
                    vehicles[id]["rotX"] = rx 
                    vehicles[id]["rotY"] = ry 
                    vehicles[id]["rotZ"] = rz 
                    vehicles[id]["r"] = r 
                    vehicles[id]["g"] = g 
                    vehicles[id]["b"] = b 
                    vehicles[id]["sr"] = r2 
                    vehicles[id]["sg"] = g2 
                    vehicles[id]["sb"] = b2 
                    vehicles[id]["ptype"] = "user" 
                    vehicles[id]["owner"] = userr 
                    vehicles[id]["model"] = "411" 
                    setVehicleDamageProof(thevehicle, true) 
                    setVehicleColor(thevehicle, 255,255,0) 
                    setElementFrozen (thevehicle, false ) 
                    fromCacheToXML() 
                    end 
                    else 
                    outputChatBox("Error 5674: Dinero Insuficiente", player, 250,230,0) 
                     
               end 
            end 
             
        end 
      ) 

player will return nil.