Wysłany: 2016-06-21, 14:48
ZZiomek
..::LUA::..
Wiek: 26 Na forum: 3867 dni Posty: 134
Nick w MP: NexBoy
Piwa : 5961
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
Wysłany: 2016-06-21, 15:23
xMaXeRx
Wiek: 24 Na forum: 3819 dni Posty: 53
Nick w MP: maxer
Piwa : 586
"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
Wysłany: 2016-06-21, 15:45
marcin778
Krytyk serwerów MTA
Wiek: 24 Na forum: 4149 dni Posty: 2268
Nick w MP: Marcineg
Piwa : 4662
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?.
Wysłany: 2016-06-21, 16:08
ZZiomek
..::LUA::..
Wiek: 26 Na forum: 3867 dni Posty: 134
Nick w MP: NexBoy
Piwa : 5961
marcin778 , Dzi?ki wielkie! piwko leci!
Podpis
Dodaj na Steam: Kod: 1093365219
Discord: NoOne#3644
Wysłany: 2016-06-26, 13:42
DzikiSpawacz
Wiek: 31 Na forum: 3862 dni Posty: 8
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
Wysłany: 2016-07-05, 10:58
lukas60055
Wiek: 25 Na forum: 3918 dni Posty: 53
Nick w MP: Lukasino
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)
Wysłany: 2016-07-09, 21:34
Yokosik
Wiek: 25 Na forum: 3629 dni Posty: 58
Nick w MP: Yokosik
Piwa : 1048
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)
Wysłany: 2016-07-16, 02:35
STOPseba
Emeryt na scenie MTA
Wiek: 25 Na forum: 3771 dni Posty: 448
Nick w MP: STOPseba
Piwa : 5014
Wysłany: 2016-07-16, 11:13
Yokosik
Wiek: 25 Na forum: 3629 dni Posty: 58
Nick w MP: Yokosik
Piwa : 1048
Wysłany: 2016-07-16, 19:18
STOPseba
Emeryt na scenie MTA
Wiek: 25 Na forum: 3771 dni Posty: 448
Nick w MP: STOPseba
Piwa : 5014
Wysłany: 2016-07-17, 09:58
Yokosik
Wiek: 25 Na forum: 3629 dni Posty: 58
Nick w MP: Yokosik
Piwa : 1048
Wysłany: 2016-07-18, 17:00
Ozzaku
Wiek: 29 Na forum: 3817 dni Posty: 41
Nick w MP: Ozzaku
Piwa : 4
Wysłany: 2016-07-18, 17:44
Komel123
Wiek: 21 Na forum: 3722 dni Posty: 54
Nick w MP: incognito
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
Wysłany: 2016-07-18, 18:14
marcin778
Krytyk serwerów MTA
Wiek: 24 Na forum: 4149 dni Posty: 2268
Nick w MP: Marcineg
Piwa : 4662
"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?? ;-;
Ostatnio zmieniony przez marcin778 2016-07-18, 20:57, w całości zmieniany 1 raz
Wysłany: 2016-07-18, 19:04
Yokosik
Wiek: 25 Na forum: 3629 dni Posty: 58
Nick w MP: Yokosik
Piwa : 1048
On w kodzie ma ,,setSoundMaxDistance(syrena, 350)", wi?c w?tpie ?e ca?y serwer to us?yszy
Tagi: prośby :: przerobienie :: skryptu
Anonymous
Na forum: 245 dni
Posty: 1
Anonymous Koniecznie zajrzyj na: