Jump to content

Doongogar

Members
  • Posts

    343
  • Joined

  • Last visited

  • Days Won

    2

Everything posted by Doongogar

  1. function guardarveiculo (player) local id = getElementData(player, "ID") local accName = getAccountName(getPlayerAccount(player)) local carro = getPedOccupiedVehicle(player) local nomecarro = getElementData(carro, "Nome") local donocarro = getElementData(carro, "Owner") local saude = getElementHealth(carro) local gasolina = getElementData(carro, "MD:Gasolina") or 50 local multas = getElementData(carro, "Multas") or 0 local r1, g1, b1, r2, g2, b2, r3, g3, b3 = getVehicleColor(carro, true) local result = dbPoll(dbQuery(db, "SELECT * FROM player WHERE Login = ? AND Veiculo = ?", accName, nomecarro), -1) if donocarro == id then if #result > 0 then if result[1]["Status"] == "Em Rua" then dbExec(db, "UPDATE player SET Status = ? WHERE Login = ? AND Veiculo = ?", "Guardado", accName, nomecarro) dbExec(db, "UPDATE player SET Saude = ? WHERE Login = ? AND Veiculo = ?", saude, accName, nomecarro) dbExec(db, "UPDATE player SET R = ? WHERE Login = ? AND Veiculo = ?", r1, accName, nomecarro) dbExec(db, "UPDATE player SET G = ? WHERE Login = ? AND Veiculo = ?", g1, accName, nomecarro) dbExec(db, "UPDATE player SET B = ? WHERE Login = ? AND Veiculo = ?", b1, accName, nomecarro) dbExec(db, "UPDATE player SET Gas = ? WHERE Login = ? AND Veiculo = ?", gasolina, accName, nomecarro) dbExec(db, "UPDATE player SET Multas = ? WHERE Login = ? AND Veiculo = ?", multas, accName, nomecarro) destroyElement(carro) exports._infobox:addNotification(player, "Você guardou seu veiculo!", "success") end end end end addEvent("H3>GuardarVeiculo", true) addEventHandler("H3>GuardarVeiculo", root, guardarveiculo) addCommandHandler("dv", function(playerSource,commandName,id) if isObjectInACLGroup ( "user." ..getAccountName(getPlayerAccount(playerSource)), aclGetGroup ("Staff")) then if (id) then local playerID = tonumber(id) if(playerID) then local targetPlayer, targetPlayerName = getPlayerID(playerID) if targetPlayer then local veh = getPedOccupiedVehicle(targetPlayer) if veh then destroyElement(veh) end end end end end end ) assim ta certo?, não editei lá pq n to achando o botão de editar acho que some depois de um tempo né
  2. quando eu do dv nos carros eles desaparecem da garagem, somente dando restart no mod que volta para garagem como faço para quando der dv em vez de destuir o veiculo triggar o evento de guarda o veiculo? function guardarveiculo (player) local id = getElementData(player, "ID") local accName = getAccountName(getPlayerAccount(player)) local carro = getPedOccupiedVehicle(player) local nomecarro = getElementData(carro, "Nome") local donocarro = getElementData(carro, "Owner") local saude = getElementHealth(carro) local gasolina = getElementData(carro, "MD:Gasolina") or 50 local multas = getElementData(carro, "Multas") or 0 local r1, g1, b1, r2, g2, b2, r3, g3, b3 = getVehicleColor(carro, true) local result = dbPoll(dbQuery(db, "SELECT * FROM player WHERE Login = ? AND Veiculo = ?", accName, nomecarro), -1) if donocarro == id then if #result > 0 then if result[1]["Status"] == "Em Rua" then dbExec(db, "UPDATE player SET Status = ? WHERE Login = ? AND Veiculo = ?", "Guardado", accName, nomecarro) dbExec(db, "UPDATE player SET Saude = ? WHERE Login = ? AND Veiculo = ?", saude, accName, nomecarro) dbExec(db, "UPDATE player SET R = ? WHERE Login = ? AND Veiculo = ?", r1, accName, nomecarro) dbExec(db, "UPDATE player SET G = ? WHERE Login = ? AND Veiculo = ?", g1, accName, nomecarro) dbExec(db, "UPDATE player SET B = ? WHERE Login = ? AND Veiculo = ?", b1, accName, nomecarro) dbExec(db, "UPDATE player SET Gas = ? WHERE Login = ? AND Veiculo = ?", gasolina, accName, nomecarro) dbExec(db, "UPDATE player SET Multas = ? WHERE Login = ? AND Veiculo = ?", multas, accName, nomecarro) destroyElement(carro) exports._infobox:addNotification(player, "Você guardou seu veiculo!", "success") end end end end addEvent("H3>GuardarVeiculo", true) addEventHandler("H3>GuardarVeiculo", root, guardarveiculo) addCommandHandler("dv", function(playerSource,commandName,id) if isObjectInACLGroup ( "user." ..getAccountName(getPlayerAccount(playerSource)), aclGetGroup ("Staff")) then if(id) then local playerID = tonumber(id) if(playerID) then local targetPlayer, targetPlayerName = getPlayerID(playerID) if targetPlayer then local veh = getPedOccupiedVehicle(targetPlayer) if veh then destroyElement(veh) end end end end end end ) ambos estão em pastas diferentes
  3. ta dando esse erro, eu não entendo nada de "string." então nem tenho ideia do que seja isso
  4. eu queria que a infobox aparecesse em cima do painel de login, como faço isso??
  5. o element data ja estava sendo setado como true ao criar o veiculo, obrigado
  6. pra adicionar um codigo ao seu post utilize a ferramenta "Code"
  7. porque nenhum dos dois esta funcionando? function destruirKombiMorte() local driver = getVehicleOccupant(vehicle) if driver and isElement(driver) and getElementType(driver) == "player" and getPedOccupiedVehicleSeat(driver) == 0 then if getElementData(vehicle, "kombiEntregas") == true then destroyElement(vehicle) end end end addEventHandler("onPlayerWasted", getRootElement(), destruirKombiMorte) function destruiKombiExit(player, seat) if seat == 0 then local vehicle = getPedOccupiedVehicle(player) if vehicle then if getElementData(vehicle, "kombiEntregas") == true then destroyElement(vehicle) end end end end addEventHandler("onVehicleExit", getRootElement(), destruiKombiExit)
  8. eu quero que quando o cursor estiver em cima do retangulo ele mude de cor, como faço isso?
  9. exepmplo: function ex(thePlayer) if getElementData(thePlayer, "ex") == true then outputChatBox("sim") else outputChatBox("nao") end end agora é o elseif? function ex(thePlayer) if getElementData(thePlayer, "ex") == true then outputChatBox("sim") elseif getElementData(thePlayer, "ex2") == true then outputChatBox("sim2") else --??? else outputChatBox("nao") end end
  10. eu tive uma longa conversa com o chat gpt desenvolvendo um set id sem erros gostaria que vocês apreciassem, podem fazer criticas e elogiar ela a vontade
  11. eu queria fazer um set id sem bugs, mas como eu verifico se existe alguma conta com certo id ? e como eu faria pra excluir uma conta e id com um comando?
  12. eu tava fazendo esse codigo é percebi que tentei colocar um else para um elseif oque não é possivel, existe alguma alternativa que daria o mesmo resultado sabe como um else em conjunto de um if? function SkinExclusiva(thePlayer, cmd, parametro) if (parametro == "24") then if getElementData(thePlayer, "24") == true then setElementModel(thePlayer, 24) exports._infobox:addNotification(thePlayer, "Você pegou sua skin exclusiva com sucesso!", "success") elseif (parametro == "27") then -- esse elseif tentei usar com o else abaixo if getElementData(thePlayer, "27") == true then setElementModel(thePlayer, 27) exports._infobox:addNotification(thePlayer, "Você pegou sua skin exclusiva com sucesso!", "success") end else -- esse else tentei usar no elseif acima exports._infobox:addNotification(thePlayer, "Você não tem acesso a essa skin exclusiva", "error") end end end addCommandHandler("skin", SkinExclusiva)
  13. eu não estou usando o onClientRender, em vez disso pode ser algum erro no envio a mensagem ao discord não? esse e o codigo completo: urlDiscord = "https://discord.com/api/webhooks/1078312698711908422/dcqfCNvzpoQr5GrwV2dJw9Sn3TEo9gNEJVs_gNxjTgqjP4xTujwUcvnZ6VP5IV0xkTge" function enviarMsg(message) sendOptions = { queueName = "dcq", connectionAttempts = 10, connectTimeout = 20000, formFields = { content="cs\n#"..message.."" }, } fetchRemote (urlDiscord, sendOptions, callback ) end function callback() end function displayResources() local resourceTable = getResources() iprint("Resources OK") for _, res in pairs(resourceTable) do iprint("Loop OK") local name = getResourceName(res) iprint("Nomes OK") enviarMsg("Resource ["..name.."]") iprint("Mensagem OK") end end addCommandHandler("rsc", displayResources) Obs: o Resource esta sim na acl admin para usar o fetchRemote
  14. uma pergunta off topic aqui perdão se for incomodo, mas esse modo development e permissão de desenvolvedor é alguma função que ajuda em modificar os mods ou é so pq você é moderador oficial mesm
  15. se eu transformar todo o painel em uma imagem unica, poderia resolver?
  16. pra isso eu teria que usar o "guiGetSreenSize"? em formato de "if then" e abrir os textos em baixo disso com outra fonte? como um exemplo na wiki: local x,y = guiGetScreenSize() if ( x <= 640 ) and ( y <= 480 ) then
  17. fiz assim: function displayResources() local resourceTable = getResources() iprint("Resources OK") for _, res in pairs(resourceTable) do iprint("Loop OK") local name = getResourceName(res) iprint("Nomes OK") enviarMsg("Resource ["..name.."]") iprint("Mensagem OK") end end addCommandHandler("rsc", displayResources) aparece todas, porém depois de uns 3 segundos aparece todas denovo menos a do "Resources OK" e aparece elas em "DUP x264"
  18. então para que isso não aconteça denovo eu teria que deixar tudo fixo ou apenas os textos?
  19. isso me faz feliz, perfeito, é por isso que todo mundo aqui te ama
  20. function enviarMsg(message) sendOptions = { queueName = "dcq", connectionAttempts = 10, connectTimeout = 20000, formFields = { content="cs\n#"..message.."" }, } fetchRemote (urlDiscord, sendOptions, callback ) end function callback() end function displayResources() local resourceTable = getResources() for _, res in pairs(resourceTable) do local name = getResourceName(res) enviarMsg("Resource ["..name.."]") end end addCommandHandler("rsc", displayResources) porque não ta funcionando ? sem erros no debug quando starto nem quando executo o comando porém sem respostas no webhook Obs: o link do webhook ta acima é ta certo, não coloquei pq não precisa
  21. ta dando esse erro aqui: nessa linha: for i,nome in ipairs (nomes) do if string.find(nome, " ") then nomes[i] = string.sub(v, 4)) -- aqui end print(nomes[i]) end
  22. eu queria saber como eu troco uma imagem que ta em html, eu não achei uma sessão para html, sinto muito...
  23. pra isso você teria que usar a mesma linha de racíocinio do seu chat function Policiais(thePlayer) for i,players in pairs(getElementsByType("player")) do -- loop que pega todos os elementos do tipo player local policiais = getElementData(players, "TrabalhoPolicia") -- filtra o loop para somente quem tem o elementdata if policiais == true then -- se o elementdata for igual a true então... outputChatBox("Existem "..tonumber(policiais).." Em Serviço", thePlayer, 255, 255, 255, true) -- mostra quantos existem para quem executou o comando end -- fecha o if end -- fecha o loop end -- fecha a função addCommandHandler("ptr", Policiais) -- seta o comando ptr na função pode dar algo de errado ja q n testei, n sei ao certo se vai funcionar
  24. de nada meu mano, se poder ta reagindo com um thanks pra ajudar, agradeço demais
×
×
  • Create New...