Jonas^

Members
  • Content Count

    947
  • Joined

  • Last visited

  • Days Won

    9

Jonas^ last won the day on May 26 2019

Jonas^ had the most liked content!

Community Reputation

245 Celebrity

About Jonas^

  • Rank
    Hoodsta

Details

  • Gang
    -
  • Location
    Brazil
  • Interests
    Programming/Scripting

Recent Profile Visitors

4,040 profile views
  1. Jonas^#0001 A e só uma coisinha que acabei esquecendo fiz na pressa, esqueci de um argumento no outPut na linha 15, como não foi informado por se tratar de server-side ele ira mandar aquela mensagem pra todos e não apenas para o jogador que digitou o comando, troque ela por essa: outputChatBox ("Nenhum jogador encontrado com esse nick!", player, 255, 0, 0)
  2. Código melhorado e devidamente indentado..... addCommandHandler ("versujo", function (player, cmd, target) if (isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(player)), aclGetGroup("Policial"))) then local targetplayer = getPlayerFromName (target) if (targetplayer) then local pX, pY, pZ = getElementPosition (player) -- posição do policial local bX, bY, bZ = getElementPosition (targetplayer) -- posição do abordado local dist = getDistanceBetweenPoints3D (pX, pY, pZ, bX, bY, bZ) -- calcula a distancia da duas posições if dist < 3 then -- se a distancia for menor que 3 então: local Dinheiro_Sujo = getElementData (targetplayer, "moneysujo") outputChatBox ("✘#ffffffINFO#0037FF✘➺ #ffffffO Jogador Tem: #FF0000R$"..Dinheiro_Sujo.."#ffffff Na Carteira !", player, 0, 22, 100, true) else --se não for então: outputChatBox ("✘#ffffffINFO#0037FF✘➺ #ffffffVocê esta muito longe!", player, 0, 22, 100, true) end else outputChatBox ("Nenhum jogador encontrado com esse nick!", 255, 0, 0) end else outputChatBox ("Você não tem acesso a esse comando!", player, 255, 0, 0) end end)
  3. Sim. (Não ira trazer bug's desde que faça da forma correta, ainda mais usando uma database separada, coisa que acho desnecessário)
  4. Da f5 na pagina e copie o codigo novamente e teste.
  5. Player não esta declarado em lugar algum na sua função. Sobre o debug basta usar o comando /debugscript 3 e /debugscript 0 pra desativar. Correção: function setPedAnimationSpeed (player, anim, speed) triggerClientEvent (player, "animSped", player, player, anim, speed) end function setCuffPlayer (player) setPedAnimation (player, nil) setPedAnimation (player, 'ped', 'pass_Smoke_in_car', 0, true, true, true) setTimer (setPedAnimationSpeed, 60, 1, player, 'pass_Smoke_in_car', 0) local x, y, z = getElementPosition (player) local box = createObject(364, x, y, z) exports.bone_attach:attachElementToBone (box, player, 12, 0,0,0, 0,40,-10) setElementCollisionsEnabled (box, false) setElementData (player,'cuffOb', box) toggleControl (player, 'jump', false) setTimer(function (player) if (getElementData (player, 'cuff') and getElementData (player, 'cuff') == true) then toggleControl (player, 'fire', false) end end, 60, 0, player) toggleControl (player, 'crouch', false) end function cuff (thePlayer, cmd, nick) if (isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(thePlayer)), aclGetGroup ("BOPE")) or isObjectInACLGroup ("user."..getAccountName(getPlayerAccount(thePlayer)), aclGetGroup ("PMRJ"))) then local nickJogador = getPlayerFromPartialName (nick) if (nickJogador) then local x, y, z = getElementPosition (thePlayer) local x1, y1, z1 = getElementPosition (nickJogador) if (getDistanceBetweenPoints3D (x1, y1, z1, x, y, z) <= 20) then if not (getElementData (nickJogador, 'cuff')) then -- if isPedInVehicle (nickJogador) then -- setControlState (nickJogador, 'enter_exit', true) -- setTimer (setCuffPlayer, 2800, 1, nickJogador) -- setElementData (nickJogador, 'cuff', true) -- else setCuffPlayer (nickJogador) setElementData (nickJogador, 'cuff', true) toggleAllControls (nickJogador, false) outputChatBox (getPlayerName(thePlayer)..'#ff0000 Algemou você', nickJogador, 255, 255, 255, true) -- end else removeElementData (nickJogador, 'cuff') destroyElement (getElementData (nickJogador, 'cuffOb')) removeElementData (nickJogador, 'cuff') toggleAllControls (nickJogador, true) setPedAnimation (nickJogador, 'ped', 'pass_Smoke_in_car', 0, false, false, false, false) outputChatBox (getPlayerName(thePlayer)..'#008800 Soltou suas algemas', nickJogador, 255, 255, 255, true) end else outputChatBox ("Você está longe demais!", thePlayer, 255, 0, 0) end else outputChatBox ("Nenhum jogador com esse nick foi encontrado!", thePlayer, 255, 0, 0) end else outputChatBox ("Você não tem acesso a esse comando!", thePlayer, 255, 0, 0) end end addCommandHandler ('prender', cuff) addEventHandler ('onPlayerQuit', root, function () if (getElementData (source, 'cuff') == true) then destroyElement(getElementData(source, 'cuffOb')) removeElementData (source, 'cuff') end end) addEventHandler ('onPlayerWasted', root, function () if (getElementData (source, 'cuff') == true) then destroyElement(getElementData(source, 'cuffOb')) removeElementData (source, 'cuff') end end) addEventHandler ('onVehicleStartEnter', getRootElement(), function (player, seat) if (getElementData (player, 'cuff') == true) then if (seat ~= 0) then destroyElement(getElementData(player, 'cuffOb')) else cancelEvent () outputChatBox ('Você não pode dirigir você tem algemas!', player, 255, 0, 0) end end end) setTimer(function () for _, player in ipairs(getElementsByType("player")) do if (getElementData (player, 'cuff') == true) then if isElementInWater(player) then setTimer(function(player) if isElementInWater(player) then killPed (player) end end, 5000, 1, player) end end end end, 1000, 0) addEventHandler ('onVehicleExit', getRootElement(), function (player, seat) if (getElementData (player, 'cuff') == true) then setCuffPlayer (player) end end) function getPlayerFromPartialName (name) local name = name and name:gsub("#%x%x%x%x%x%x", ""):lower() or nil if name then for _, player in ipairs(getElementsByType("player")) do local name_ = getPlayerName(player):gsub("#%x%x%x%x%x%x", ""):lower() if name_:find(name, 1, true) then return player end end end end OBS: Não fiz nenhum teste, faça você mesmo e me diga o resultado.
  6. Aqui também acontece isso @Tommy., já tentei resolver mexendo em todas configurações mas nada resolveu, mas só com vscode, dai pra indentar uso o notepad++
  7. Cara sempre procure deixar o código organizado e e indentado de forma correta, assim fica mais facil de você entender oque você esta fazendo, tem muitas coisas nesse código seu que daria pra fazer de uma forma bem melhor, código devidamente indentado: oldTeam = {} -- Tabela para salvar o Team antigo. napvp = createColRectangle ( 5441.9, -1926.4, 119.5, 133 ) event_iniciado = 1 verificarOne = 0 local spawns = { { 5460.70264, -1825.30945, 10.97057 }, { 5454.74805, -1884.13953, 10.29621 }, { 5537.57373, -1887.13306, 11.04092 }, { 5545.14746, -1829.44873, 10.29401 }, { 5501.95557, -1861.66174, 10.29621 } } function start_admin_event (player) if (event_iniciado == 1) then local accName = getAccountName ( getPlayerAccount ( player ) ) if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Owner" ) ) then outputDebugString ("Evento Iniciado") event_iniciado = event_iniciado +1 i = 0 pvp_1 = createTeam("PVP-Red [use /pvp]", 255, 0, 0) pvp_2 = createTeam("PVP-Green [use /pvp]", 0, 255, 0) pvp_3 = createTeam("PVP-Blue [use /pvp]", 0, 0, 255) pvp_4 = createTeam("PVP-Yellow [use /pvp]", 255, 255, 0) addCommandHandler ( "pvp", tele ) end else outputChatBox("The event is already activated", player, 255, 0, 0) end end addCommandHandler ( "eventStart", start_admin_event ) function entrar_na_zona( thePlayer, matchingDimension ) if getElementType ( thePlayer ) == "player" then --outputChatBox( "Working One" ) redirecionar_team (thePlayer ) end end addEventHandler("onColShapeHit", zonapvp, entrar_na_zona) function sair_da_zona ( thePlayer, matchingDimension ) if getElementType ( thePlayer ) == "player" then --outputChatBox( "Working Two" ) retirar_team (thePlayer ) end end addEventHandler("onColShapeLeave", zonapvp, sair_da_zona) function tele (player) local teles = math.random ( #spawns ) if ( teles ) then local isTeamPlayer = getPlayerTeam ( player ) if getElementData(player,"SavedTeam") then setElementData(player,"inPVP",true) else --outputDebugString ("Esse playe foi pro pvp mas não tem team") verificarOne = verificarOne +1 end setElementPosition(player, unpack ( spawns [ teles ] )) end end function redirecionar_team (thePlayer) playerTeam = getPlayerTeam(thePlayer) i = i + 1 if i > 4 then i = 1 end if pvp_1 and pvp_2 and pvp_3 and pvp_4 then if playerTeam then --/// Verifica se o player já estava em um Team oldTeam[thePlayer] = getTeamName(playerTeam) --/// Salva o Team na tabela oldTeam end if i == 1 then setPlayerTeam ( thePlayer, pvp_1 ) end if i == 2 then setPlayerTeam ( thePlayer, pvp_2 ) end if i == 3 then setPlayerTeam ( thePlayer, pvp_3 ) end if i == 4 then setPlayerTeam ( thePlayer, pvp_4 ) end end end function retirar_team (player) if getElementData(player,"SavedTeam") then if getTeamFromName(oldTeam[player]) then --/// Verifica se o Team antigo ainda existe setPlayerTeam(player, getTeamFromName(oldTeam[player])) --/// Seta o player no Team que está na tabela oldTeam end local t = getElementData ( player, "SavedTeam" ) setElementData(player,"SavedTeam",false) end end addCommandHandler ("stop123", function (player) local accName = getAccountName ( getPlayerAccount ( player ) ) if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Owner" ) ) then if event_iniciado >= 2 then for k , v in ipairs(getElementsByType("player")) do if getElementData(v,"inPVP") then retirar_team (v) end end for i, team in ipairs(getElementsByType("team")) do destroyElement(team) end removeCommandHandler ( "pvp" ) event_iniciado = 1 else outputChatBox("Unable to stop because it was not started", player, 255, 0, 0) end end end)
  8. Provavelmente seja alguma element-data que você terá que informar em seu velocimetro, poste na área adequada da próxima vez. Área adequada para criar tópicos relacionados a esse. Programação em Lua Tópicos uteis: Informações úteis - Scripting/Configurações/Tutoriais para o MTA [VÍDEO] Tudo sobre este fórum
  9. GetPlayerAccount GetAccountName GetElementData SetElementData IsObjectInACLGroup AddCommandHandler Eventos (client-side) OnClientPlayerDamage OnClientPlayerStealthKill Edit: Próxima vez crie tópico na área adequada, se é novo por aqui, de uma olhada como funciona nosso fórum. Área adequada para criar tópicos relacionados a esse. Programação em Lua Tópicos uteis: Informações úteis - Scripting/Configurações/Tutoriais para o MTA [VÍDEO] Tudo sobre este fórum
  10. Merry Christmas and may everyone have a successful 2020!
  11. Na verdade agora que vi que não é preciso confirmar com o comando padrão do admin aeuhaeaeaeua, agora nem eu sei oque ta acontecendo, só vendo pra saber.
  12. Dificuldade em... if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount (source)), aclGetGroup ("Console")) then outputChatBox ("*#FFEE00ʙᴄʙ ʟᴏᴄᴀʟ #FFEE00- #FF6A6APresidente #FFEE00- #ffffff"..removeHex(getPlayerName(source)).." ("..getElementData(source, "ID")..")#FFEE00 - #ffffff#FF6A6A "..tresc, gracze, 255, 255, 255, true) end function removeHex( s ) if type(s) == "string" then while(s:find("#%x%x%x%x%x%x")) do s = s:gsub("#%x%x%x%x%x%x","") end end return s or false end
  13. É, na realidade não pensei na possibilidade dele ter mexido no painel admin e ter mexido logo na parte de registro.... mas, são hiposteses, apenas olhando pra saber oque realmente esta acontecendo. Agora que percebi também que ele citou ali nos comandos: '' meto /register matias 1234 e depois /login matias 1234 apareçe assim login :No known account for ´matias` "" Faz sentido acontecer isso se ele esta digitando desta forma o comando de /register, até porque é necessario confirmar a senha. /register matias 1234 1234.
  14. Não tem como ter dado erro, esses comandos são nativos do painel admin, verifique se o seu painel admin esta com permissão de administrador, ou se tem algum outro resource cancelando os 2 comandos.