Jump to content

Big Smoker

Members
  • Posts

    318
  • Joined

  • Last visited

Everything posted by Big Smoker

  1. Boa noite, Quero saber qual função pode ser usado para fazer usar a internal. Quero fazer um site de login e senha, na onde posso fazer banimento, setar itens pelo site. Ate mesmo usar para ativar VIPS no servidor direto no site. sabe qual função posso usar?
  2. certo, vou testar com essa função. O problema é que quando a conexão do jogador volta, ele recebe tudo aquilo que nao fez quando estava sem conexão. ex: Transfiro 20 moedas para um jogador, se eu puxar o cabo nao vai. Mais assim que a conexão volta ele transfere aquilo que ele fez enquanto estava sem conexão
  3. Bom dia, Preciso de uma ajuda, eu uso uma função em modo client para quando o player puxa o cabo o PACKT LOSS nao deixa ele transferir, porem mesmo assim os jogadores estão conseguindo burlar. Alguem sabe me dizer como eu posso corrigir? Qual função eu devo usar? Função: if getNetworkStats()["packetlossLastSecond"] > 1 then -- Client elseif source == EnviarButon then local itemName = guiGridListGetItemText(TranssWin,guiGridListGetSelectedItem(TranssWin),1) local row_ = guiGridListGetSelectedItem(TranssWin) local grilistSex = guiGridListGetItemData(TranssWin, row_, players2) local getMoneyToSend = guiGetText(PlayerTavb) if itemName ~= "" and getMoneyToSend ~= "" and grilistSex ~= "" then if getNetworkStats()["packetlossLastSecond"] > 1 then startRollMessage2("Inventory", "Conexão Ruim!",255,22,0) return else triggerServerEvent("MWEnviarMWC",getLocalPlayer(),itemName,grilistSex,getMoneyToSend) end guiSetVisible(TransferirWin,false) end end
  4. Boa Tarde, Queria saber se tem como bloquear IPS de outros paises no meu servidor. Deixando o servidor online, apenas para os paises que eu autorizar. OBRIGADO DESDE JÁ
  5. boa tarde, queria saber como faço para adicionar 2 botao para executar uma função Ex: alt + c = abre um painel
  6. consegui fazer um sistema que detecta quando o jogador esta com ping alto e o pack loss alto tambem, e nessa função coloco a função que faz desbugar o jogador. Que no meu caso era um sistema de grudar no veiculo Muito obrigado pela dica, vou testa-la
  7. boa tarde, Gostaria de saber se existe algum sistema que identifica quando o jogador nao esta dentro no MTA, pois os jogadores consegue bugar no servidor quando minimiza o MTA e volta, mais ja usei o onClientMinimize, porem quando o jogador usa em modo janela, ele consegue fica hora do MTA e assim conseguindo usar o xlag ou ate mesmo fazendo algum bug para fazer com que o MTA apareça "O programa não responde". Queria saber se existe alguma função que identifica quando o jogador nao esta usando o MTA.
  8. Boa Tarde, Gostaria de saber qual função eu uso para o player perder vida quando esta pegando fogo em si mesmo. Pois to fazendo um bot que faz ele usa a arma com ID 37 (lança chamas), mais quando acerta no player, nao conta dano. E gostaria de saber como faço para contar dano.
  9. agora deu certo, obrigado pela ajuda
  10. esta dando esse erro attempt to call global 'setPedAimTarget' (a nil value) addEvent( "botsStartAttack", true ) addEventHandler( "botsStartAttack", getRootElement(), function (zomb,numberBot) if isElement ( zomb ) and not getElementData ( zomb, "target" ) then if getElementData ( zomb, "zHeared" ) then setElementData ( zomb, "zHeared", false ) end setElementSyncer ( zomb, source ) setPedAnimation ( zomb ) if not isHLCEnabled ( zomb ) then enableHLCForNPC( zomb, getElementData ( zomb,"speed") or "sprint") end clearNPCTasks (zomb) addNPCTask ( zomb, {"killPed", source, 6, 6} ) setElementData ( zomb, "target", source ) local x,y,z = getElementPosition(zomb) setPedAimTarget ( zomb, x,y,z ) setElementAlpha ( zomb, 255 ) end end)
  11. Boa noite, Estou fazendo um sistema de bot que atira na direção do player, esta funcionando tudo certo. Mais ele esta atirando muito para cima, na mesma direção mas, só que para cima, vou enviar uma print mostrando. Qual função posso usar para abaixar o tiro do ped https://ibb.co/s3BMdDX
  12. BOA TARDE, estou em fretando um problema com sistemas de mira. Quando eu aplicado a mira que eu quero ela funciona, porem quero deixar a mira padrão que tem no SERVIDOR / GTA:SA que pode ser modificada pelo GTA. bindKey ( "aim_weapon", "both", function() if not getElementData(getLocalPlayer(),"logedin") then return end Crosshair_table = {} if (getElementData(getLocalPlayer(),"fanbox") or 0 == 0) then default = dxCreateTexture("tools/shaders/miras/"..(getElementData(getLocalPlayer(),"fanbox"))..".png") Crosshair_table = dxCreateShader("tools/shaders/fx/texreplace.fx") engineApplyShaderToWorldTexture(Crosshair_table, "siteM16") dxSetShaderValue(Crosshair_table, "gTexture", default) end end) ------------------------------------------- -- FUNÇÃO QUE APLICA A MIRA SELECIONADA listMiras = guiGridListAddColumn(grilistMiras, "MIRAS:", 0.8) ImgButtums = guiCreateStaticImage(410, 100, 100, 100, "tools/shaders/miras/false2.png", false,tabMiras1) ImgButtums2 = guiCreateStaticImage(410, 100, 100, 100, "tools/shaders/miras/0.png", false,tabMiras1) buttonSystemMiras = guiCreateButton(400, 230, 120, 20, "APLICAR", false,tabMiras1) buttonSystemMirasPadrao = guiCreateButton(400, 260, 120, 20, "Crosshair Padrão", false,tabMiras1) addEventHandler("onClientGUIClick",getRootElement(),function() if source == grilistMiras then local selectsight = guiGridListGetItemText(grilistMiras,guiGridListGetSelectedItem(grilistMiras),1) for _, data in ipairs(tableSight) do if data[1] == selectsight then guiStaticImageLoadImage(ImgButtums2, data[2]) break end end elseif source == buttonSystemMirasPadrao then setElementData(getLocalPlayer(),"sight",nil) setElementData(getLocalPlayer(),"fanbox",0) if isElement(Crosshair_table) then engineRemoveShaderFromWorldTexture(Crosshair_table, "siteM16") destroyElement( Crosshair_table ) Crosshair_table = nil end elseif source == buttonSystemMiras then local selectsight = guiGridListGetItemText(grilistMiras,guiGridListGetSelectedItem(grilistMiras),1) for _, data in ipairs(tableSight) do if data[1] == selectsight then setElementData(getLocalPlayer(),"sight",data[2]) setElementData(getLocalPlayer(),"fanbox",data[3]) break end end end end end)
  13. Positivo, eu fiz isso muito obrigado pela dica. Deu trabalho para fazer mais deu certo OBRIGADO
  14. Pessoal, preciso de uma ajuda com sistema que eu tenho no XML. Eu ja usei .db e o XML se comportou melhor, Quero saber como faço para optimizar essa função, pois sempre que alguem entra no servidor ele da um lag (pois ele vai buscar o serial no XML de cada conta). Quero saber o que posso usar para ele setar essas função so quando jogador tiver cadastrado no XML e nao acha esse LAG quando recarrega no XML addEventHandler("onPlayerLogin",getRootElement(),function(thePreviousAccount,theCurrentAccount) local xml = xmlLoadFile("Bases.xml") for i,groupp in pairs(xmlNodeGetChildren(xml)) do for i,member in ipairs(xmlNodeGetChildren(xmlFindChild(groupp,"AllowedPlayers",0)))do if xmlNodeGetAttribute(member,"Account") == getAccountName(getPlayerAccount(source)) then local NameBase = tostring(xmlNodeGetAttribute(groupp,"NomeBase")) local Account = tostring(xmlNodeGetAttribute(member,"Account")) local Rank = tostring(xmlNodeGetAttribute(member,"Rank")) local Joined = tostring(xmlNodeGetAttribute(member,"Joined")) setElementData(source,"BaseGroupName_"..NameBase,NameBase) setElementData(source,"BaseGroupAccount_"..NameBase,Account) setElementData(source,"BaseGroupRank_"..NameBase,Rank) setElementData(source,"BaseGroupJoined_"..NameBase,Joined) end end end xmlUnloadFile(xml) end)
  15. bom dia, Estava vendo que no forum saiu um sistema como faz para criar um bot e com esse bot aparecer as logs do servidor (quem saiu, quem entrou, chat global e etc..) mais queria saber se tem alguma função que faz chamar um jogador diretamente no chat global ?
  16. Boa noite, Como eu faço para ocultar um item em uma grilist? qual elemento devo usar?
  17. Bom dia, Pessoal to a 2 dias tentando fazer um sistema que verifica quais coordenada que nao esta salva no XML so que nao ta dando certo. O que eu quero que ele verifique as coordenada, esteja igual no XML e os que nao ta no XML ele completa, tipo tenho 114 carros no mapa so que na tabela eu tenho 144 quero que ele complete esses 30 carros que falta no mapa. OBS: ------------------------------------------------------------- --- TABELA x,y,z = data[2],data[3],data[4] ------------------------------------------------------------- --- NO XML spawnX,spawnY,spawnZ = tonumber(xmlNodeGetAttribute(node,"spawnX")),tonumber(xmlNodeGetAttribute(node,"spawnY")),tonumber(xmlNodeGetAttribute(node,"spawnZ")) addCommandHandler("recu", function (ps,cmd) if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(ps)),aclGetGroup("Admin")) then spawnDayZVehicles2() outputChatBox("Vehicles has been spawned!",ps,255,0,0,true) end end) function spawnDayZVehicles2() xml = xmlLoadFile("Backups/Vehicles/XVehicles.xml") for i,data in ipairs(vehSpawns["vehicleSpawns"]) do count = 0 IDVehicles = tonumber(data[2]) for i,node in ipairs(xmlNodeGetChildren(xml)) do spawnX = tonumber(xmlNodeGetAttribute(node,"spawnX")) count = count + 1 if IDVehicles then if spawnX == IDVehicles then outputChatBox("1 - Adicionado carro sem spwan! [#FF0000"..count.."#FFFFFF]",getRootElement(),255,255,255,true) -- else -- count = count + 1 -- outputChatBox("2 - Adicionado carro sem spwan! [#FF0000"..count.."#FFFFFF]",getRootElement(),255,255,255,true) end end end return end xmlUnloadFile(xml) end
  18. Boa noite, To enfrentando problema quando faço banimento em jogador que abusa de bugs e cheat no servidor. Quando faço banimento nele, o jogador troca de HD e consegue entrar novamente no servidor como se nada tive-se acontecido. POR FAVOR ME AJUDE.
  19. boa noite, to com problema no meu servidor quer fica dando esses erro aqui [2020-10-09 20:08:23] DIAGNOSTIC: BruXo #1002 HTTP server file mismatch (admin) colorpicker.lua [Got size:0 MD5:00000000000000000000000000000000, wanted MD5:7B7A2139805DD71AC3092EB6EA5D84DF] [2020-10-09 20:08:23] DIAGNOSTIC: BruXo #1002 HTTP server file mismatch (acpanel) c_gui_ac.lua [Got size:0 MD5:00000000000000000000000000000000, wanted MD5:6B60DD785231F1461F61E29002C23494] [2020-10-09 20:08:31] DIAGNOSTIC: BruXo #1013 HTTP server file mismatch (MW-World) BDSADAS.txd [Got size:0 MD5:00000000000000000000000000000000, wanted MD5:41B03042ACB4488085ADB1B72EF4D4E8] [2020-10-09 20:08:31] DIAGNOSTIC: BruXo #1013 HTTP server file mismatch (MW-World) BDSADAS.dff [Got size:0 MD5:00000000000000000000000000000000, wanted MD5:B731EB750832F2F2E619851E1849F572] [2020-10-09 20:08:31] DIAGNOSTIC: BruXo #1013 HTTP server file mismatch (MW-World) BSAESAD.txd [Got size:0 MD5:00000000000000000000000000000000, wanted MD5:CBE9840C41B12CA307BEB7EC00A32FD7] [2020-10-09 20:08:31] DIAGNOSTIC: BruXo #1013 HTTP server file mismatch (MW-World) BSAESAD.dff [Got size:0 MD5:00000000000000000000000000000000, wanted MD5:F540A2CAA6C6E4312EBDB6F235CF6789]
  20. negativo ele vai pegar o nome BaseGroupName_ depois desse vem o nome da base, ja consegui aqui dessa forma eu tava errando pq coloquei a tabela era so colocar o nome da base que tem no XML
  21. nao vai da certo fazer dessa maneira eu fiz esse aqui usei um for i, vs in ipairs ( totalData) do end ai coloquei uma tabela com nome de cada col ai ele puxa de acordo com a conta cadastrada em cada col, so que nao deu certo. Sabe a onde eu errei? totalData = { "BaseSVSF1", "BaseCT1LS1", "BaseCT2SF1", } addEventHandler("onPlayerLogin",getRootElement(),function(thePreviousAccount,theCurrentAccount) local xml = xmlLoadFile("Bases.xml") for i,groupp in pairs(xmlNodeGetChildren(xml)) do for i,member in ipairs(xmlNodeGetChildren(xmlFindChild(groupp,"AllowedPlayers",0)))do for i, vs in ipairs ( totalData) do if xmlNodeGetAttribute(member,"Account") == getAccountName(getPlayerAccount(source)) then local NameBase = tostring(xmlNodeGetAttribute(groupp,"NomeBase")) local Account = tostring(xmlNodeGetAttribute(member,"Account")) local Rank = tostring(xmlNodeGetAttribute(member,"Rank")) local Joined = tostring(xmlNodeGetAttribute(member,"Joined")) setElementData(source,"BaseGroupName_"..vs,xmlNodeGetAttribute(groupp,"NomeBase")) setElementData(source,"BaseGroupAccount_"..vs,Account) setElementData(source,"BaseGroupRank_"..vs,Rank) setElementData(source,"BaseGroupJoined_"..vs,Joined) outputChatBox("BASE: "..xmlNodeGetAttribute(groupp,"NomeBase").." / "..getElementData(source,"BaseGroupName_"..vs),source) end end end end xmlUnloadFile(xml) end)
  22. boa noite, Pessoal preciso de um auxilo como eu faço para que o setElementData, salve + de 1 um elento dentro dele ou qual funçãod evo usar para que eu possa usar. Fiz um sistema na qual ele seta um sistema de permissao dentro de uma ColShope, so que cada colShope tem um nome diferente que é salva no XML com a conta do player. Quando jogador faz o loga no servidor ele seta o nome de cada base em um setElement data qual a base ele tem acesso. O Script so esta setando para 1 colShope. addEventHandler("onPlayerLogin",getRootElement(),function(thePreviousAccount,theCurrentAccount) local xml = xmlLoadFile("Bases.xml") for i,groupp in pairs(xmlNodeGetChildren(xml)) do for i,member in ipairs(xmlNodeGetChildren(xmlFindChild(groupp,"AllowedPlayers",0)))do if xmlNodeGetAttribute(member,"Account") == getAccountName(getPlayerAccount(source)) then setElementData(source,"BaseGroupBaseName",xmlNodeGetAttribute(groupp,"NomeBase")) setElementData(source,"BaseGroupAccount",xmlNodeGetAttribute(member,"Account")) setElementData(source,"BaseGroupRank",xmlNodeGetAttribute(member,"Rank")) setElementData(source,"BaseGroupJoined",xmlNodeGetAttribute(member,"Joined")) end end end xmlUnloadFile(xml) end) OBRIGADO
  23. Bom dia, estou com dificuldade na minha grilist eu coloco pra escrever o nome do jogador no guiGetText so que ele nao aparece na grilist mais quando eu apago ela funciona a função de quando apaga o texto funciona, mais a que procura o nome do jogador nao. function editAddPlayer() guiGridListClear(BGUIGridlist3) local text = guiGetText ( source ) if ( text == "" ) then guiGridListClear ( BGUIGridlist3 ) for id,player in ipairs(getElementsByType("player")) do local NamePlayer = getPlayerName(player):gsub('#%x%x%x%x%x%x',''):gsub('#%x%x%x%x%x%x','') local row = guiGridListAddRow ( BGUIGridlist3 ) guiGridListSetItemText ( BGUIGridlist3, row, BavailablePlayesColumn,NamePlayer, false, false ) guiGridListSetItemText ( BGUIGridlist3, row, BavailablePlayesColumn2,getElementData(player,"BaseAccountName"), false, false ) outputChatBox("1") end else guiGridListClear ( BGUIGridlist3 ) for id,player in ipairs(getElementsByType("player")) do local NamePlayer = getPlayerName(player):gsub('#%x%x%x%x%x%x',''):gsub('#%x%x%x%x%x%x','') if ( string.find ( string.upper ( tostring(NamePlayer) ), string.upper ( text ), 1, true ) ) then local row = guiGridListAddRow ( BGUIGridlist3 ) guiGridListSetItemText ( BGUIGridlist3, row, BavailablePlayesColumn,NamePlayer, false, false ) guiGridListSetItemText ( BGUIGridlist3, row, BavailablePlayesColumn2,getElementData(player,"BaseAccountName"), false, false ) end end guiGridListClear(BGUIGridlist3) end end
  24. nao tem como pois se nao tenho que lhe passar a resource toda, por causa do XML que salva e seta nele. Unico problema que enfrento é que quando deleta o jogador a grilist nao deleta ela
×
×
  • Create New...