GTAONLINE.PL :: Tagi • barierki

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

Tematy otagowane jako: barierki

Witam , mam taki problem ?e jak kto? wychodzi z serwa a ustawi? jakie? barierki i nie usun? i zawsze si? resetuje frakcje i ja to resetuje i nic dalej s? prosze o pomoc!

Paczka PSRPG

2. Barierki

Witam. Skrypt na barierki mi nie dzia?a. DB3 https://imgur.com/a/Oq0HCGG . Za pomoc :piwo:

KOD



barierki = {}



addCommandHandler ( "b", function(plr)

local accountName=getAccountName(getPlayerAccount(plr))

if isObjectInACLGroup("user."..accountName, aclGetGroup("PSP")) then return end 

x,y,z = getElementPosition ( plr )

r1,r2,r3 = getElementRotation ( plr )

barierka = createObject ( 1459, x, y, z, r1, r2, r3 )

table.insert ( barierki, barierka )

end)





addCommandHandler ( "busun", function(plr)

local accountName=getAccountName(getPlayerAccount(plr))

if isObjectInACLGroup("user."..accountName, aclGetGroup("PSP")) then return end 

for k,v in ipairs ( barierki ) do

destroyElement ( v )

end

end)

3. Barierki

Napisa?em taki skrypt na barierki i jest ma?y problem bo usuwa tylko ostatni? postawion? przez gracza barierke a powinno usuwa? wszystkie ustawione przez gracza pomo?e kto? ?



barierki = {} 



function ustawbarierke(player) 

local frakcje=getElementData(player, 'Frakcja' )

if frakcje then

local x, y, z = getElementPosition(player) 

r1, r2, r3 = getElementRotation(player)

barierki[player] = createObject ( 1228, x, y, z-0.7) 

setElementRotation ( barierki[player], r1, r2, r3)

setElementFrozen(barierki[player], true)

triggerClientEvent("rozwalanie",player,barierki[player])

setElementCollisionsEnabled (barierki[player], true)

end

end 

addCommandHandler("barierka", ustawbarierke)



function usunbarierke(player)

local frakcje=getElementData(player, 'Frakcja' )

if frakcje then

if barierki[player] and isElement(barierki[player]) then 

destroyElement(barierki[player]) 

end 

end

end 

addCommandHandler ( "ubarierka", usunbarierke)

4. Barierki

Witam mo?e kto? mi pom?c z tym skryptem ?eby te barierki si? nie rozwala?y
Za pomoc :piwo:

[lua] function barier(plr)
if getElementModel(plr) ~= 280 then return end
if getPedOccupiedVehicle(plr) then return end

local x,y,z = getElementPosition(plr)
local rx,ry,rz = getElementRotation(plr)

local barierka = createObject(1228, x,y,z-0.5)
setElementData(barierka, "isBarierka", true)
setElementRotation(barierka, rx, ry, rz+90)
setElementFrozen(barierka, true)

setElementData(barierka, "isBarierka2", getPlayerName(plr))
end
addCommandHandler("ub",barier )

function barier(plr)
if getElementModel(plr) ~= 280 then return end
for i,v in ipairs(getElementsByType("object", resourceRoot)) do
if not getElementData(v, "isBarierka") then return end
if getElementData(v, "isBarierka2") == getPlayerName(plr) then
destroyElement(v)
end
end
end
addCommandHandler("usb", barier)

function barier2(plr)
if getElementModel(plr) ~= 280 then return end
if getPedOccupiedVehicle(plr) then return end

local x,y,z = getElementPosition(plr)
local rx,ry,rz = getElementRotation(plr)

local barierka = createObject(1238, x,y,z-0.6)
setElementData(barierka, "isBarierka", true)
setElementRotation(barierka, rx, ry, rz+90)
setElementFrozen(barierka, true...

5. Skrypt na barierki

Cze??. Zrobi?em skrypt na barierki:



function barierka (thePlayer, cmd)

if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(thePlayer)),aclGetGroup("PSP")) then 

    local x,y,z = getElementPosition(thePlayer)

    local rx,ry,rz = getElementRotation(thePlayer)

    Barierka = createObject (1228, x, y ,z, rx, ry, rz)

    outputChatBox("Stworzy?e? barierke", thePlayer)

end

end

addCommandHandler("bu", barierka)



function barierka (thePlayer, cmd)

if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(thePlayer)),aclGetGroup("PSP")) then 

    for k,v in ipairs ( barierki ) do

destroyElement ( v )

    outputChatBox("Usune?e? barierke", thePlayer)

end

end

end

addCommandHandler("busun", barierka)

Jest b??d w 13 linijce:



function barierka (thePlayer, cmd)

if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(thePlayer)),aclGetGroup("PSP")) then 

    for k,v in ipairs ( barierki ) do -- tutaj jest b??d

destroyElement ( v )

    outputChatBox("Usune?e? barierke", thePlayer)

end

end

end

addCommandHandler("busun", barierka)

SS:

6. [SKRYPT] Barierki

Siemson!
Przedstawiam Wam m?j mini skrypt w wersji testowej kt?ry napisa?em przed chwil? dla zabawy.
Skrypt tworzy barierki, lub pacho?ki z pomoc? broni o id 23.
Gdy gracz przytrzyma klawisz:
1, i strzeli, w miejscu, w kt?re strzeli? pojawi si? barierka
2, i strzeli, w miejscu, w kt?re strzeli? pojawi si? pacho?ek
Gdy gracz strzela bez przytrzymania ?adnego klawisza, usuwa obiekt w kt?ry strzeli?. Wygodne prawda?:) Cho? napewno mo?na to zrobi? tak, by by?o jeszcze wygodniejsze w u?yciu. P?ki co, jest tak jak jest.
Mo?ecie w komentarzach przedstawia? swoje wersje tego skryptu, mo?e macie jakie? pomys?y, propozycje?

PS.Kod ten napisa?em na bazie innego skryptu napisanego przez Krzemo1234, oraz poprawionego przez Emm, kt?ry p??niej przerobi?em na w?asne potrzeby. Link
Ukryta wiadomość / Hidden message(aby ją zobaczyć musisz postawić użytkownikowi)

Wiadomość została ukryta, aby ją przeczytać należy się zalogować.

7. Niezniszczalne barierki jak zrobić

Jak zrobi? niezniszczalne barieki daje kod Prosz? o pomoc za pomoc stawaim :piwo:

Kod;



function barier(plr) 

    if getElementModel(plr) ~= 280 then return end

    if getPedOccupiedVehicle(plr) then return end

    

    local x,y,z = getElementPosition(plr)

    local rx,ry,rz = getElementRotation(plr)

        

    local barierka = createObject(1228, x,y,z-0.6)

    setElementData(barierka, "isBarierka", true)

    setElementRotation(barierka, rx, ry, rz+90)   

    setElementFrozen(barierka, true)

    

    

    setElementData(barierka, "isBarierka2", getPlayerName(plr))

end

addCommandHandler("ub",barier )

    

function barier (plr)

    if getElementModel(plr) ~= 280 then return end

    for i,v in ipairs(getElementsByType("object", resourceRoot)) do

      if not getElementData(v, "isBarierka") then return end

      if getElementData(v, "isBarierka2") == getPlayerName(plr) then

        destroyElement(v)

     end

   end

 end

 addCommandHandler("usb", barier)

meta:

Kod:

<meta>

  <script src="bar.lua" type="server" />

</meta>

Stosuj znaczniki lua/code //emm

8. Barierki

Hej. W skrypcie mam ustawione na Team'a - Policja.
Tylko mam pro?b? ?eby kto? mi zamieni? to na grup? ACL 'Policja' bo nie chc? stwarza? team?w.

Kod:

barierki = {}

addCommandHandler ( "b", function(plr)

team = getPlayerTeam ( plr )

if getTeamName ( team ) ~= "Policja" then return end

x,y,z = getElementPosition ( plr )

r1,r2,r3 = getElementRotation ( plr )

barierka = createObject ( 1237, x, y, z, r1, r2, r3 )

table.insert ( barierki, barierka )

end)

addCommandHandler ( "bu", function(plr)

team = getPlayerTeam ( plr )

if getTeamName ( team ) ~= "Policja" then return end

for k,v in ipairs ( barierki ) do

destroyElement ( v )

end

end)

P.S. To nie m?j skrypt

9. Barierki

Witam, chodzi mi o barierki na komende /barierka1 /usunbarierke1



function barierka (thePlayer, command,objectModel)

if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(thePlayer)),aclGetGroup("poli")) then 

    createObject (2000)

    local x,y,z = getElementPosition(thePlayer) -- pobierz pozycj? gracza

    x = x + 5 -- dodaj 5 jednostek do pozycji

end

end

end

addCommandHandler("barierka1", barierka)

jak by ktos poprawi? i zostawi? puste pole na id barierki to by?bym wdzi?czny oraz stawie DUUU?E :piwo:

10. Barierki

Mam oto taki skrypt na barierki.Chc? aby one by?y na ACL Policja i ?eby poprawnie dzia?a?y, czyli ?eby si? nie rozwala?y gdy w nie wjedziemy i ?eby sta?y w miejscu oto kod :

local pacholki = {} 



function createPacholek(player) 

team = getPlayerTeam ( player )

if getTeamName ( team ) ~= SAPD then return end

local x, y, z = getElementPosition(player) 

r1, r2, r3 = getElementRotation(player)

local obiekt = createObject ( 1228, x, y, z-0.5) 

setElementRotation ( obiekt, r1, r2, r3)

setElementFrozen(obiekt, true)

table.insert(pacholki, obiekt) 

setObjectBreakable(pacholki, false)

end 

addCommandHandler(ustawbarierke, createPacholek) 



function destroyPacholki(player)

team = getPlayerTeam ( player )

if getTeamName ( team ) ~= SAPD then return end 

for i,v in pairs(pacholki) do 

if isElement(v) then 

destroyElement(v) 

end 

end 

pacholki = {} 

end 

addCommandHandler(usunbarierki, destroyPacholki)

11. Barierki

Cze??, mam kodzik na barierki, dzia?a wszystko tylko jak ktos w ni? wiedzie to si? psuje, da si? to zmieni??

local pacholki = {} 



function createPacholek(player) 

team = getPlayerTeam ( player )

if getTeamName ( team ) ~= "PD" then return end

local x, y, z = getElementPosition(player) 

r1, r2, r3 = getElementRotation(player)

local obiekt = createObject ( 1228, x, y, z-0.5) 

setElementRotation ( obiekt, r1, r2, r3)

setElementFrozen(obiekt, true)

table.insert(pacholki, obiekt) 

end 

addCommandHandler("ustawbarierke", createPacholek) 



function destroyPacholki(player)

team = getPlayerTeam ( player )

if getTeamName ( team ) ~= "PD" then return end 

for i,v in pairs(pacholki) do 

if isElement(v) then 

destroyElement(v) 

end 

end 

pacholki = {} 

end 

addCommandHandler("usunbarierki", destroyPacholki)

12. dxDrawText i barierki

Witam, jak da? jaki? tekst tu? nad g?ow? peda? oraz jak zrobi? takie co?, ?e je?li stoimy samochodem przed barierk? zabierze nam 50$ i barierka si? otwiera

13. [INNE] Barierki dla PD

Cze??, potrzebuje skryptu do stawiania barierek przez Pomoc Drogow? na cmd.

Chodzi o to by po wpisaniu jakie? komendy w miejscu gdzie stoi pracownik Pomocy Drogowej pojawi?a si? barierka o ID 3091.

Nie chce by kto? pisa? za mnie a raczej by podpowiedzia? jak to uczyni?

g??wnie chodzi o zapis do pliku i pobranie pozycji gracza

14. [INNE] Barierki

[center][b]Witam.Posiadam komendy na dodawanie u usuwanie barierek i slupkow lecz dzialaja kiedy tylko chc?.Je?li jest taka mo?liwo?? to prosz? mi to naprawi?.Za pomoc piwko.

[code]if (strcmp(cmdtext, "/barierka", true)==0 && (gTeam[playerid] == TEAM_PD))
{
new Float:x, Float:y, Float:z;
GetPlayerPos(playerid, x, y, z);
for(new i=0; i<sizeof barierka; i++)
{
if(barierka[i] != -1) continue;
barierka[i] = CreateObject(1228, x, y, z - 0.5, 0.0, 0.0, 0);
break;
}
return 1;
}

if (strcmp(cmdtext, "/pacholek", true)==0 && (gTeam[playerid] == TEAM_PD)) {
new Float:x, Float:y, Float:z;
GetPlayerPos(playerid, x, y, z);
for(new i=0; i<sizeof pacholek; i++)
{
if(pacholek[i] != -1) continue;
pacholek[i] = CreateObject(1238, x, y, z - 0.5, 0.0, 0.0, 0);
break;
}
return 1;
}

if (strcmp(cmdtext, "/usun-pacholek", true)==0 && (gTeam[playerid] == TEAM_PD))
{
new Float:e[3];
for(new i=0; i<sizeof pacholek; i++)
{
GetObjectPos(pacholek[i],e[0],e[1],e[2]);
if(IsPlayerInRangeOfPoint(playerid,1,e[0],e[1],e[2]))
{
DestroyObject(pacholek[i]);
pacholek[i] = -1;
}
}
return 1;
}

if (strcmp(cmdtext, "/usun-barierka", true)==0 && (gTeam[playerid] == TEAM_PD))
{
new Float:e[3];
for(new i=0; i<sizeof barierka; i++)
{
GetObjectPos(barierka[i],e[0],e[1],e[2]);
if(IsPlayerInRangeOfPoint(playerid,1,e[0],e[1],e[2]))
{
DestroyObject(barierka[i]);
barierka[i] = -1;
}
}
retu...

15. "Skaczące" barierki - obiekty 995, 997

Posiadam skrypt mapka w kt?rym umieszczam obiekty na serwer. Najpierw wszystko buduje w edytorze - ALL OK. P??niej kopiuje do PWN, kompiluje i odpalam serwer. Wszystkie obiekty ?adnie si? uk?adaj?c opr?cz barierek (995, 997). 'Skacz?' - przesuwaj? si?, obracaj?. O co chodzi? Jak to naprawi??