function sellcarto_func ( player, cmd, target, price, pSlot )
local stringw = false
for i = 1, specialUpgrades do
local fix = getElementData ( veh, "stuning"..i )
if fix then
if not stringw then
stringw = specialUpgrade[i]
else
stringw = stringw..", "..specialUpgrade[i]
end
end
end
if not stringw then
stringw = "keine"
end
---
if target and pSlot and getPlayerFromName ( target ) and tonumber ( pSlot ) then
pSlot = MySQL_Save ( pSlot )
tSlot = getFreeCarSlot ( getPlayerFromName ( target ) )
local pname = getPlayerName ( player )
local target = getPlayerFromName ( target )
if tonumber ( MySQL_GetString("vehicles", "AuktionsID", "Besitzer LIKE '"..pname.."' AND Slot LIKE '"..tonumber(pSlot).."'") ) == 0 then
if tSlot and vioGetElementData ( target, "carslot"..tSlot ) == 0 and vioGetElementData ( player, "carslot"..pSlot ) > 0 then
local veh = _G[getPrivVehString ( pname, pSlot )]
if tonumber ( price ) then
price = math.abs ( math.floor ( tonumber ( price ) ) )
if isElement ( veh ) then
if ( premiumBuyCars[getElementModel(veh)] and vioGetElementData ( target, "premium" ) ) or not premiumBuyCars[getElementModel(veh)] then
if vioGetElementData ( target, "curcars" ) < vioGetElementData ( target, "maxcars" ) then
local model = getElementModel ( veh )
outputChatBox ( getPlayerName ( player ).." bietet dir folgendes Fahrzeug für "..price.." $ an: "..getVehicleName ( veh ), target, 0, 125, 0 )
outputChatBox ( "Tippe /buy car, um das Fahrzeug zu kaufen.", target, 0, 125, 0 )
outputChatBox ( "Du hast "..getPlayerName ( target ).." dein Fahrzeug aus Slot Nr. "..pSlot.." angeboten.", player, 200, 200, 0 )
vioSetElementData ( target, "carToBuyFrom", player )
vioSetElementData ( target, "carToBuySlot", tonumber ( pSlot ) )
vioSetElementData ( target, "carToBuyPrice", price )
vioSetElementData ( target, "carToBuyModel", getElementModel ( veh ) )
else
outputChatBox ( "Der Spieler hat keinen freien Fahrzeugslot mehr!", player, 125, 0, 0 )
end
else
outputChatBox ( "Du kannst keine Premium Fahrzeuge an nicht Premiumnutzer weitergeben!", player, 125, 0, 0 )
end
else
outputChatBox ( "Ungueltiges Fahrzeug! Gebrauch: /sellcarto [Name] [Preis] [Eigener Slot]", player, 125, 0, 0 )
end
else
outputChatBox ( "Ungueltiger Preis! Gebrauch: /sellcarto [Name] [Preis] [Eigener Slot]", player, 125, 0, 0 )
end
else
outputChatBox ( "Ungueltiger Fahrzeugslot! Gebrauch: /sellcarto [Name] [Preis] [Eigener Slot]", player, 125, 0, 0 )
end
else
outputChatBox ( "Dieses Fahrzeuge wird momentan versteigert!", player, 125, 0, 0 )
end
else
outputChatBox ( "Gebrauch: /sellcarto [Name] [Preis] [Eigener Slot]", player, 125, 0, 0 )
end
end
addCommandHandler ( "sellcarto", sellcarto_func )
Alles anzeigen