Search the Community

Showing results for tags 'script'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Multi Theft Auto: San Andreas 1.x
    • Support for MTA:SA 1.x
    • User Guides
    • Open Source Contributors
    • Suggestions
    • Ban appeals
  • General MTA
    • News
    • Media
    • Site/Forum/Discord/Mantis/Wiki related
    • MTA Chat
    • Other languages
  • MTA Community
    • Scripting
    • Maps
    • Resources
    • Other Creations & GTA modding
    • Competitive gameplay
    • Servers
  • Other
  • Archive
  • Private Bugtracker

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


About Me


Gang


Location


Occupation


Interests

Found 574 results

  1. client: local Admins = {} addEvent("updateAdmins",true) addEventHandler("updateAdmins",root, function(t) Admins = t end) function isPlayerAdmin(player) if(Admins[player]) then return true end return false end function asdi() for k,v in ipairs(Admins) do outputChatBox(k) end end addCommandHandler("asd",asdi) server: local Admins = {} function isPlayerAdmin(player) if(Admins[player]) then return true end return false end addEventHandler("onPlayerLogin",root, function() if isObjectInACLGroup ( "user." .. getAccountName ( getPlayerAccount ( source ) ), aclGetGroup ( "Admin" ))then if not(Admins[source])then Admins[source]= source triggerClientEvent("updateAdmins",source,Admins) end end end) addEventHandler("onPlayerQuit",root, function() if(Admins[source])then Admins[source]= nil triggerClientEvent("updateAdmins",source,Admins) end end) No errors, no warnings... What wrong?
  2. Olá, estou com um problema em meu servidor que quando o jogador desloga as armas dele some. Já troquei de save-system e nenhum funcionou alguém me ajuda?
  3. Olá, queria saber como eu troco o getPlayerFromPartialName para colocar por ID. Eu fiz comandos policiais por NICK e queria colocar por ID.
  4. local armas = {22,23,24,25,26,27,28,29,30,31,32,33,34,38} local skills = {"pro","std","poor"} function setNoRecoil(tipo) for _,id in ipairs(armas) do for _,skill in ipairs(skills) do if (tipo == "ativar") then setWeaponProperty ( id, skill, "accuracy", 10000 ) elseif (tipo == "desativar") then local original = getOriginalWeaponProperty ( id, skill, "accuracy" ) setWeaponProperty ( id, skill, "accuracy", original ) end end end end addEventHandler( "onResourceStart", resourceRoot, function() setNoRecoil("ativar") end ) addEventHandler( "onResourceStop", resourceRoot, function() setNoRecoil("desativar") end ) É um script de precisão de tiros, gostaria de restringir apenas para uma ACL. Alguém pode me ajudar, por favor ?
  5. Boa Tarde, COmo que eu faço para essa função do lado client so aparecer so Admin function Client() local ArenaXP = getElementData(getLocalPlayer(),"ArenaXPAdmin") for i, player in ipairs(getElementsByType("player")) do if ArenaXP == getElementData(player,"ArenaXPAdmin") then if player ~= getLocalPlayer() then end end end end function dxPlauerenter() addEventHandler("onClientRender",getRootElement(),Client) outputChatBox("OK!!!!!!!!!!!!", 0, 255, 0) end addEvent("dxPlauerenter",true) addEventHandler("dxPlauerenter",getRootElement(),dxPlauerenter) eu fiz isso do lado sever e ainda aparece para todos os jogadores function EnterPlace (hitElement) if getElementType ( hitElement ) == "player" then if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(hitElement)),aclGetGroup("Admin")) then outputChatBox("Admin OK",hitElement, 0, 255, 0) triggerClientEvent("dxPlauerenter",hitElement) end setElementData(theElement,"ArenaXPAdmin",true) end end se trata e uma Col ai to fazendo uma função para um projeto só que quero que apareça só para o admin quele do lado client que é um dx
  6. This is my code: local sp2 = getVehicleNitroLevel(car)*180 if sp2 ~= false and sp2 ~= nil and sp2 > 1 then dxDrawImage(x-w/1+36, y-h/1+260, 256, 256, "images/fuelindicator.png", sp2,0,0, 0xFFFFFFFF,true) dxDrawBorderedImage(x-180, y+45,245, 245, "images/fuelnum.png", 0,0,0, tocolor(colorR2, colorG2, colorB2,255)) dxDrawImage(x-105, y+110, 95, 95, "images/line.png", 0,0,0, tocolor(0,0,0,255)) dxDrawImage(x-105, y+110, 95, 95, "images/shadow.png", 0,0,0, tocolor(0,0,0,255)) end Working fine, but in debugscript flooding this error: the line 108 is the local sp2 = getVehicleNitroLevel(car)*180 how to fix this error?
  7. I can not make a DxText that displays the player's account name in screen My code (CLIENT SIDE) CHECK LINE 109 I wanted it to work this way: no one debugscript error example image
  8. Boa Tarde, Preciso de uma ajuda que nao consegui resolver, para alguns isso é bem simples mais não consegui por isso vim aqui perguntar. To com meu sistema de Base a onde é salvo tudo em XML (Senha de portão, Nome do grupo, etc...). e nele tinha um comando que vc dava que era /senha 1 (ex: /senha 1) o gate era o comando que tem no script e o "espaço" do teclado mais a senha que estava salva no XML, quero eliminar o /senha deixando so a senha que ta salva no XML (ex: /1). function toggleGate(player,cmd,pass) for i,gate in pairs(getElementsByType("object")) do if getElementData(gate,"BaseGate") then local baseName = getElementData(gate,"baseName") if isPlayerAllowed(player,gate) then if getElementData(gate,"pass") == pass then --- funções que abre o portão end end end end end addCommandHandler("senha",toggleGate) OBRIGADO.
  9. Atualmente estou fazendo um script de trabalho ilegal de metanfetamina, gostaria de uma explicação ou um exemplo de como posso fazer o player carregar um objeto na mão quando ele passar por um marker. E quando ele passar em um outro marker o objeto vai sumir da mão dele. Obrigado!
  10. Here is the "nemesis" script: function boss ( ) Nemesis = exports [ "slothBot" ]:spawnBot ( -1935.5480957031, 665.44055175781, 47.0, 90, 312, 0, 0, Nemesis, 0, "chasing", true ) exports.extra_health:setElementExtraHealth ( Nemesis, 2500 ) outputChatBox ("Nemesis!!!") myBlip = (createBlipAttachedTo ( Nemesis, 23 )) setElementData ( Nemesis, "nemesis", true ) end addEventHandler ( "onResourceStart", getResourceRootElement(getThisResource()), boss ) In which line and what should I add to make the slothbot (nemesis) have any weapon? Please help :|
  11. How can I learn the command to set all school portfolios, can anyone help me?
  12. for index, info in ipairs(blips) do dxSetRenderTarget(MiniMap["RenderTarget"], true) local bx = info.x local by = info.y local actualDist = getDistanceBetweenPoints2D(playerX, playerY, bx, by) local dist = actualDist/(worldMaxSize/((worldWidth+worldHeight)/2)) local rot = findRotation(bx, by, playerX, playerY)-camZ local blipX, blipY = getPointFromDistanceRotation( (MiniMap_x+MiniMap["width"]+MiniMap_x)/2, (MiniMap_y+MiniMap_y+MiniMap["height"])/2, math.min(dist, math.sqrt((MiniMap_y+MiniMap_y+MiniMap["height"])/2-MiniMap_y^2 + MiniMap_x+MiniMap["width"]-(MiniMap_x+MiniMap["width"]+MiniMap_x)/2^2)), rot ) local blipX = math.max(MiniMap_x, math.min(MiniMap_x+MiniMap["width"], blipX)) local blipY = math.max(MiniMap_y, math.min(MiniMap_y+MiniMap["height"], blipY)) local color = 255 dxDrawImage(blipX - blipSize/2, blipY - blipSize/2, blipSize, blipSize, "blips/".. info.blipID ..".png",0,0,0,tocolor(255,2555,255,255)) dxSetRenderTarget() end Why not working? No errors/warnings..
  13. I enabled in config file the voice chat, and started the script, but some players does not hear the voice chat. How to fix this?
  14. Boa tarde, precisava de uma ajuda para um script que estou montando é bem simples so que nao ta dando certo ai vim aqui pedir ajuda Quero pegar o Dano que o player recebe do Client e manda pro server uma mensagem, Exemplo o Jogador que atirou nele aparecer quantos de dano ele deu no jogador, ai mostra a vida do jogador + o dano que ele deu. Esse comando esta do Client no onClientPlayerDamage local damagens = (getElementData(getLocalPlayer(),"blood") - damage) setElementData(getLocalPlayer(),"blood",damagens) triggerServerEvent("damagersgDayZPlayer", getLocalPlayer(), attacker,damagens) Esse esta no server.lua ele da erro do damagens function damagersgDayZPlayer(killer,attacker, damagens) outputChatBox("Ok",killer) outputChatBox("[INFO] Voce deu Dano de: "..damagens,killer,255,0,0,true) end addEvent("damagersgDayZPlayer",true) addEventHandler("damagersgDayZPlayer",getRootElement(),damagersgDayZPlayer) se pode me ajuda a me mostrar a onde eu errei
  15. I want draw a dxdrawtext to a object, but how can i do it this?
  16. Hi guys! Im kindda new at scripting, I ask your help! I want to set a timer what counts somewhere on the screen and when its up then I'll be killed. I also want it to be restarted after respawning. Thank you for your help in advance! :(
  17. quero fazer um script do projétil ir cainda conforme a distência, de preferência a sniper, tem alguma função na wiki para eu conseguir realziar este script ?
  18. Boa noite precisava de uma ajuda que to em fretando em alguns scripts fica dando esse erro direto no meu servidor but event is not added client side nesta função Client addEvent( "Zomb_STFU", true ) addEventHandler( "Zomb_STFU", getRootElement(),function ( ped ) if (isElement(ped)) then setPedVoice(ped, "PED_TYPE_DISABLED") end end) Que vai pra essa linha no server zombiesaliveee = 0 -- Current Zombies alive function createZomieForPlayer (x,y,z) x,y,z = getElementPosition(source) counter = 0 if getElementData(source,"lastzombiespawnposition") then local xL,yL,zL = getElementData(source,"lastzombiespawnposition")[1] or false,getElementData(source,"lastzombiespawnposition")[2] or false,getElementData(source,"lastzombiespawnposition")[3] or false if xL then if getDistanceBetweenPoints3D (x,y,z,xL,yL,zL) < 20 then return end end end if getElementData(source, "spawnedzombies") + 3 <= gameplayVariables["playerzombies"] then -- If spawned zombies + 3 lower or equal to 9 -> Create zombies -> Increase digit (default: 9) to let more zombies spawn. WARNING: THE HIGHER THE VALUE, THE MORE LAG CAN OCCUR! for i = 1, gameplayVariables["amountzombies"] do --Amount of zombies to be spawned (default: 3) WARNING: THE HIGHER THE VALUE, THE MORE LAG CAN OCCUR! counter = counter+1 local number1 = math.random(-49,40) local number2 = math.random(-38,42) randomZskin = math.random ( 1, table.getn ( ZombiePedSkins ) ) local zombie = createPed ( tonumber( ZombiePedSkins[randomZskin] ),x+number1, y+number2,z, math.random(0, 360)) local Zx, Zy, Zz = getElementPosition( zombie ) setElementData(zombie,"zombie",true) setElementData(zombie,"bloodZumbie",gameplayVariables["zombieblood"]) -- [ID:0000009 - Zombie menace] //L setElementData(zombie,"owner",source) if not rot then rot = math.random (1,359) end if not interior then interior = 0 end if not dimension then dimension = 0 end setTimer ( setElementInterior, 100, 1, zombie, tonumber(interior)) --sets interior setTimer ( setElementDimension, 100, 1, zombie, tonumber(dimension)) --sets dimension setElementData ( zombie, "zombie", true ) setElementData ( zombie, "forcedtoexist", true ) setTimer ( function (zombie, rot) if ( isElement ( zombie ) ) then setPedRotation ( zombie, rot ) end end, 500, 1, zombie, rot ) setTimer ( function (zombie) if ( isElement ( zombie ) ) then setElementData ( zombie, "status", "idle" ) end end, 2000, 1, zombie ) setTimer ( function (zombie) if ( isElement ( zombie ) ) then setElementData ( zombie, "forcedtoexist", true ) end end, 1000, 1, zombie ) setTimer ( function (zombie) if ( isElement ( zombie ) ) then table.insert( everyZombie, zombie ) end end, 1000, 1, zombie ) triggerClientEvent ( "Zomb_STFU", getRootElement(), zombie ) ---- AQUI O AVISOOOOO end setElementData(source,"lastzombiespawnposition",{x,y,z}) setElementData(source,"spawnedzombies",getElementData(source,"spawnedzombies")+3) zombiesaliveee = zombiesaliveee + 3 end end addEvent("createZomieForPlayer",true) addEventHandler("createZomieForPlayer",getRootElement(),createZomieForPlayer)
  19. Preciso De Ajuda Com Meu Script De PORTE DE ARMAS ... eu adicionei ele pra digitar o comando no marker, mas quem não tem dinheiro também é adicionado a ACL "PorteDeArmas", preciso de ajuda pra deixar em somente quem possui o dinheiro! Script: porte = createMarker (1491.136, -1768.475, 17.796, "cylinder", 2, 255, 0, 0, 50) function infoporte(source) outputChatBox ("#000000[INFO] #bababaPorte De Arma Custa R$300.000, Deseja Comprar? #FF0000[/comprarporte]", source, 255, 255, 255,true) end addEventHandler ("onMarkerHit", porte, infoporte) function comprarporte(player) if isElementWithinMarker(player, porte) then if getPlayerMoney(player) >= 300000 then takePlayerMoney(player, 300000) outputChatBox("#000000[INFO] #FF0000Você Comprou o Porte De Armas!", player, 255, 255, 0, true) else outputChatBox("#000000[INFO] #FF0000Você Não Possui Dinheiro, Vá Trabalhar!", player, 255, 255, 0, true) end end end addCommandHandler ("comprarporte", comprarporte) function trport ( source ) if isElementWithinMarker (source, porte ) then aclGroupAddObject (aclGetGroup("PorteDeArmas"), "user."..getAccountName(getPlayerAccount(source))) ---- Acl outputChatBox ("#000000[ #ff0000Sistema #000000] #ffffff Agora Você #00ff00Possui #ffffffo #ffff00"..NomeTag,source,255,255,255,true) else outputChatBox ('#000000[ #ff0000Sistema #000000] #ffffff Voce Tem Que Estar na #ff0000Prefeitura Para Pegar o Porte',source,255,255,255,true) end end addCommandHandler ( "comprarporte", trport )
  20. Help with this error! [19-05-08 19:57:15] ERROR: dayzconnect/class.lua:6: bad argument #1 to 'format' (string expected, got boolean) local XML = xmlLoadFile('connect.xml') local SET = xmlNodeGetChildren(XML)[1] local GET = xmlNodeGetAttribute local name,host,user,pass = GET(SET,''),GET(SET,''),GET(SET,''),GET(SET,'') xmlUnloadFile(XML) local Connect = Connection('mysql',('dbname=%s;host=%s'):format(name,host),user,pass) if Connect then outputServerLog('Successfully connect to MySQL server!') local mysql = {} mysql.connect = Connect function mysql.query(query,...) local qhandle = Connect:query(query,...) local r1,r2,r3 = qhandle:poll(-1) if not r1 then outputServerLog(('Query failed: errCode: %d - errMsg: %s'):format(r2,r3)) return false end return r1,r2,r3 end function mysql.exec(query,...) return Connect:exec(query,...) end local admin = { 'B95DA274DD099F546BA0C174D4BE1FB3', '8F6BF86822B5B77D4C34DFA249A595B3', 'CF62F88A8428C6B60B4A44E9BB930EB3', '05B31534456419BB563E021D675171A1', '8954600385BB91CF6E860EDE1E8C8292', } function mysql.server() local query = mysql.query('SELECT * FROM `central` WHERE `name` = ?',getServerName()) if query then if query[1] then return query[1] else mysql.exec('INSERT INTO `central` (`name`,`admin`) VALUES (?,?)',getServerName(),toJSON(admin)) return mysql.server() end end end mysql.server = mysql.server() function MySQL() return mysql end else outputServerLog('Couldnt connect to MySQL server!') getThisResource():stop() end
  21. Olá eu tento fazer para que mostra o dinheiro do jogador (Isso eu já conseguir) e mostre se ele tem cnh mais essa parte de mostrar se ele tem cnh não conseguir me ajudem? Código: function revistar_jogador1 ( thePlayer, comando, nick ) if nick then if getPlayerFromPartialName ( nick ) then local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Policial" ) ) then -- Acl Pra Quem Pode Usar o Comando local player_a_ser_revistado = getPlayerFromPartialName ( nick ) local Hab1 = getElementData ( player_a_ser_revistado, "DNL:Categoria(A)" ) local dinheiro_do_jogador = getPlayerMoney ( playerMoney ) local nick_do_jogador = getPlayerName ( player_a_ser_revistado ) local nick_do_policial = getPlayerName ( thePlayer ) local estrelas_de_procurado = getPlayerWantedLevel ( player_a_ser_revistado ) local policiax, policiay, policiaz = getElementPosition ( thePlayer ) -- Encontrar posição do policial local revistadox, revistadoy, revistadoz = getElementPosition ( player_a_ser_revistado ) -- Encontrar posição de quem sera revistado local dist = getDistanceBetweenPoints3D ( policiax, policiay, policiaz, revistadox, revistadoy, revistadoz ) -- Calcular a distancia entre os dois elementos if ( dist > 5 ) then -- se a distancia for 5 executara a função a seguir outputChatBox("Chegue mais perto para executar o comando", thePlayer, 255, 255, 255, true) -- Chat Box elseif ( dist < 4 )then -- Caso ao contrario a distancia for 4 executara a função a seguir setPedAnimation( thePlayer, "POLICE", "plc_drgbst_01", 3100, true, false, false, false) --outputChatBox("#000000[#ff0000POLICIA#000000] #c1c1c1O #ff0000Policial #ffffff"..nick_do_policial.." #c1c1c1esta #ff0000Revistando #c1c1c1o #ff0000Suspeito "..nick_do_jogador.."", root, 255, 255, 255, true) -- Chat Box setTimer ( function() outputChatBox("#bebebeInformações do cidadão", thePlayer, 255, 255, 255, true) outputChatBox("#bebebeDinheiro: "..getElementData(player_a_ser_revistado,"playerMoney"), thePlayer, 255, 255, 255, true) outputChatBox("#bebebeTeste: "..getElementData(player_a_ser_revistado,"DNL:Categoria(A)"), thePlayer, 255, 255, 255, true) end, 3390, 1 ) triggerClientEvent(thePlayer, "doShowDXProgressBar", thePlayer) -- Chamar evento do client end else outputChatBox("Somente policiais podem usar esse comando!", thePlayer, 255, 255, 255, true) -- Se voce nao for da acl voce nao tera permissao a este comando end end end end addCommandHandler ( "vercnh", revistar_jogador1 )
  22. Galera,ja fiz alguns posts aqui,ja estou bem caminhado,hoje fui fazer um script pensando no que eu queria fazer que era UM MARKER ONDE QUANDO EU ENTRASSE NELE ELE ABRIA UM PAINEL SO QUEM PODERIA USAR ESSE PAINEL ERA POLICIAL SE SAISSE DO MARKER O PAINEL SUMIA OU O PAINEL NAO ABRIRIA POR COMANDO CASO NAO FOSSE COM PAINEL QUERIA FAZER UM COMANDO QUE SO PODERIA SER EXECUTADO NAQUELE MARKER QUERIA FAZER TIPO UM COMANDO DENTRO DE OUTRO,TIPO /PRENDER (NICK) (MOTIVO) (TEMPO) SO CONSIGO FAZER O /PRENDER (NICK) E O POLICIAL PUDESSE PRENDER PESSOAS SEM ESTRELA TBM ME AJUDEM POR FAVOR Discord: CarllosDrift7412
  23. Sziasztok! Először is elmondanám azt, hogy nem vagyok profi scripter, sőt, egészen kis mértékben értek ehhez a dologhoz, viszont szeretném megcsinálni ezt a scriptet, hogy tudjak belőle tanulni, viszont problémába ütköztem, és nem tudom, hogy mi miatt van. A script itt van: Szerver oldal, Kliens oldal. Hozzá kell tennem, hogy még egyáltalán nincsen kész, viszont ahhoz, hogy be tudjam fejezni, ezt a problémát is meg kéne oldanom valahogy. A probléma az volna, hogy amikor belesétálok a markerbe, akkor megkapom a buszt, majd elindulok, ha odaérek az első megállóba, és befejeződik a folyamat, akkor azt szeretném elérni, hogy egyből dobja be a következő megálló 'CP'-jét, viszont ez nem történik meg. Esetleg valaki tudja, hogy miért lehet ez? A választ előre is köszönöm. A munka alapja nem általam készült, hanem Worthless Cynomys által, így ez csak egy úgymond 'editelt' változat, melybe én nagyon kis részét raktam csak hozzá.
  24. -- Server-side addCommandHandler('vip',function() if getElementData(localPlayer,'isVIP') == 1 then triggerClientEvent(source,'PainelVIP',source) -- Para abrir o painel end end) addEventHandler("onPlayerQuit",getRootElement(),function() local account = getPlayerSerial(source) if account then setAccountData(account,'isVIP',getElementData(source,'isVIP')) -- Erro Aqui << end setElementData(source,"logedin",false) end) addEventHandler("onResourceStop",getRootElement(),function() for i,player in ipairs(getElementsByType("player")) do local account = getPlayerSerial(player) if account then setAccountData(account,'isVIP',getElementData(player,'isVIP')) -- Erro Aqui << end end end) -- Client-side addEvent('PainelVIP',true) addEventHandler('PainelVIP',root,function() if getElementData(localPlayer,"logedin") then if guiGetVisible(SistemaVIP) then guiSetVisible(SistemaVIP,false) showCursor(false) else guiSetVisible(SistemaVIP,true) showCursor(true) end end end) To tentando fazer essa função " if getElementData(localPlayer,'isVIP') == 1 then " salvar no serial do jogador problema que esta dando erro