GTAONLINE.PL :: zapełnienie

Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » zapełnienie Poprzedni temat Następny temat

Wysłany: 2016-07-04, 13:12

marcin778
Krytyk serwerów MTA

Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8

Witam mam takie pytanie. Chc? zrobi? zape?nianie woz?w PSP. mianowicie dany poijazd po stworzeniu ma 100 % zape?nienia. Ale je?li jest w??czona autopompa (czyli elementdata "ap" na true) to wtedy co 1 sekund? te zape?nienie odejmuje. Co jedn? sekunde zape?nienie maleje o 1. I je?li zape?nienie czyli elementdata jest na 0 wtedy w jakim? markerze te elementdate uzupe?nia do 100 znowu.

wiem czego musz? u?y? lecz nie wiem za bardzo jak si? do tego zabra?.

podczas tworzenia pojazdu na s side musz? nada? elementdate z zape?nieniem to wiem. Ale reszta aby to si? odejmowa?o i potem w markerach nape?nia?o to nie zbyt. Generalnie nie wiem jak zrobi? odejmowanie tej elementdaty i za? dodawanie.

slrmed = createVehicle(416, -2402.77, -103.78, 35.33, 0, 0, 90)
slop90 = createVehicle(490, -2402.39, -98.65, 35.33, 0,0,90)
shd = createVehicle(433, -2402.79, -93.52, 35.33,0,0,90)
slkw = createVehicle(554, -2401.27, -88.37, 35.33, 0, 0,90)
scrt = createVehicle(427, -2401.98, -83.23, 35.33,0,0,90)
---------------------------------------------------
slop91 = createVehicle(551, -2388.52, -104.01, 35.33,0,0,270)
chem = createVehicle(482, -2387.82, -98.49, 35.33,0,0,270)
gba = createVehicle(407, -2387.39, -93.57, 35.33,0,0,270)
gba2 = createVehicle(573, -2387.66, -88.38, 35.33,0,0,270)
gcba = createVehicle(544, -2387.86, -83.12, 35.33,0,0,270)

-------------- opisy
setElementData(slrmed, "pojazd_opis","JRG-1 531[S]59", true)
setElementData(slop90, "pojazd_opis","JRG-1 531[S]90",true)
setElementData(shd, "pojazd_opis","JRG-1 531[S]53", true)
setElementData(slkw, "pojazd_opis","JRG-1 531[S]81", true)
setElementData(scrt, "pojazd_opis","JRG-1 531[S]43", true)
setElementData(slop91, "pojazd_opis","JRG-1 531[S]91", true)
setElementData(chem, "pojazd_opis", "JRG-1 531[S]60", true)
setElementData(gba, "pojazd_opis", "JRG-1 531[S]21", true)
setElementData(gba2, "pojazd_opis","JRG-1 531[S]22", true)
setElementData(gcba, "pojazd_opis", "JRG-1 531[S]25", true)
--------------

-------------- kolory
setVehicleColor(chem, 255,255,255)
--------------

-------------- blipy
createBlipAttachedTo(slrmed, 43)
createBlipAttachedTo(slop90, 43)
createBlipAttachedTo(shd, 43)
createBlipAttachedTo(slkw, 43)
createBlipAttachedTo(scrt, 43)
createBlipAttachedTo(slop91, 43)
createBlipAttachedTo(chem, 43)
createBlipAttachedTo(gba, 43)
createBlipAttachedTo(gba2, 43)
createBlipAttachedTo(gcba, 43)
--------------

^
Tworzenie pojazd?w |

stawiam :piwo:

Podpis

Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw

-- obecnie

-- dawniej

Wysłany: 2016-07-04, 14:29

_Wicek_
Majstersztyk

Wiek: 25
Na forum: 4260 dni
Posty: 747
Nick w MP: Wicek

Piwa: 1841

Respekt: 360,5
Respekt: 360,5

Ostrzeżeń: 40%

No to standardowe funkcje typu

Więcej informacji znajdziesz w Wikipedii MTA:

IsElementWithinMarker

Więcej informacji znajdziesz w Wikipedii MTA:

getElementData

Więcej informacji znajdziesz w Wikipedii MTA:

setElementData

+ stosujesz if`y i tyle.

Podpis

Support-Team: 25.01.2016
Moderator: 10.07.2016

GG: 51274621
Skype : kuba_wicinski

Ostatnio zmieniony przez _Wicek_ 2016-07-14, 14:19, w całości zmieniany 1 raz

Wysłany: 2016-07-04, 14:33

marcin778
Krytyk serwerów MTA

Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8


To wiem tylko no co mam tam zrobi? local veh = getPedOccupiedVehicle(plr) local ile = getElementData(veh, "zapelnienie") or 0 if ile == 100 then setElementData(veh, "pojazd_opis","Zape?nienie: "..ile.."%") elseif ile == 99 then itd... Dodam, ?e chce aby ubywa?o zape?nienie je?li elementdata "apon" jest na true je?li na false to nie.
Podpis Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw -- obecnie -- obecnie -- dawniej -- dawniej -- dawniej
Ostatnio zmieniony przez Emm 2016-07-04, 14:36, w całości zmieniany 3 razy

Wysłany: 2016-07-04, 14:34

_Wicek_
Majstersztyk

Wiek: 25
Na forum: 4260 dni
Posty: 747
Nick w MP: Wicek

Piwa: 1841

Respekt: 360,5
Respekt: 360,5

Ostrzeżeń: 40%

No to musisz w??czy? logiczne my?lenie i napisa? kod.

Podpis

Support-Team: 25.01.2016
Moderator: 10.07.2016

GG: 51274621
Skype : kuba_wicinski

Wysłany: 2016-07-04, 14:35

Emm
***** ***

Wiek: 32
Na forum: 3880 dni
Posty: 3191
Nick w MP: Emm

Piwa: 6162

Respekt: 1580
Respekt: 1580

Administrator: Admin ma zawsze rację | REGULAMIN FORUM | REKLAMA/VIP | .

Dodawanie elementdaty

marker = createMarker(x, y, z, "cylinder", 3, 255, 0, 0, 255)

function napelnij(el, md)
if isPedInVehicle(el) then
local veh = getPedOccupiedVehicle(el)
if getElementData(veh, "zapelnienie") =< 100 then
setElementData(veh, "zapelnienie", 100)
end
end
end
addEventHandler("onMarkerHit", marker, napelnij)

^ nie testowane

Zabieranie tych procent?w

setTimer(
function(plr)
if isPedInVehicle(plr) then
local woz = getPedOccupiedVehicle(plr)
if getElementData(woz, "ap") then
if getElementData(woz, "zapelnienie") >= 0 then
local zapelnienie = getElementData(woz, "zapelnienie")
setElementData(woz, "zapelnienie", zapelnienie - 1)
end
end
end
end
end, 60000, 0)

Nie jest to testowane, wi?c nie daje gwarancji dzia?ania. W ka?dym b?d? razie, musisz kombinowa? co? na ten wz?r.

Podpis

Użytkownik: 20.10.2015r
GTAO Member: 06.03.2016r
Support-Team: 20.01.2016r
Moderator: 30.03.2016r
Mod-Team: 08.10.2016r
Vice Admin: 04.05.2018r
Administrator: 03.05.2022r

[you]
! Koniecznie zapoznaj się z regulaminem forum.
Pamiętaj, aby zawsze go przestrzegać, nie mniej ważne są również regulaminy działów, w których się wypowiadasz!
Zamiast zakładać temat po kilka razy, bo jest usuwany przez Administrację, przejrzyj regulamin i napisz poprawnie temat!
Sprawy z administracją możesz załatwiać anonimowo w tym dziale.
Najważniejsze informacje od Administracji możesz przeczytać tutaj oraz tutaj.

Wysłany: 2016-07-04, 14:46

marcin778
Krytyk serwerów MTA

Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8

a je?li chodzi o tablice to co? takiego?

setTimer(
function(plr)
if isPedInVehicle(plr) then
local woz = getPedOccupiedVehicle(plr)
if getElementData(woz, "apon") then
if getElementModel(veh) == 407 or getElementModel(veh) == 544 or getElementModel(veh) == 573 then
if getElementData(woz,"zapelnienie") >= 0 then
local ile = getElementData(woz, "zapelnienie")
setElementData(woz, "zapelnienie", ile - 1)
end
end
end
end
end, 60000, 0)

local tablica = {
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z}
}

for i,v in ipairs(tablica) do
createObject(id, v[1], v[2], v[3])
end

local tablica2 = {
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z}
}

for i,v in ipairs(tablica2) do
dod = createMarker(v[1],v[2],v[3],"cylinder",3,255,0,255)
end

function uzupelnij(el, md)
if isPedInVehicle(el) then
local veh = getPedOccupiedVehicle(el)
if getElementModel(veh) == 407 or getElementModel(veh) == 544 or getElementModel(veh) == 573 then
if getElementData(veh,"zapelnienie") =< 100 then
setElementData(veh, "zapelnienie", 100)
end
end
end
addEventHandler("onMarkerHit",dod,uzupelnij)

i przy tworzeniu pojazdu musze doda?co? takiego?


gcba = createVehicle(544, -2387.86, -83.12, 35.33,0,0,270)
woz = getPedOccupiedVehicle()
ile = getElementData(woz, "zapelnienie")
setElementData(gcba, "pojazd_opis","Zape?nienie: "..ile.."$"\nJRG-1 531[S]59", true)

Podpis

Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw

-- obecnie

-- dawniej

Wysłany: 2016-07-04, 18:19

_Wicek_
Majstersztyk

Wiek: 25
Na forum: 4260 dni
Posty: 747
Nick w MP: Wicek

Piwa: 1841

Respekt: 360,5
Respekt: 360,5

Ostrzeżeń: 40%

marcin778, Jak nie przetestujesz to si? nie przekonasz...

Podpis

Support-Team: 25.01.2016
Moderator: 10.07.2016

GG: 51274621
Skype : kuba_wicinski

Wysłany: 2016-07-04, 19:42

marcin778
Krytyk serwerów MTA

Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8


_Wicek_, testowa?em aczkolwiek nie pojawia si? opis na poje?dzie gdy dodalem przy tworzeniu pojazd?w to gcba = createVehicle(544, -2387.86, -83.12, 35.33,0,0,270) woz = getPedOccupiedVehicle() ile = getElementData(woz, "zapelnienie") setElementData(gcba, "pojazd_opis","Zape?nienie: "..ile.."$\nJRG-1 531[S]59", true)
Podpis Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw -- obecnie -- obecnie -- dawniej -- dawniej -- dawniej

Wysłany: 2016-07-04, 20:40

Emm
***** ***

Wiek: 32
Na forum: 3880 dni
Posty: 3191
Nick w MP: Emm

Piwa: 6162

Respekt: 1580
Respekt: 1580

Administrator: Admin ma zawsze rację | REGULAMIN FORUM | REKLAMA/VIP | .

gcba = createVehicle(544, -2387.86, -83.12, 35.33,0,0,270)
woz = getPedOccupiedVehicle()
ile = getElementData(woz, "zapelnienie") or 0
setElementData(gcba, "pojazd_opis","Zape?nienie: "..ile.."% \nJRG-1 531[S]59")

EDIT. Spr?buj doda? co? takiego


setTimer(function()
for i, v in ipairs(getElementsByType("vehicle")) do
if (getElementData(v, "GCBA") == true) then
local ilosc = getElementData(v, "zapelnienie") or 0
setElementData(gcba, "pojazd_opis","Zape?nienie: "..ilosc.."% \nJRG-1 531[S]59")
end
end
end
end, 6000, 0)

Aby powy?szy kod dzia?a?, dodaj ka?demu wozowi PSP elementdat?, np. "GBA", drugiemu "GCBA" itd.

Podpis

Użytkownik: 20.10.2015r
GTAO Member: 06.03.2016r
Support-Team: 20.01.2016r
Moderator: 30.03.2016r
Mod-Team: 08.10.2016r
Vice Admin: 04.05.2018r
Administrator: 03.05.2022r

Wysłany: 2016-07-04, 21:57

marcin778
Krytyk serwerów MTA

Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8

Opis jest tylko, zape?nienie nie ubywa.

i pokazuje db po starcie skryptu

kod na odejmowanie:

setTimer(
function(plr)
if isPedInVehicle(plr) then
local woz = getPedOccupiedVehicle(plr)
if getElementData(woz, "apon") then
if getElementModel(woz) == 407 or getElementModel(woz) == 544 or getElementModel(woz) == 573 then
if getElementData(woz,"zapelnienie") >= 0 then
local ile = getElementData(woz, "zapelnienie")
setElementData(woz, "zapelnienie", ile - 1)
setElementData(woz, "pojazd_opis", ""..ile.."%",true)
end
end
end
end
end, 60000, 0)
--[[
local tablica = {
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z}
}

for i,v in ipairs(tablica) do
createObject(id, v[1], v[2], v[3])
end

local tablica2 = {
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z}
}

for i,v in ipairs(tablica2) do
dod = createMarker(v[1],v[2],v[3],"cylinder",3,255,0,255)
end
-]]

local marker = createMarker(-2370.28, -75.14, 35.28,"cylinder",3,255,0,255)

function uzupelnij(el, md)
if isPedInVehicle(el,md) then
local veh = getPedOccupiedVehicle(plr)
if getElementModel(veh) == 407 or getElementModel(veh) == 544 or getElementModel(veh) == 573 then
if getElementData(veh,"zapelnienie") <= 100 then
setElementData(veh, "zapelnienie", 100)
end
end
end
end
addEventHandler("onMarkerHit",marker,uzupelnij)

db

WARNING: zapelnienie/woda.lua:3: Bad argument @ 'isPedInVehicle' [Expected ped at argument 1, got nil]

Podpis

Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw

-- obecnie

-- dawniej

Wysłany: 2016-07-04, 22:13

Emm
***** ***

Wiek: 32
Na forum: 3880 dni
Posty: 3191
Nick w MP: Emm

Piwa: 6162

Respekt: 1580
Respekt: 1580

Administrator: Admin ma zawsze rację | REGULAMIN FORUM | REKLAMA/VIP | .

setTimer(
function(plr)
if isPedInVehicle(plr) then
local woz = getPedOccupiedVehicle(plr)
if getElementData(woz, "apon") then
if getElementModel(woz) == 407 or getElementModel(woz) == 544 or getElementModel(woz) == 573 then
if getElementData(woz,"zapelnienie") >= 0 then
local ile = getElementData(woz, "zapelnienie")
setElementData(woz, "zapelnienie", ile - 1)
setElementData(woz, "pojazd_opis", ""..ile.."%",true)
else return end
else return end
else return end
else return end
end, 60000, 0)

local tablica = {
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z}
}

for i,v in ipairs(tablica) do
createObject(id, v[1], v[2], v[3])
end

local tablica2 = {
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z},
{x,y,z}
}

for i,v in ipairs(tablica2) do
dod = createMarker(v[1],v[2],v[3],"cylinder",3,255,0,255)
end

function uzupelnij(el, md)
if isPedInVehicle(el) then
local veh = getPedOccupiedVehicle(el)
if getElementModel(veh) == 407 or getElementModel(veh) == 544 or getElementModel(veh) == 573 then
if getElementData(veh,"zapelnienie") <= 100 then
setElementData(veh, "zapelnienie", 100)
end
end
end
end
addEventHandler("onMarkerHit",dod,uzupelnij)

Podpis

Użytkownik: 20.10.2015r
GTAO Member: 06.03.2016r
Support-Team: 20.01.2016r
Moderator: 30.03.2016r
Mod-Team: 08.10.2016r
Vice Admin: 04.05.2018r
Administrator: 03.05.2022r

Wysłany: 2016-07-04, 22:26

Brzysiek
Skrypter pralek

Wiek: 27
Na forum: 5199 dni
Posty: 488
Nick w MP: Brzysiek

Piwa: 1034

Respekt: 360
Respekt: 360

@Emm ten kod nic nie zmienia.
Problemem w timerze jest to, ?e ?aden element nie jest sprecyzowany.


setTimer(function()
    for k,plr in ipairs(getElementsByType("player") do
        if isPedInVehicle(plr) then
            local woz = getPedOccupiedVehicle(plr)
            if getElementData(woz, "apon") then
                if getElementModel(woz) == 407 or getElementModel(woz) == 544 or getElementModel(woz) == 573 then
                    if getElementData(woz,"zapelnienie") >= 0 then
                        local ile = getElementData(woz, "zapelnienie")
                        setElementData(woz, "zapelnienie", ile - 1)
                        setElementData(woz, "pojazd_opis", ""..ile.."%",true)
                    end 
                end 
            end 
        end
    end
end, 60000, 0)

[ Komentarz dodany przez: Emm: 2016-07-04, 23:12 ]
Przyjrzyj si? dok?adnie, ja zmieni?em z getElementModel zmienn? wozu na poprawn?

Wysłany: 2016-07-04, 22:38

marcin778
Krytyk serwerów MTA

Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8


zape?nianie nie ubywa, a po wjechaniu w marker zape?nienia db WARNING: zapelnienie/woda.lua:56: Bad argument @ 'isPedInVehicle' [Expected ped at argument 1, got vehicle] [ Dodano: 2016-07-04, 22:41 ] Poprawi?em b???d, i dzia?a Mo?na zamkn??.
Podpis Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw -- obecnie -- obecnie -- dawniej -- dawniej -- dawniej

Tagi: zapełnienie

Anonymous

Na forum: 245 dni
Posty: 1

Anonymous Koniecznie zajrzyj na:

Skocz do:

Wyświetl posty z ostatnich:

GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » zapełnienie

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach

Dodaj temat do Ulubionych
Wersja do druku

Zaloguj Zarejestruj