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

Wysłany: 2016-06-21, 14:48


ZZiomek

..::LUA::..






Wiek: 26
Na forum: 4008 dni
Posty: 134
Nick w MP: NexBoy

Piwa: 5961

Respekt: 155,3
Respekt: 155,3Respekt: 155,3

Siema, mam taki problem z kodem na prace kopalnia wszystko dzia?a mi na localnym a jak wgram na serva publicznego to pisze w DB, ?e jaki? symbol jest po stronie serwera i nie mo?e przetirgerowa? na strone clienta, pom?g?by kto??

Podpis

Dodaj na Steam: Kod: 1093365219
Discord: NoOne#3644

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-06-21, 15:23


xMaXeRx







Wiek: 25
Na forum: 3960 dni
Posty: 53
Nick w MP: maxer

Piwa: 586

Respekt: 135,3
Respekt: 135,3

"ZZiomek" napisał/a:

Siema, mam taki problem z kodem na prace kopalnia wszystko dzia?a mi na localnym a jak wgram na serva publicznego to pisze w DB, ?e jaki? symbol jest po stronie serwera i nie mo?e przetirgerowa? na strone clienta, pom?g?by kto??


Daj kod

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-06-21, 15:45


marcin778

Krytyk serwerów MTA






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

Piwa: 4661

Respekt: 1436,8
Respekt: 1436,8

ZZiomek, Otw?rz server za pomoc? programu notepad++ Nast?pnie wybierz zak?adk? format i wybierz 'Koduj w UTF-8' Zapisz ctrl + s i b?dzie ?miga?.

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

-- obecnie
-- obecnie
-- dawniej
-- dawniej
-- dawniej
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-06-21, 16:08


ZZiomek

..::LUA::..






Wiek: 26
Na forum: 4008 dni
Posty: 134
Nick w MP: NexBoy

Piwa: 5961

Respekt: 155,3
Respekt: 155,3Respekt: 155,3

marcin778, Dzi?ki wielkie! piwko leci!

Podpis

Dodaj na Steam: Kod: 1093365219
Discord: NoOne#3644

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-06-26, 13:42


DzikiSpawacz







Wiek: 31
Na forum: 4003 dni
Posty: 8



Respekt: 50

Czy m?g?by? przerobi? to tak ,aby barierka si? nie niszczy?a?

pacholki = {} 

function createPacholek(player) 
team = getPlayerTeam ( player )
if getTeamName ( team ) == "Policja" then return end
local x, y, z = getElementPosition(player) 
r1, r2, r3 = getElementRotation(player)
local obiekt = createObject ( 1238, x, y, z-0.5) 
setElementRotation ( obiekt, r1, r2, r3)
setElementFrozen(obiekt, true)
table.insert(pacholki, obiekt) 
setElementCollisionsEnabled ( obiekt, true)
setObjectBreakable(obiekt, false)
end 
addCommandHandler("ustawbarierke", createPacholek)

function destroyPacholki(player)
team = getPlayerTeam ( player )
if getTeamName ( team ) == "Policja" then return end 
for i,v in pairs(pacholki) do 
if isElement(v) then 
destroyElement(v) 
end 
end 
pacholki = {} 
end 
addCommandHandler ( "usunbarierki", destroyPacholki)


[ Komentarz dodany przez: AteX: 2016-06-26, 14:03 ]
Stosuj znaczniki LUA

Ostatnio zmieniony przez AteX 2016-06-26, 14:02, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-05, 10:58


lukas60055







Wiek: 25
Na forum: 4058 dni
Posty: 53
Nick w MP: Lukasino



Respekt: 75,3

Witam czy mog?by ktos mi przerobic skrypt Komputer OSP zeby syrene slyszeli wszyscy Gracze


function syrenaOSP ()
if source == alarm then
local syrena = playSound3D("syrena.mp3", -129.9380, 1007.0525, 34.8554, false)
setSoundVolume(syrena,300)
setSoundMaxDistance(syrena, 350)
outputChatBox ("Uruchomi?e? syren? alarmow? OSP.")
end
end
addEventHandler("onClientGUIClick", root, syrenaOSP)

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-09, 21:34


Yokosik







Wiek: 26
Na forum: 3770 dni
Posty: 58
Nick w MP: Yokosik

Piwa: 1048

Respekt: 21

Kod:

function syrenaOSP ()
if source == alarm then
local syrena = playSound3D("syrena.mp3", -129.9380, 1007.0525, 34.8554, false)
setSoundVolume(syrena,300)
setSoundMaxDistance(syrena, 350)
outputChatBox ("Uruchomi?e? syren? alarmow? OSP.")
end
end
addEventHandler("onClientGUIClick", root, syrenaOSP)


Zwi?ksz maksymalny dystans np. na:
setSoundMaxDistance(syrena, 50000)

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-16, 02:35


STOPseba

Emeryt na scenie MTA






Wiek: 26
Na forum: 3912 dni
Posty: 448
Nick w MP: STOPseba

Piwa: 5016

Respekt: 576,3
Respekt: 576,3

Witam moze ktos mi przerobi? ten panel pojazdy.Chodzi o to zeby da?o sie strza?kami wybierac
opcje
http://www.wyslij-plik.pl/pokaz/855826---ydhr.html

Podpis



Kontakt
Discord: STOPseba#7603
STOPseba na fejsie
Messenger


Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-16, 11:13


Yokosik







Wiek: 26
Na forum: 3770 dni
Posty: 58
Nick w MP: Yokosik

Piwa: 1048

Respekt: 21

"STOPseba" napisał/a:

Witam moze ktos mi przerobi? ten panel pojazdy.Chodzi o to zeby da?o sie strza?kami wybierac
opcje
http://www.wyslij-plik.pl/pokaz/855826---ydhr.html


Prosz?: http://www25.zippyshare.com/v/lbrwTTJK/file.html

Mam nadzieje ?e dostane respekt oraz piwo ;)

Postaw piwo autorowi tego posta
 

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


STOPseba

Emeryt na scenie MTA






Wiek: 26
Na forum: 3912 dni
Posty: 448
Nick w MP: STOPseba

Piwa: 5016

Respekt: 576,3
Respekt: 576,3

Witam mo?e ktos mi przerobi? ten skrypt na przebieralnie dla acl premium
http://www14.wyslij-plik....429---ite1.html

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-17, 09:58


Yokosik







Wiek: 26
Na forum: 3770 dni
Posty: 58
Nick w MP: Yokosik

Piwa: 1048

Respekt: 21

"STOPseba" napisał/a:

Witam mo?e ktos mi przerobi? ten skrypt na przebieralnie dla acl premium
http://www14.wyslij-plik....429---ite1.html


Mam nadzieje ?e dostane repke oraz piwo.

Link: http://www15.zippyshare.com/v/NfA3j6EZ/file.html

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-18, 17:00


Ozzaku







Wiek: 29
Na forum: 3958 dni
Posty: 41
Nick w MP: Ozzaku

Piwa: 4

Respekt: 35,3

Wi?c chodzi mi o to ,zeby przerobi? skrypt zombie zeby sie ich mniej respilo tak ok 30 http://www38.zippyshare.com/v/SHo8JB0g/file.html bede wdzieczny

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-18, 17:44


Komel123







Wiek: 22
Na forum: 3863 dni
Posty: 54
Nick w MP: incognito



Respekt: 50

Witam, czy mo?e kto? zrobi? mi rangi XyzzyRP, powinny tam si? znale?? RCON bardzo czerwony, Administrator Czerwony, Pracownik Techniczny Fioletowy, Support niebieski.
Pozdrawiam.
Kod:
--[[
@author Lukasz Biegaj <wielebny@bestplay.pl>
@author Karer <karer.programmer@gmail.com>
@author WUBE <wube@lss-rp.pl>
@copyright 2011-2013 Lukasz Biegaj <wielebny@bestplay.pl>
@license Dual GPLv2/MIT
]]--



function cmd_admins(plr)
  local supporterzy={}
  local admini={}
  for i,v in ipairs(getElementsByType("player")) do
    if (isAdmin(v)) then
      local t
      local login=getElementData(v,"auth:login")
      if (login) then
        t=login.."("..getElementData(v,"id")..")"
--[[
        if (getElementData(v,"pmoff")) then
            t=login.."(-)"
        else
            t=login.."("..getElementData(v,"id")..")"
        end
]]--
        table.insert(admini,t)
      end

    elseif (isSupport(v)) then
      local t
      local login=getElementData(v,"auth:login")
      if (login) then
        t=login.."("..getElementData(v,"id")..")"
--[[
        if (getElementData(v,"pmoff")) then
            t=login.."(-)"
        else
            t=login.."("..getElementData(v,"id")..")"
        end
]]--

        table.insert(supporterzy,t)
      end
    end
  end
  outputChatBox("Admini:", plr, 100,0,0)
  if (#admini>0) then
    outputChatBox("  " .. table.concat(admini,", "), plr)
  else
    outputChatBox("  brak", plr)
  end

  outputChatBox("Support:", plr, 100,100,255)
  if (#supporterzy>0) then
    outputChatBox("  " .. table.concat(supporterzy,", "), plr)
  else
    outputChatBox("  brak", plr)
  end
end
addCommandHandler("admins", cmd_admins, false, false)

local function outputChatBoxSplitted(text, target, c1,c2,c3, ca)
  if (string.len(text)<128) then
    outputChatBox(text, target, c1,c2,c3,ca)
    return
  end
  local t=""
  for i,v in string.gmatch(text,"(.)") do
      if (string.len(t)>0 and string.len(t)+string.len(i)>=128) then
            outputChatBox(t, target, c1,c2,c3,ca)
            t=" "
      end
      t=t..i
  end
  if (string.len(t)>0 and t~=" ") then
        outputChatBox(t, target, c1,c2,c3,ca)
  end
  
end

addCommandHandler("losowanie",function(player,cmd,yes,no)
    if (not yes) or (not no) then outputChatBox("(( /losowanie [JEZELI TAK] [JEZELI NIE] ))",player) return end
    local rand = math.random(1,2)
    if rand==1 then --yes
        message = yes
    else--no
        message = no
    end
        local character = getElementData(player,"character")
        if (not character) then
            outputChatBox("Najpierw do??cz do gry", player, 255, 0, 0,true)
            return
        end
        local x,y,z   = getElementPosition(player)
        exports["lss-admin"]:gameView_add("IC " .. character.imie .. " " .. character.nazwisko .. "/"..getPlayerID(player)..": /do - /losowanie " .. message)
        local strefa  = createColSphere(x,y,z,30)
        local gracze  = getElementsWithinColShape(strefa, "player")
        
        for i,v in ipairs(gracze) do
            if (getElementInterior(v)==getElementInterior(player) and getElementDimension(v)==getElementDimension(player)) then
                outputChatBoxSplitted( " * " .. message .. " #A0A0A0((" .. character.imie .. " " .. character.nazwisko .. " - /losowanie))", v, 0x41, 0x69, 0xE1, true)
                triggerClientEvent(v, "onCaptionedEvent", root, message, 10)
                for i2,v2 in ipairs(getElementsByType("player")) do
                    if (getCameraTarget(v2)==v and v~=v2) then
                        triggerClientEvent(v2, "onCaptionedEvent", root, message, 10)
                        outputChatBoxSplitted( " * " .. message .. " #A0A0A0((" .. character.imie .. " " .. character.nazwisko .. " - /losowanie))", v2, 0x41,  0x69, 0xE1, true) -- aqq
                    end
                end
            end
        end
        destroyElement(strefa)
    
end) 

[size=9][ [i][b]Dodano[/b]: 2016-07-18, 17:44[/i] ][/size]
Witam, czy mo?e kto? zrobi? mi rangi XyzzyRP, powinny tam si? znale?? RCON bardzo czerwony, Administrator Czerwony, Pracownik Techniczny Fioletowy, Support niebieski.
Pozdrawiam.
Kod:
--[[
@author Lukasz Biegaj <wielebny@bestplay.pl>
@author Karer <karer.programmer@gmail.com>
@author WUBE <wube@lss-rp.pl>
@copyright 2011-2013 Lukasz Biegaj <wielebny@bestplay.pl>
@license Dual GPLv2/MIT
]]--



function cmd_admins(plr)
  local supporterzy={}
  local admini={}
  for i,v in ipairs(getElementsByType("player")) do
    if (isAdmin(v)) then
      local t
      local login=getElementData(v,"auth:login")
      if (login) then
        t=login.."("..getElementData(v,"id")..")"
--[[
        if (getElementData(v,"pmoff")) then
            t=login.."(-)"
        else
            t=login.."("..getElementData(v,"id")..")"
        end
]]--
        table.insert(admini,t)
      end

    elseif (isSupport(v)) then
      local t
      local login=getElementData(v,"auth:login")
      if (login) then
        t=login.."("..getElementData(v,"id")..")"
--[[
        if (getElementData(v,"pmoff")) then
            t=login.."(-)"
        else
            t=login.."("..getElementData(v,"id")..")"
        end
]]--

        table.insert(supporterzy,t)
      end
    end
  end
  outputChatBox("Admini:", plr, 100,0,0)
  if (#admini>0) then
    outputChatBox("  " .. table.concat(admini,", "), plr)
  else
    outputChatBox("  brak", plr)
  end

  outputChatBox("Support:", plr, 100,100,255)
  if (#supporterzy>0) then
    outputChatBox("  " .. table.concat(supporterzy,", "), plr)
  else
    outputChatBox("  brak", plr)
  end
end
addCommandHandler("admins", cmd_admins, false, false)

local function outputChatBoxSplitted(text, target, c1,c2,c3, ca)
  if (string.len(text)<128) then
    outputChatBox(text, target, c1,c2,c3,ca)
    return
  end
  local t=""
  for i,v in string.gmatch(text,"(.)") do
      if (string.len(t)>0 and string.len(t)+string.len(i)>=128) then
            outputChatBox(t, target, c1,c2,c3,ca)
            t=" "
      end
      t=t..i
  end
  if (string.len(t)>0 and t~=" ") then
        outputChatBox(t, target, c1,c2,c3,ca)
  end
  
end

addCommandHandler("losowanie",function(player,cmd,yes,no)
    if (not yes) or (not no) then outputChatBox("(( /losowanie [JEZELI TAK] [JEZELI NIE] ))",player) return end
    local rand = math.random(1,2)
    if rand==1 then --yes
        message = yes
    else--no
        message = no
    end
        local character = getElementData(player,"character")
        if (not character) then
            outputChatBox("Najpierw do??cz do gry", player, 255, 0, 0,true)
            return
        end
        local x,y,z   = getElementPosition(player)
        exports["lss-admin"]:gameView_add("IC " .. character.imie .. " " .. character.nazwisko .. "/"..getPlayerID(player)..": /do - /losowanie " .. message)
        local strefa  = createColSphere(x,y,z,30)
        local gracze  = getElementsWithinColShape(strefa, "player")
        
        for i,v in ipairs(gracze) do
            if (getElementInterior(v)==getElementInterior(player) and getElementDimension(v)==getElementDimension(player)) then
                outputChatBoxSplitted( " * " .. message .. " #A0A0A0((" .. character.imie .. " " .. character.nazwisko .. " - /losowanie))", v, 0x41, 0x69, 0xE1, true)
                triggerClientEvent(v, "onCaptionedEvent", root, message, 10)
                for i2,v2 in ipairs(getElementsByType("player")) do
                    if (getCameraTarget(v2)==v and v~=v2) then
                        triggerClientEvent(v2, "onCaptionedEvent", root, message, 10)
                        outputChatBoxSplitted( " * " .. message .. " #A0A0A0((" .. character.imie .. " " .. character.nazwisko .. " - /losowanie))", v2, 0x41,  0x69, 0xE1, true) -- aqq
                    end
                end
            end
        end
        destroyElement(strefa)
    
end)


[ Komentarz dodany przez: AteX: 2016-07-18, 17:47 ]
Stosuj znaczniki [lua][/lua]

Ostatnio zmieniony przez AteX 2016-07-18, 17:47, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-18, 18:14


marcin778

Krytyk serwerów MTA






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

Piwa: 4661

Respekt: 1436,8
Respekt: 1436,8

"lukas60055" napisał/a:

Witam czy mog?by ktos mi przerobic skrypt Komputer OSP zeby syrene slyszeli wszyscy Gracze


function syrenaOSP ()
if source == alarm then
local syrena = playSound3D("syrena.mp3", -129.9380, 1007.0525, 34.8554, false)
setSoundVolume(syrena,300)
setSoundMaxDistance(syrena, 350)
outputChatBox ("Uruchomi?e? syren? alarmow? OSP.")
end
end
addEventHandler("onClientGUIClick", root, syrenaOSP)


local syrena = playSound("syrena.mp3") 


Yokosik Po co dystans zmienia?? ;-;

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

-- obecnie
-- obecnie
-- dawniej
-- dawniej
-- dawniej
Ostatnio zmieniony przez marcin778 2016-07-18, 20:57, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 

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


Yokosik







Wiek: 26
Na forum: 3770 dni
Posty: 58
Nick w MP: Yokosik

Piwa: 1048

Respekt: 21

On w kodzie ma ,,setSoundMaxDistance(syrena, 350)", wi?c w?tpie ?e ca?y serwer to us?yszy ;)

Postaw piwo autorowi tego posta
 

 
Tagi: prośby :: przerobienie :: skryptu
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Zasoby do MTA » PROŚBY O PRZEROBIENIE SKRYPTU Odpowiedz do tematu

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