GTAONLINE.PL :: podpinanie gieldy pod swój system pojazdów

Witam
Mam gielde od GLT i jak podpi?? j? pod system pojazd?w ogrpg-vehicles by wy?wietla? si? przebieg?

to kod gie?dy

Kod:

--[[

Skrypt napisany przez Sprite^

Opublikowany na GTAO.

Jest to m?j pierwszy skrypt (...)

Podpi??em to g?ownie pod popularny system samochod?w, g?ownie dlatego ?e

jest to jak najbardziej najcz??ciej u?ywany skrypt na prywatne pojazdy.

Zakaz usuwania tej wiadomo?ci. do mety si? nie dopisuje, jednak nie dopisuj si? sam  

Mi?ego Korzystania, u?ytkowniku!

--]]

local gielda_SF = createMarker ( -2141.95, -755.8, 31.55, "cylinder",  5, 25, 111,25,50 )

local sX, sY = guiGetScreenSize()

local sW, sH = guiGetScreenSize()

addEventHandler("onClientMarkerHit", resourceRoot, function(el,md)

	if el~=localPlayer or not md then return end

	local veh=getPedOccupiedVehicle(localPlayer)

	if not veh then return end

	if getVehicleController(veh)~=localPlayer then return end

	local Pojazd = getPedOccupiedVehicle(localPlayer)

	local DB_Zycie = getElementHealth(Pojazd)

	if DB_Zycie < 750 then

	return outputChatBox("* Tw?j Pojazd jest zbyt uszkodzony.")

	end

	local Pojazd = getPedOccupiedVehicle(localPlayer)

	--local DB_Pojazd_Przebieg = getElementData(Pojazd, "DB:Przebieg")

	local DB_Przebieg = getElementData(Pojazd, "pojazd_przebieg") or 0

	if DB_Przebieg > 99999 then

	return outputChatBox("* Tego Pojazdu nie mo?na sprzeda?, wyzeruj go.")

	end

	if (string.sub(getVehiclePlateText(veh),1,2) or "") == "PB" then

	return outputChatBox("* Pojazd?w Publicznych nie mo?na sprzedawa?.")

	end

	if getVehicleType(veh)=="Plane" then

	return outputChatBox("* Samolotu na Gie?dzie nie sprzedasz...")

	end

	if getVehicleType(veh)=="Helicopter" then

	return outputChatBox("* Helikopteru na Gie?dzie nie sprzedasz...")

	end

	if getVehicleType(veh)=="Boat" then

	return outputChatBox("* Jachtu na Gie?dzie nie sprzedasz...")

	end

		--A

		local Pojazd = getPedOccupiedVehicle(localPlayer)

		local Tablica = getVehiclePlateText(Pojazd)

		local Nazwa = getVehicleName(Pojazd)

        Gielda_GUI = guiCreateWindow(0.30, 0.24, 0.41, 0.52, "Sprzeda? Pojazd?w -- Gie?da San Fierro.", true)

        guiWindowSetMovable(Gielda_GUI, false)

        guiWindowSetSizable(Gielda_GUI, false)

        Gielda_Zatwierdz = guiCreateButton(0.02, 0.88, 0.96, 0.09, "Zatwierd? Informacje.", true, Gielda_GUI)

        guiSetFont(Gielda_Zatwierdz, "default-bold-small")

		Gielda_Pojazd = guiCreateLabel(10, 24, 539, 16, "Pojazd do sprzeda?y: "..Nazwa.."", false, Gielda_GUI)

        guiSetFont(Gielda_Pojazd, "default-bold-small")

		guiLabelSetVerticalAlign(Gielda_Pojazd, "center")

        Gielda_Rejestracja = guiCreateLabel(10, 40, 539, 15, "Rejestracja Pojazdu: "..Tablica.."", false, Gielda_GUI)

        guiSetFont(Gielda_Rejestracja, "default-bold-small")

        guiLabelSetVerticalAlign(Gielda_Rejestracja, "center")

        Gielda_Cena_Edit = guiCreateEdit(0.02, 0.81, 0.96, 0.07, "", true, Gielda_GUI)

        guiEditSetMaxLength(Gielda_Cena_Edit, 8)

        Gielda_Cena = guiCreateLabel(0.02, 0.75, 0.96, 0.04, "Chce sprzeda? sw?j pojazd za cene:", true, Gielda_GUI)

        guiSetFont(Gielda_Cena, "clear-normal")

        guiLabelSetHorizontalAlign(Gielda_Cena, "center", false)

        guiLabelSetVerticalAlign(Gielda_Cena, "center")    

		--B

	showCursor(true)

	guiSetVisible(Gielda_GUI, true)

end)

addEventHandler("onClientGUIClick", resourceRoot, function () 

   if source == Gielda_Zatwierdz then

    wystawOferte()

end

end)

addEventHandler("onClientMarkerLeave", resourceRoot, function(el,md)

	guiSetVisible(Gielda_GUI, false)

	showCursor(false)

end)

function wystawOferte()

local Cena = guiGetText(Gielda_Cena_Edit)

    if #Cena >= 1 then

    local Cena = tonumber(Cena)

        if type(Cena) == "number" and Cena > 1 then

        showCursor(false)

        guiSetVisible(Gielda_GUI, false)

		local Pojazd = getPedOccupiedVehicle(localPlayer)

		--local DB_Pojazd_Przebieg = getElementData(Pojazd, "DB:Przebieg")

		--local DB_Paliwo = getElementData(Pojazd, "DB:Paliwo")

		local DB_Przebieg = getElementData(Pojazd, "pojazd_przebieg") or 0

		local DB_Paliwo = getElementData(Pojazd, "pojazd_paliwo") or 100

		setElementData(Pojazd, "DB:Opis", "Pojazd: "..getVehicleName(Pojazd).."\nCena: "..math.floor(Cena).."PLN\nPrzebieg: "..DB_Przebieg.."KM\nPojemno?? Baku: "..math.floor(DB_Paliwo).."L\nSprzedaj?cy: "..getPlayerName(localPlayer).."")

        else

        outputChatBox("* Podano nieprawid?ow? cene.")

        end

    end

end

Piszcie co trzeba jeszcze poda? to podam

tutaj daje kawa?ek kodu licznika mo?e on pomo?e w ustawieniu gie?dy

Kod:

local veh=getPedOccupiedVehicle(localPlayer)

	if not veh then return end

	local vx, vy, vz = getElementVelocity(veh)

	local speed=((vx^2 + vy^2 + vz^2)^(0.5))*180

	local speedy= speed*0.97

	local fuel= getElementData(veh,"vehicle:fuel") or 0

	local mileage= getElementData(veh,"vehicle:mileage") or 0

	dxSetBlendMode('modulate_add')

	if getElementHealth(veh) < 301 then

	setElementHealth(veh,302)

	end