Hallo,
ich hab ein Problem undzwar wenn der Server startet spawnen nicht alle Privaten Fahrzeuge nur ein paar Stück und ich finde den Fehler nicht.
Fehlermeldung: carsys_mysql.lua:48: bad argument #1 to 'floor' (number expected, got nil)
CODE:
Lua
local usedCarStrings = {}
debug.sethook()
carsSpawned = false
gangVehicles = {}
function privVeh_spawning()
caramount = 0
deletedcars = 0
result = mysql_query(handler, "SELECT * FROM vehicles")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
if(mysql_num_rows(result) > 0) then
carsData = mysql_fetch_assoc(result)
mySQLCarCreate ()
else
mysql_free_result(result)
outputServerLog("Es wurden keine Autos gefunden")
end
end
end
setTimer ( privVeh_spawning, 5000, 1 )
function mySQLCarCreate ()
if not carsSpawned then
caramount = caramount + 1
local Besitzer = carsData["Besitzer"]
local valid = true
if carsData["AuktionsID"] then
carsData["AuktionsID"] = tonumber ( carsData["AuktionsID"] )
if carsData["AuktionsID"] then
if carsData["AuktionsID"] > 0 then
valid = false
end
end
end
if valid then
if Besitzer == MySQL_Save ( Besitzer ) then
if isOwnerActive ( Besitzer ) then
local Typ = carsData["Typ"]
local Tuning = carsData["Tuning"]
local Spawnpos_X = tonumber(carsData["Spawnpos_X"])
local Spawnpos_Y = tonumber(carsData["Spawnpos_Y"])
local Slot = carsData["Slot"]
local tmp = getPrivVehString ( Besitzer, Slot )
if not badMySQLCarHouseXSpawns[math.floor ( Spawnpos_X )] and not badMySQLCarHouseYSpawns[math.floor ( Spawnpos_Y )] and not usedCarStrings[tmp] then
usedCarStrings[tmp] = true
local Spawnpos_Z = tonumber(carsData["Spawnpos_Z"])
local Spawnrot_X = tonumber(carsData["Spawnrot_X"])
local Spawnrot_Y = tonumber(carsData["Spawnrot_Y"])
local Spawnrot_Z = tonumber(carsData["Spawnrot_Z"])
local Special = tonumber(carsData["Special"])
local Farbe = carsData["Farbe"]
local Tieferlegung = tonumber(carsData["NewTuningTL"])
-- if Tieferlegung ~= 0 then
-- outputChatBox(Besitzer)
-- outputChatBox(Slot)
-- end
-- outputChatBox(Tieferlegung)
local MotorUpgrade = tonumber(carsData["NewTuningMU"])
if #( tostring ( Farbe ) )<= 3 then
Farbe = "0|0|0|0"
MySQL_SetString("vehicles", "Farbe", Farbe, "Besitzer LIKE '" ..Besitzer.."' AND Slot LIKE '" ..tonumber(Slot).. "' ")
end
local Paintjob = carsData["Paintjob"]
local Benzin = carsData["Benzin"]
local Gang = carsData["Gang"]
_G[getPrivVehString ( Besitzer, Slot )] = createVehicle ( Typ, Spawnpos_X, Spawnpos_Y, Spawnpos_Z, 0, 0, 0, Besitzer )
if Special == 2 then
local vx, vy, vz = Spawnpos_X, Spawnpos_Y-2, 1.55
both = Besitzer..Slot
_G["ObjYacht"..both] = createObject ( 1337, vx, vy, vz )
attachElements ( _G["ObjYacht"..both], _G[getPrivVehString ( Besitzer, Slot )], 0, 2, 1.55 )
setElementDimension ( _G["ObjYacht"..both], 1 )
end
local veh = _G[getPrivVehString ( Besitzer, Slot )]
local STuning = MySQL_GetString("vehicles", "STuning", "Besitzer LIKE '"..Besitzer.."' AND Slot LIKE '"..Slot.."'")
vioSetElementData ( veh, "stuning", STuning )
setVehicleAsMagnetHelicopter ( veh )
setVehicleRotation ( veh, Spawnrot_X, Spawnrot_Y, Spawnrot_Z )
vioSetElementData ( veh, "owner", Besitzer )
vioSetElementData ( veh, "name", veh )
vioSetElementData ( veh, "carslotnr_owner", Slot )
vioSetElementData ( veh, "locked", true )
vioSetElementData ( veh, "color", Farbe )
vioSetElementData ( veh, "NewTuningTL", Tieferlegung )
vioSetElementData ( veh, "NewTuningMU", MotorUpgrade )
vioSetElementData ( veh, "spawnpos_x", Spawnpos_X )
vioSetElementData ( veh, "spawnpos_y", Spawnpos_Y )
vioSetElementData ( veh, "spawnpos_z", Spawnpos_Z )
vioSetElementData ( veh, "spawnrot_x", Spawnrot_X )
vioSetElementData ( veh, "spawnrot_y", Spawnrot_Y )
vioSetElementData ( veh, "spawnrot_z", Spawnrot_Z )
vioSetElementData ( veh, "special", Special )
vioSetElementData ( veh, "lcolor", carsData["Lights"] )
vioSetElementData ( veh, "distance", tonumber ( carsData["Distance"] ) )
vioSetElementData ( veh, "Gang", tonumber ( Gang ) )
setPrivVehCorrectLightColor ( veh )
setVehicleLocked ( veh, true )
vioSetElementData ( veh, "fuelstate", tonumber ( Benzin ) )
setPrivVehCorrectColor ( veh )
setVehiclePaintjob ( veh, Paintjob )
setElementFrozen ( veh, true )
if vioGetElementData ( veh, "Gang" ) ~= 0 then
setElementFrozen ( veh, false )
-- outputChatBox(Gang)
-- outputChatBox("trololololol "..vioGetElementData ( veh, "Gang" ))
if not ( gangVehicles[vioGetElementData ( veh, "Gang" )] ) then
gangVehicles[vioGetElementData ( veh, "Gang" )] = {}
end
gangVehicles[vioGetElementData ( veh, "Gang" )][veh] = true
setVehicleLocked ( veh, false )
vioSetElementData ( veh, "locked", false )
vioSetElementData ( veh, "owner", getGangName ( vioGetElementData ( veh, "Gang" ) ) )
end
if tonumber(Tuning) == 1 then
MySQL_SetString("vehicles", "Tuning", "|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|", "Besitzer LIKE '"..Besitzer.."' AND Slot LIKE '"..Slot.."'")
local Tuning = "|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|"
else
pimpVeh ( veh, Tuning )
end
vioSetElementData ( veh, "rcVehicle", tonumber ( carsData["rc"] ) )
end
else
local Besitzer = carsData["Besitzer"]
local bantime = tonumber ( MySQL_GetString ( "ban", "STime", "Name LIKE '"..Besitzer.."'" ) )
local diff = math.floor ( ( ( bantime - getTBanSecTime ( 0 ) ) / 60 ) * 100 ) / 100
--[[if diff < 0 then
deletedcars = deletedcars + 1
local Slot = carsData["Slot"]
MySQL_DelRow("vehicles", "Besitzer LIKE '"..Besitzer.."' AND Slot LIKE '"..Slot.."'")
MySQL_SetString("userdata", "Carslot"..Slot, 0, "Name LIKE '"..Besitzer.."'")
MySQL_SetString("userdata", "CurrentCars", tonumber(MySQL_GetString("userdata", "CurrentCars", "Name LIKE '"..Besitzer.."'"))-1, "Name LIKE '"..Besitzer.."'")
offlinemsg ( "Dein Fahrzeug in Slot Nr. "..Slot.." wurde entfernt, da du mehr als 30 Tage inaktiv warst!", "Server", Besitzer )
end]]
end
end
end
carsData = mysql_fetch_assoc(result)
if carsData then
mySQLCarCreate()
else
mysql_free_result(result)
carsSpawned = true
outputServerLog("Es wurden "..caramount.." Fahrzeuge gefunden und "..deletedcars.." Fahrzeuge von inaktiven Benutzern entfernt.")
end
end
end
function pimpVeh ( veh, tuning )
for i = 0, 16 do
local x = i + 1
_G["tunepart"..i] = tonumber(gettok ( tuning, x, string.byte('|') ))
end
for i = 0, 16 do
if _G["tunepart"..i] > 0 then
addVehicleUpgrade ( veh, _G["tunepart"..i] )
end
end
specPimpVeh ( veh )
end
function setPrivVehCorrectColor ( veh )
local colors = vioGetElementData ( veh, "color" )
local c1 = gettok ( colors, 1, string.byte( '|' ) )
local c2 = gettok ( colors, 2, string.byte( '|' ) )
local c3 = gettok ( colors, 3, string.byte( '|' ) )
local c4 = gettok ( colors, 4, string.byte( '|' ) )
if string.find ( c1, "," ) then
local c1a = gettok ( c1, 1, string.byte( ',' ) )
local c1b = gettok ( c1, 2, string.byte( ',' ) )
local c1c = gettok ( c1, 3, string.byte( ',' ) )
local c2a = gettok ( c2, 1, string.byte( ',' ) )
local c2b = gettok ( c2, 2, string.byte( ',' ) )
local c2c = gettok ( c2, 3, string.byte( ',' ) )
local c3a = gettok ( c3, 1, string.byte( ',' ) )
local c3b = gettok ( c3, 2, string.byte( ',' ) )
local c3c = gettok ( c3, 3, string.byte( ',' ) )
local c4a = gettok ( c4, 1, string.byte( ',' ) )
local c4b = gettok ( c4, 2, string.byte( ',' ) )
local c4c = gettok ( c4, 3, string.byte( ',' ) )
setVehicleColor ( veh, c1a, c1b, c1c, c2a, c2b, c2c, c3a, c3b, c3c, c4a, c4b, c4c )
setTimer ( setVehicleColor, 100, 1, veh, c1a, c1b, c1c, c2a, c2b, c2c, c3a, c3b, c3c, c4a, c4b, c4c )
else
setVehicleColor ( veh, c1, c2, c3, c4 )
setTimer ( setVehicleColor, 100, 1, veh, c1, c2, c3, c4 )
end
local NT1 = vioGetElementData ( veh, "NewTuningTL" )
local NT2 = vioGetElementData ( veh, "NewTuningMU" )
local id = getElementModel(veh)
local this = getOriginalHandling ( id )
if NT1 >= 1 and NT1 <= 5 then
setVehicleHandling(veh, "suspensionLowerLimit", this["suspensionLowerLimit"]+0.05*NT1)
end
if NT2 >= 1 and NT2 <= 3 then
setVehicleHandling(veh, "maxVelocity", this["maxVelocity"]+30/3*NT2)
setVehicleHandling(veh, "engineAcceleration", this["engineAcceleration"]/this["maxVelocity"]*(this["maxVelocity"]+100/3*NT2))
setVehicleHandling(veh, "engineInertia", this["engineInertia"]/this["maxVelocity"]*(this["maxVelocity"]+100/3*NT2))
end
end
function setPrivVehCorrectLightColor ( veh )
if veh then
local colors = vioGetElementData ( veh, "lcolor" )
if colors then
local c1 = tonumber ( gettok ( colors, 1, string.byte( '|' ) ))
local c2 = tonumber ( gettok ( colors, 2, string.byte( '|' ) ))
local c3 = tonumber ( gettok ( colors, 3, string.byte( '|' ) ))
vioSetElementData ( veh, "lc1", c1 )
vioSetElementData ( veh, "lc2", c2 )
vioSetElementData ( veh, "lc3", c3 )
setVehicleHeadLightColor ( veh, c1, c2, c3 )
end
end
end
function isOwnerActive ( pname )
return true
end