Witamy na GTAOnline Obecny czas to 2017-11-25, 02:43 Użytkowników: 72286
Strona główna | Użytkownicy | Grupy | Faq | Regulamin | Zaloguj
GTAONLINE.PL
Tematy otagowane jako: respienie
1. [SKRYPT] Respienie Pojazdu
Witam
Stworzylem Skrypt w 5m
na Respienie Pojazdu

Ukryta wiadomość / Hidden message(aby ją zobaczyć musisz postawić użytkownikowi)
Wiadomość została ukryta, aby ją przeczytać należy się zalogować.
2. Respienie się pojazdu po wyjściu
Witam mam taki skrypcik i jak zrobić tak aby po wyjściu się odrazu respił
Za pomoc zimne :piwo:

[lua]local ustawioneAuta = {
{-2982.94,489.99,0.76,359.2,359.9,90},
{-2982.93,502.31,0.76,359.6,359.9,90},
{-2971.51,497.47,0.76,359.6,359.7,360},
{-2942.76,496.46,0.76,359.0,359.8,360},
{-2976.39,513.24,0.76,2.6,0.2,360},
{-2948.40,512.59,0.76,358.6,359.8,360},
}

for i,v in ipairs(ustawioneAuta) do
local veh = createVehicle(453, v[1], v[2], v[3], v[4], v[5], v[6])
setElementData(veh,"vehicle:desc","Praca DorywczanKutry")
setElementData(veh,"vehicle:mileage", math.random(1000,60000))
setElementData(veh,"vehicle:fuel",1000)
setVehicleIdleRespawnDelay(veh, 1)
setElementFrozen(veh,true)
end

addEventHandler("onVehicleEnter", resourceRoot, function(plr, seat)
if seat == 0 then
outputChatBox("* Pomyślnie rozpoczęto pracę rybaka.",plr,0,255,0)
outputChatBox("* Jeździj po morzu i zbieraj ryby!",plr,0,255,0)
local v = getPedOccupiedVehicle(plr)
setElementFrozen(v,true)
setElementData(v,"mapa",0)
setElementData(plr,"pracaView",true)
end
end)

local markerek = createMarker(-2986.31,447.94,0.74,"corona",5,0,255,0,175)

local text = createElement("text")
setElementData(text,"name", "Punkt rozładowywania zbiornika!")
setElementPosition(text,-2986.31,447.94,0.74)

addEventHandler(&...
3. Respienie pojazdu z danym id
Witajcie. Mam zagwostkę, czy można w pawn zrobić tak aby respiło pojazd z danym id które wpiszemy? Nie chodzi mi o id modelu czyli np infernus 411 tylko chodzi o id te które każdy pojazd ma unikalny pod /dl w sampie.
4. respienie sie (login panel
pobralem sobie login panel gracza Monio, wszystko cacy ale zamiast respic mnie na koordynatach podanych na stronie serwera to respie sie na srodku mapy albo spadam i obok

client
[code]sW, sH = guiGetScreenSize()
x = 1360
y = 768

local sm = {}
sm.moov = 0
sm.object1, sm.object2 = nil, nil


local function camRender ()
local x1, y1, z1 = getElementPosition ( sm.object1 )
local x2, y2, z2 = getElementPosition ( sm.object2 )
setCameraMatrix ( x1, y1, z1, x2, y2, z2 )
end

local function removeCamHandler ()
if(sm.moov == 1) then
sm.moov = 0
removeEventHandler ( "onClientPreRender", getRootElement(), camRender )
end
end

function smoothMoveCameraa ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
if(sm.moov == 1) then return false end
sm.object1 = createObject ( 1337, x1, y1, z1 )
sm.object2 = createObject ( 1337, x1t, y1t, z1t )
setElementAlpha ( sm.object1, 0 )
setElementAlpha ( sm.object2, 0 )
setObjectScale(sm.object1, 0.01)
setObjectScale(sm.object2, 0.01)
moveObject ( sm.object1, time, x2, y2, z2, 0, 0, 0, "InOutQuad" )
moveObject ( sm.object2, time, x2t, y2t, z2t, 0, 0, 0, "InOutQuad" )

addEventHandler ( "onClientPreRender", getRootElement(), camRender )
sm.moov = 1
setTimer ( removeCamHandler, time, 1 )
setTimer ( destroyElement, time, 1, sm.object1 )
setTimer ( destroyElement, time, 1, sm.object2 )
return true
end


sW, sH = guiGetScreenSize()
x...
5. Respienie sie co iles minut Aut
Jak zrobic zeby co co 1 minute Respily sie nowe auta w Pracy Kuriera.
Prosze o pomoc daje piwo :)


[lua]
vehiclePos = {
{-1796.61,1422.74,7.19},
{-1792.45,1422.67,7.19},
{-1788.45,1422.78,7.19},
}

for k, v in pairs(vehiclePos) do
car = createVehicle(440, v[1], v[2], v[3])
setElementFrozen(car, true)
setElementData(car, "pojazd_paliwo", 100)
setElementData(car, "przebieg", math.random(100, 300))
setElementData(car, "pojazd_opis", "Ladunek : 0%")
setVehicleEngineState(car, false)
end

addEventHandler("onVehicleEnter", resourceRoot, function(plr, seat)
if seat == 0 then
if getElementData(plr, "graczPraca") == false then
setElementData(plr, "graczPraca", true)
setElementFrozen(source, false)
outputChatBox("Rozpoczales prace jako kurier, powodzenia!", plr)
triggerClientEvent(plr, "courier_job", resourceRoot)
else
outputChatBox("Aktualnie rozpoczales gdzieindziej juz prace!", plr)
end
end
end)


function checkVeh()
for k, v in pairs(getElementsByType("vehicle", resourceRoot)) do
if not getVehicleController(v) then
respawnVehicle(v)
setElementFrozen(v, true)
setElementData(car, "pojazd_opis", "Ladunek : 0%")
end
end
end
addEvent("checkCars", true)
addEventHandler("checkCars", resourceRoot, checkVeh)


addEvent("givePlayerMoney", true)
addE...
6. Respienie na zwykłej mapie
Chcę zeby gdy się wpisze /prawko respiło nas na dimensionie 0 oraz interiorze 0 - tzn. normalna mapa, ponieważ marker jest w interiorze 3.
kod:
[lua]
local egzaminowany=nil

function sethpnpc ()
end
setTimer( sethpnpc, 1000,0 )
local marker = createMarker (-1734.08, 778.24, 23.9, "cylinder", 1.0, 255, 0, 0)
setElementDimension (marker, 0)
setElementInterior (marker, 3)

function onhit( source )
outputChatBox("Aby zdać prawo jazdy, wpisz następująca komendę /prawko.", source)
end
addEventHandler( "onMarkerHit", marker, onhit)

function kurs(source)
if isElementWithinMarker ( source, marker )
then
local konto = getPlayerAccount ( source )

if not getAccountData(konto,"prawojazdy" ) then
outputChatBox("Rozpoczynasz kurs prawa do jazdy. Przestrzegaj przepisów na drogach! ", source)
outputDebugString( "Start prawo jazdy")
auto = createVehicle ( 401, -2198, 304, 36, 0, 0, 0)
setElementData(auto, "pojazd_opis", "Pojazd egzaminacyjny")
setVehicleColor ( auto, 255, 255, 255 )
setVehiclePlateText(auto, "PRAWKO")
setVehicleHandling(auto, "maxVelocity", 60)
setElementData(auto, "pojazd_paliwo", 99)
warpPedIntoVehicle ( source, auto )
toggleControl(source, "enter_exit", false)
triggerClientEvent ("zdajemyprawko", source )
else
outputChatBox("Posiadasz już prawo jazdy!", source)
out...




phpBB by Przemo modified by xXx 2003-2016

Template GTAONLINE created by gtaonline.pl



Strona wygenerowana w 0,05 sekundy. Zapytań do SQL: 10