Jump to content

DropDead41

Members
  • Posts

    32
  • Joined

  • Last visited

Everything posted by DropDead41

  1. function disableSounds() setAmbientSoundEnabled( "gunfire", true ) end addEventHandler("onClientResourceStart",root,disableSounds) local function playGunfireSound() local muzzleX, muzzleY, muzzleZ = getPedWeaponMuzzlePosition(source) local px, py, pz = getElementPosition ( source ) local weapon = getElementData(localPlayer,"currentweapon_1") if not weapon then return end weapon = tostring ( weapon ) if weapon == "AS50" then -- outputChatBox ( weapon ) local sound = playSound3D("soundweapons/as50.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "DMR" then local sound = playSound3D("soundweapons/dmr.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "M24(Desert)" then local sound = playSound3D("soundweapons/m24.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "M107" then local sound = playSound3D("soundweapons/m107.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "CZ550" then local sound = playSound3D("soundweapons/cz550.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "Mosin 9130" then local sound = playSound3D("soundweapons/mosin.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "SVD DRAGUNOV CAMO" then local sound = playSound3D("soundweapons/svd.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "KVSK" then local sound = playSound3D("soundweapons/as50.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "MK 48 Mod 0" then local sound = playSound3D("soundweapons/mk48.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "MG36" then local sound = playSound3D("soundweapons/mg36.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "PKP" then local sound = playSound3D("soundweapons/pkp.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "AK-107" then local sound = playSound3D("soundweapons/ak107.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "AKS-74U" then local sound = playSound3D("soundweapons/aks74u.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "AKS Gold" then local sound = playSound3D("soundweapons/aksgold.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "SA-58V ACOG" then local sound = playSound3D("soundweapons/sa58v.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "M4A1 Holo" then local sound = playSound3D("soundweapons/m4a1.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "SKS-45" then local sound = playSound3D("soundweapons/sks45.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "Makarov PM" then local sound = playSound3D("soundweapons/makarovpm.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "G18" then local sound = playSound3D("soundweapons/g18.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "Revolver" then local sound = playSound3D("soundweapons/revolver.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "USP.45 SD" then local sound = playSound3D("soundweapons/usp45.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weapon == "Winchester 1866" then local sound = playSound3D("soundweapons/winchester.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) end end addEventHandler("onClientPlayerWeaponFire", root, playGunfireSound) Este script funciona perfecto, pero quiero saber como llamo a que identifique la id de un objeto.. nose si me explico.. va un ejemplo: if weapon == "AS50" and objeto == 1870 then -- outputChatBox ( weapon ) local sound = playSound3D("soundweapons/as50.wav", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) (objeto) es la id de un objeto del server al que le asigno un arma.. espero que me hallan entendido.. gracias de antemano por la ayuda
  2. does not work, you do not see the error seems to be all right.
  3. No, me da el mismo resultado que el anterior, me cambia el arma unicamente en la espalda y no ponermela en la mano para disparar
  4. Exactamente eso es lo quiero hacer, pero no funciona ese script.. sera que me puede guiar?
  5. Ok no hay problema, de todos modos no funciona, vere si mañana con tiempo le sigo dedicando tiempo a ese script.. la verdad que serviria mucho para aportar
  6. No puedo hacerlo funcionar, que necesito aparte de lo que esta subido?
  7. Nope, sigue igual, me remplaza el arma cuando la tengo colgada en la espalda, pero no me deja ponermela en la mano y disparar, podriamos arreglar una hora y mostrartelo para que lo veas si quieres.
  8. Tiene que funcionar de la misma manera que cuando remplazas las pieles de los vehiculos, o de los players, todos ven ese remplazo.. no veo donde falla, no soy capas de encontrarle el error
  9. Hola, estoy buscando la forma de poder remplazar las pieles de las distintas armas de una misma ID con estas lineas que recoji de un foro, pero solo me cambia el arma en la espalda y no cuando la llevo en las manos function remplace() txd1 = engineLoadTXD ("armas/ak47.txd"); dff1 = engineLoadDFF ("armas/ak47.dff", 0); txd2 = engineLoadTXD ("armas/m4.txd"); dff2 = engineLoadDFF ("armas/m4.dff", 0); end addEventHandler("onClientResourceStart",root,remplace) function skinsduplicados() local armas1 = getElementData(localPlayer,"currentweapon_1") if armas1 == "M4A1" then engineImportTXD (txd1, 356); engineReplaceModel (dff1, 356); elseif armas1 == "M16A4 ACOG" then engineImportTXD (txd2, 356); engineReplaceModel (dff2, 356); -- elseif armas1 == "M4" then -- engineRestoreModel(356) -- else -- engineRestoreModel(356) end end addEventHandler("onClientPlayerWeaponSwitch",localPlayer,skinsduplicados) Espero que alguien me pueda dar una mano, desde ya muchisimas gracias.
  10. muchas gracias por la respuesta, lo que quiero es que vez de que el usuario escriba por el chat local "/dm" para teletransportarse a los mapas DM, que ejecute ese comando presionando el botón sin necesidad de escribirlo, por ejemplo: Al presionar el botón "DM" que se ejecute el comando como si el usuario lo estuviese escribiendo
  11. Gracias, funciono! Y respecto a mi otra duda como puedo hacer?
  12. DropDead41

    AYUDAAAA

    Hola, hice este script pero no funciona, no se que esta mal, alguno sabria arreglarlo ya que al presionar F3 no se muestra el panel- Ademas, alguno podria demostrarme como hacer para que al precionar por ejemplo el boton DM se ejecute un comando como si el usuario escribiese /dm ? Cree este panel para que los usuarios al presionar un boton se dirijan a los mapas de cada clase.. SCRIPT addEventHandler("onClientResourceStart", resourceRoot, function() Panel = guiCreateWindow(371, 193, 612, 552, "", false) guiWindowSetSizable(Panel, false) GUIEditor.button[DM] = guiCreateButton(27, 94, 139, 65, "DM", false, Panel) GUIEditor.button[DD] = guiCreateButton(244, 94, 139, 65, "DD", false, Panel) GUIEditor.button[CS] = guiCreateButton(448, 94, 139, 65, "CS", false, Panel) GUIEditor.label[1] = guiCreateLabel(166, 16, 310, 56, "GAMEMODES", false, Panel) guiSetFont(GUIEditor.label[1], "sa-header") guiLabelSetColor(GUIEditor.label[1], 14, 2, 251) Lobby = guiCreateButton(127, 474, 358, 55, "LOBBY", false, Panel) GUIEditor.button[1] = guiCreateButton(27, 217, 139, 65, "RACE", false, Panel) GUIEditor.button[2] = guiCreateButton(244, 217, 139, 65, "BASE", false, Panel) GUIEditor.button[3] = guiCreateButton(448, 217, 139, 65, "BOMB", false, Panel) GUIEditor.button[4] = guiCreateButton(27, 336, 139, 65, "CTF", false, Panel) GUIEditor.button[5] = guiCreateButton(244, 336, 139, 65, "RACE", false, Panel) GUIEditor.button[6] = guiCreateButton(448, 336, 139, 65, "RACE", false, Panel) end ) function onresourceStart () bindKey ("F3", "down", showPanel) end addEventHandler("onClientResourceStart", getResourceRootElement(getThisResource()), onresourceStart) function showPanel () getVisible = guiGetVisible (Panel) playerName = getPlayerName ( getLocalPlayer() ) if (getVisible == true) then guiSetVisible (Panel, false) showCursor (false) end
  13. Que tal. Tengo un servidor dayz y mediante este script (shader blanco y negro) me gustaria hacer que se active el shader cuando el jugador tenga 3000 de blood o menos. Como podria hacer? local screenX, screenY = guiGetScreenSize() local screenSource = dxCreateScreenSource(screenX, screenY) addEventHandler("onClientResourceStart", getResourceRootElement(getThisResource()), function() if getVersion ().sortable < "1.1.0" then outputChatBox("Resource is not compatible with this client.") return else blackWhiteShader, blackWhiteTec = dxCreateShader("fx/blackwhite.fx") if (not blackWhiteShader) then outputChatBox("Could not create shader. Please use debugscript 3.") else outputChatBox("shader " .. blackWhiteTec .. " was started.") end end end) addEventHandler("onClientPreRender", getRootElement(), function() if (blackWhiteShader) then dxUpdateScreenSource(screenSource) dxSetShaderValue(blackWhiteShader, "screenSource", screenSource) dxDrawImage(0, 0, screenX, screenY, blackWhiteShader) end end)
  14. can u send me the full script ready to use it?
  15. I have a problem with the vehicles respawn in my server of dayz, being exploited they respawn to the original position without the gear to be able to store things, or put the elements needed to make the car work .. I'm using this script, that works fine, but the gear disappears .. someone could re-send me the script with this bug fixed? function respawnVehicle( vehicle ) spawnVehicle ( vehicle, getElementData( vehicle, "posX" ), getElementData( vehicle, "posY" ), getElementData( vehicle, "posZ" ), getElementData( vehicle, "rotX" ), getElementData( vehicle, "rotY" ), getElementData( vehicle, "rotZ" ) ) end function onVehicleSpawn () local x,y,z = getElementPosition (source) setElementData (source,"posX",x) setElementData (source,"posY",y) setElementData (source,"posZ",z) end addEventHandler ("onVehicleExplode",getRootElement(),onVehicleSpawn) function onVehicleExplode () setTimer( respawnVehicle, 50000, 1, source ) end addEventHandler("onVehicleExplode", getRootElement(), onVehicleExplode) DropDead41 New User Posts: 12 Joined: Tue Mar 05, 2013 12:14 am Gang: Groove Top
  16. Tengo un problema con el respawn de vehiculos en mi server de dayz, al ser explotados respawnean a la posicion original pero sin el gear para poder guardar cosas, o ponerle los elementos que hace falta para que el vehiculo funcione.. estoy usando este script que funciona perfecto, pero se buguea el gear.. alguien podria reenviarme el script con ese bug solucionado? function respawnVehicle( vehicle ) spawnVehicle ( vehicle, getElementData( vehicle, "posX" ), getElementData( vehicle, "posY" ), getElementData( vehicle, "posZ" ), getElementData( vehicle, "rotX" ), getElementData( vehicle, "rotY" ), getElementData( vehicle, "rotZ" ) ) end function onVehicleSpawn () local x,y,z = getElementPosition (source) setElementData (source,"posX",x) setElementData (source,"posY",y) setElementData (source,"posZ",z) end addEventHandler ("onVehicleExplode",getRootElement(),onVehicleSpawn) function onVehicleExplode () setTimer( respawnVehicle, 50000, 1, source ) end addEventHandler("onVehicleExplode", getRootElement(), onVehicleExplode)
  17. Hola gente, recientemente me he encontrado con el problema que al cavo de unos dias todos o casi la mayoria de los vehiculos desaparecen del mapa. Lo que me lleva a reistalar la internal.db para que vuelvan a aparecer pero se pierden todas las cuentas de los usuarios... Alguien sabe a que se debe este bug? como solucionarlo? Se que habia un comando para respawnear todos los vehiculos del mapa pero sinceramente no me lo acuerdo T.T Agradezco sus respuestas
  18. ah y una ultima pregunta.. como hago para que el recurso de superman solo lo puedan utilizar los admins? ya lo agregue al acl en el grupo Admin pero lo puede usar cualquiera... por lo visto esa no es la manera
  19. me explicarias mas detalladamente como hago el scrip que me dejaste? ya que mucho no entiendo. gracias
  20. Estoy aqui de nuevo planteando otra duda.. Intento, (no digo estoy porque aun no lo logre) hostear el servidor desde mi casa El problema es el siguiente, tengo router un tp-link wifi y modem motorola. Ya llame a mi isp para que me otorgaran una ip publica.. CUANDO CONECTO EL MODEM DIRECTO AL EQUIPO y utilizo ni mas ni menos que mi ip PUBLICA el servidor aparecio en la pestaña internet con la ip xxx.x.xxx.47 y los jugadores encuentran el servidor y entran lo mas bien ahora.. CUANDO CONECTO EL SERVER CON EL ROUTER (cambiando la ip en mtaserver.conf por 192.168.1.100 que es la que mi router otorga ya que introduciendo la publica no me abre el server) mi servidor solo aparece en LAN y me cambia la ip publica a xxx.x.xxx.89 peeeeero si yo dentro del juego introduzco xxx.x.xxx.89 puedo entrar al servidor perfectamente La cuestion de todo esto? Que el servidor no sale en la pestaña "Internet" y por lo tanto la gente no ve que el servidor esta on y no entra nadie... Solucion? Experiencias? PD: El router si o si lo tengo que tener conectado ya mi familia usa wifi... Gracias por sus respuestas
×
×
  • Create New...