Jump to content

0xCiBeR

Retired Staff
  • Posts

    1,671
  • Joined

  • Last visited

  • Days Won

    5

Everything posted by 0xCiBeR

  1. Bueno el problema esta cuando le indico q despues que spawnee, me agregue el jugador a un team especifico... PD:No da errores, solo no lo agrega function createTeamsOnStart () createTeam ( "RAAZ", 255, 255, 255 ) createTeam ( "PDz", 255, 0, 0 ) createTeam ( "CEA", 255, 255, 0 ) createTeam ( "Army", 0, 192, 0 ) createTeam ( "Police", 0, 0, 200 ) end addEventHandler ( "onResourceStart", getResourceRootElement(getThisResource()), createTeamsOnStart ) addEventHandler( "onPlayerLogin", resourceRoot, function() resetMapInfo() for _,player in ipairs( getElementsByType 'player' ) do spawn( player ) end end ) function spawn( player ) if not isElement( player ) then return end showChat( player, true ) local acc = getPlayerAccount( player ) if acc and not isGuestAccount( acc ) then if isObjectInACLGroup ( "user.".. getAccountName( acc ), aclGetGroup ( "RAAZ" ) ) then setPlayerTeam ( player, "RAAZ" ) spawnPlayer ( player, -2477.9606933594, 494.64392089844, 30.07054901123, 90, 287 ) elseif isObjectInACLGroup ( "user.".. getAccountName( acc ), aclGetGroup ( "PDz" ) ) then setPlayerTeam ( player, "PDz" ) spawnPlayer ( player, -2477.9606933594, 494.64392089844, 30.07054901123, 90, 287 ) elseif isObjectInACLGroup ( "user.".. getAccountName( acc ), aclGetGroup ( "CEA" ) ) then setPlayerTeam ( player, "CEA" ) spawnPlayer ( player, -2477.9606933594, 494.64392089844, 30.07054901123, 90, 287 ) elseif isObjectInACLGroup ( "user.".. getAccountName( acc ), aclGetGroup ( "USFU" ) ) then setPlayerTeam ( player, "CEA" ) spawnPlayer ( player, -2477.9606933594, 494.64392089844, 30.07054901123, 90, 287 ) end end fadeCamera( player, true ) setCameraTarget( player, player ) end addEventHandler( "onPlayerJoin", root, function( ) spawn( source ) end) addEventHandler( "onPlayerWasted", root, function( ) setTimer( spawn, 500, 1, source ) end)
  2. Your in the wrong forum my dear friend...Move to English Please!
  3. mmmm pues asi es completo : gRoot = getRootElement () gResRoot = getResourceRootElement ( getThisResource () ) addEventHandler ( "onResourceStart", gResRoot, function () cea1 = createObject( 10184, 3073.1000976563, -686.90002441406, 11.699999809265) setElementData ( cea1, "ceapos1", "ceaclosed1" ) end ) addCommandHandler ( "ceaentry", function (player) local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Admin" ) ) then if getElementData (cea1, "ceapos1") == "ceaclosed1" then moveObject( cea1, 5000, 3073.1000976563, -686.90002441406, 6.699999809265) setElementData ( cea1, "ceapos1", "ceaopen1" ) outputChatBox( "Entrada CEA : Abierta", player, 0, 0, 255, true ) else moveObject ( cea1, 5000, 3073.1000976563, -686.90002441406, 11.699999809265) setElementData ( cea1, "ceapos1", "ceaclosed1" ) outputChatBox( "Entrada CEA : Cerrada", player, 255, 0, 0, true ) else outputChatBox( "La entrada Aun Se mueve!Espere", player, 255, 0, 0, true ) end end ) cual sera el problema?
  4. ok pero como pongo eso en mi script, como va el THEN y eso...Me podes dar un ejemplo con el pedazo de script que te pase? seria asi? addCommandHandler ( "entry", function (player) local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Admin" ) ) then if getElementData (ent1, "posent1") == "closedent1" then moveObject( ent1, 5000, 1067.4000244141, 1364.3000488281, 7.300000190735) setElementData ( ent1, "posent1", "openent1" ) outputChatBox( "Entrada : Abierta", player, 0, 0, 255, true ) else moveObject ( ent1, 5000, 1067.4000244141, 1364.3000488281, 12.300000190735) setElementData ( ent1, "posent1", "closedent1" ) outputChatBox( "Entrada : Cerrada", player, 255, 0, 0, true ) end end end )
  5. addCommandHandler ( "entry", function (player) if getElementData (ent1, "posent1") == "closedent1" then moveObject( ent1, 5000, 1067.4000244141, 1364.3000488281, 7.300000190735) setElementData ( ent1, "posent1", "openent1" ) outputChatBox( "Entrada : Abierta", player, 0, 0, 255, true ) else moveObject ( ent1, 5000, 1067.4000244141, 1364.3000488281, 12.300000190735) setElementData ( ent1, "posent1", "closedent1" ) outputChatBox( "Entrada : Cerrada", player, 255, 0, 0, true ) end end ) que agrego si quiero que este restringido al acl "Admin" ?? Gracias
  6. can u explain me how to install it on my phpbb forum=? tnx
  7. Hi, does anyone have de Lua code plugin for PhP BB ?? Thanks
  8. La idea del script es el siguiente: Un admin crea carros..Estos carros se podran comprar..Una vez que alguien compre el carro, nadie debera poder entrar,El dueño podra estacionarlo donde quiera,El dueño podra venderlo cuando quiera. Entonces, el script de la comunidad guarda todo por nombre del jugador, lo cual no es conveninte ya que si te cambias el nick no sirve, entonces lo he pasado para que funcione con cuentas, pero no anda, ya que cuando compro el auto, salgo y quiero volver a entrar, me vuelve a saltar el gui de compra... aca el script completo: cars={} buycarpickup={} maxcars = 0 addEventHandler ( "onResourceStart", getResourceRootElement(), function () local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) if (houseroot) then for i,v in ipairs (xmlNodeGetChildren(houseroot)) do local carmodel = xmlNodeGetAttribute (v,"model") local x = xmlNodeGetAttribute (v,"x") local y = xmlNodeGetAttribute (v,"y") local z = xmlNodeGetAttribute (v,"z") local color1 = xmlNodeGetAttribute (v,"color1") local color2 = xmlNodeGetAttribute (v,"color2") local owner = xmlNodeGetAttribute (v,"owner") local price = xmlNodeGetAttribute (v,"price") local a = xmlNodeGetAttribute (v,"a") cars[i] = createVehicle ( tonumber(carmodel),tonumber(x),tonumber(y),tonumber(z), 0, 0, tonumber(a) ) setElementInterior ( cars[i], 0 ) setElementData (cars[i],"xpos",tonumber(x)) setElementData (cars[i],"ypos",tonumber(y)) setElementData (cars[i],"zpos",tonumber(z)) setElementData (cars[i],"angle",tonumber(a)) setElementData (cars[i],"owner",owner) setElementData (cars[i],"price",tonumber(price)) setElementData (cars[i], "num", i ) setVehicleColor ( cars[i], tonumber(color1), tonumber(color2), 0, 0 ) if getElementData ( cars[i], "owner" ) == "Nobody" then buycarpickup[i] = createPickup ( x, y, z, 3, 1274 ) attachElements ( buycarpickup[i], cars[i], 0, 0, 1.9 ) end maxcars = maxcars+1 end outputDebugString ("Tienda de Carros By CiBeR! Cargada") end end ) function saveCars () local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) if (houseroot) then for i,v in ipairs (xmlNodeGetChildren(houseroot)) do local color1, color2, color3, color4 = getVehicleColor ( cars[i] ) xmlNodeSetAttribute ( v, "model", getElementModel(cars[i]) ) xmlNodeSetAttribute ( v, "x", getElementData(cars[i], "xpos") ) xmlNodeSetAttribute ( v, "y", getElementData(cars[i], "ypos") ) xmlNodeSetAttribute ( v, "z", getElementData(cars[i], "zpos") ) xmlNodeSetAttribute ( v, "a", getElementData(cars[i], "angle") ) xmlNodeSetAttribute ( v, "color1", color1 ) xmlNodeSetAttribute ( v, "color2", color2 ) xmlNodeSetAttribute ( v, "owner", getElementData(cars[i], "owner") ) xmlNodeSetAttribute ( v, "price", getElementData(cars[i], "price") ) end xmlSaveFile(root) end end function adminCreateVehicle ( source, cmd ) local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Admin" ) ) then local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) local createdcar = xmlCreateChild ( houseroot, "vehicle" ) local carmodel = xmlNodeSetAttribute ( createdcar, "model", "451" ) local x, y, z = getElementPosition ( source ) local xa,ya,a = getElementRotation ( source ) xmlNodeSetAttribute ( createdcar, "x", x ) xmlNodeSetAttribute ( createdcar, "y", y ) xmlNodeSetAttribute ( createdcar, "z", z ) xmlNodeSetAttribute ( createdcar, "a", a ) xmlNodeSetAttribute ( createdcar, "color1", "0" ) xmlNodeSetAttribute ( createdcar, "color2", "0" ) xmlNodeSetAttribute ( createdcar, "owner", "Nobody" ) xmlNodeSetAttribute ( createdcar, "price", "0" ) cars[maxcars+1] = createVehicle ( 451,x,y,z,0,0,a ) setElementData (cars[maxcars+1],"xpos",x) setElementData (cars[maxcars+1],"ypos",y) setElementData (cars[maxcars+1],"zpos",z) setElementData (cars[maxcars+1],"angle", a) setElementData (cars[maxcars+1],"owner","Nobody") setElementData (cars[maxcars+1],"price",0) xmlSaveFile(root) maxcars = maxcars+1 else outputChatBox ("Error: No puedes usar este comando!",source, 255,255,127 ) end end addCommandHandler ("crearcarro", adminCreateVehicle) addCommandHandler ("guardarcarro", saveCars) function getCar ( car ) return cars[car] end function enterVehicle ( source, seat, jacked ) local playercar = getPedOccupiedVehicle ( source ) if(seat == 0) then if getElementData(source, "owner") and getElementData(source, "owner" ) ~= getAccountName(getPlayerAccount(source)) then outputChatBox ("El dueño del auto es: "..getElementData ( playercar, "owner" ).."",source, 255,255,127 ) else local price = getElementData ( playercar, "price" ) triggerClientEvent ( source, "showBuyCar", source, price) toggleAllControls ( source, false, true, false ) return true end end end addEventHandler ( "onVehicleStartEnter", getRootElement(), enterVehicle ) function AcceptToBuyCar ( ) local playercar = getPedOccupiedVehicle ( source ) if(getElementData ( playercar, "owner" ) == "Nobody") then if(getPlayerMoney ( source ) > tonumber(getElementData ( playercar, "price"))) then setElementData ( playercar, "owner", getAccountName(getPlayerAccount(player))) takePlayerMoney ( source, tonumber(getElementData ( playercar, "price" ))) toggleAllControls ( source, true ) outputChatBox ("Has comprado el auto", source, 243,149,72 ) destroyElement(buycarpickup[getElementData(playercar,"num")]) saveCars () else outputChatBox ("Error: No tienes sufucuente dinero", source, 243,149,72 ) setControlState ( source, "enter_exit", true ) end end end addEvent("acceptBuyCar",true) addEventHandler("acceptBuyCar",root,AcceptToBuyCar)
  9. Disculpa, el evento seria onVehicleStartEnter Es una tienda esto...
  10. ASi?: function enterVehicle ( source, seat, jacked ) local playercar = getPedOccupiedVehicle ( source ) if(seat == 0) then if getElementData(source, "owner") and getElementData(source, "owner" ) ~= getAccountName(getPlayerAccount(player)) then outputChatBox ("El dueño del auto es: "..getElementData ( playercar, "owner" ).."",source, 255,255,127 ) else outputChatBox ("Es tu auto") cancelEvent () end else local price = getElementData ( playercar, "price" ) triggerClientEvent ( source, "showBuyCar", source, price) toggleAllControls ( source, false, true, false ) return true end end end end
  11. Snake asi? cars={} buycarpickup={} maxcars = 0 addEventHandler ( "onResourceStart", getResourceRootElement(), function () local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) if (houseroot) then for i,v in ipairs (xmlNodeGetChildren(houseroot)) do local carmodel = xmlNodeGetAttribute (v,"model") local x = xmlNodeGetAttribute (v,"x") local y = xmlNodeGetAttribute (v,"y") local z = xmlNodeGetAttribute (v,"z") local color1 = xmlNodeGetAttribute (v,"color1") local color2 = xmlNodeGetAttribute (v,"color2") local owner = xmlNodeGetAttribute (v,"owner") local price = xmlNodeGetAttribute (v,"price") local lock = xmlNodeGetAttribute (v,"lock") local a = xmlNodeGetAttribute (v,"a") cars[i] = createVehicle ( tonumber(carmodel),tonumber(x),tonumber(y),tonumber(z), 0, 0, tonumber(a) ) setElementInterior ( cars[i], 0 ) setElementData (cars[i],"xpos",tonumber(x)) setElementData (cars[i],"ypos",tonumber(y)) setElementData (cars[i],"zpos",tonumber(z)) setElementData (cars[i],"angle",tonumber(a)) setElementData (cars[i],"owner",owner) setElementData (cars[i],"price",tonumber(price)) setElementData (cars[i],"lock",tonumber(lock)) setElementData (cars[i], "num", i ) setVehicleColor ( cars[i], tonumber(color1), tonumber(color2), 0, 0 ) if(lock == 1) then setVehicleLocked ( car, true ) end if getElementData ( cars[i], "owner" ) == "Nobody" then buycarpickup[i] = createPickup ( x, y, z, 3, 1274 ) attachElements ( buycarpickup[i], cars[i], 0, 0, 1.9 ) end maxcars = maxcars+1 end outputDebugString ("Cars loaded!") end end ) function saveCars () local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) if (houseroot) then for i,v in ipairs (xmlNodeGetChildren(houseroot)) do local color1, color2, color3, color4 = getVehicleColor ( cars[i] ) xmlNodeSetAttribute ( v, "model", getElementModel(cars[i]) ) xmlNodeSetAttribute ( v, "x", getElementData(cars[i], "xpos") ) xmlNodeSetAttribute ( v, "y", getElementData(cars[i], "ypos") ) xmlNodeSetAttribute ( v, "z", getElementData(cars[i], "zpos") ) xmlNodeSetAttribute ( v, "a", getElementData(cars[i], "angle") ) xmlNodeSetAttribute ( v, "color1", color1 ) xmlNodeSetAttribute ( v, "color2", color2 ) xmlNodeSetAttribute ( v, "owner", getElementData(cars[i], "owner") ) xmlNodeSetAttribute ( v, "price", getElementData(cars[i], "price") ) xmlNodeSetAttribute ( v, "lock", getElementData(cars[i], "lock") ) end xmlSaveFile(root) end end function adminCreateVehicle ( source, cmd ) local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Admin" ) ) then local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) local createdcar = xmlCreateChild ( houseroot, "vehicle" ) local carmodel = xmlNodeSetAttribute ( createdcar, "model", "451" ) local x, y, z = getElementPosition ( source ) local xa,ya,a = getElementRotation ( source ) xmlNodeSetAttribute ( createdcar, "x", x ) xmlNodeSetAttribute ( createdcar, "y", y ) xmlNodeSetAttribute ( createdcar, "z", z ) xmlNodeSetAttribute ( createdcar, "a", a ) xmlNodeSetAttribute ( createdcar, "color1", "0" ) xmlNodeSetAttribute ( createdcar, "color2", "0" ) xmlNodeSetAttribute ( createdcar, "owner", "Nobody" ) xmlNodeSetAttribute ( createdcar, "price", "0" ) xmlNodeSetAttribute ( createdcar, "lock", "0" ) cars[maxcars+1] = createVehicle ( 451,x,y,z,0,0,a ) setElementData (cars[maxcars+1],"xpos",x) setElementData (cars[maxcars+1],"ypos",y) setElementData (cars[maxcars+1],"zpos",z) setElementData (cars[maxcars+1],"angle", a) setElementData (cars[maxcars+1],"owner","Nobody") setElementData (cars[maxcars+1],"price",0) setElementData (cars[maxcars+1],"lock",0) xmlSaveFile(root) maxcars = maxcars+1 else outputChatBox ("Error: You can't use this command",source, 255,255,127 ) end end addCommandHandler ("acarcreate", adminCreateVehicle) addCommandHandler ("acarsave", saveCars) function getCar ( car ) return cars[car] end function enterVehicle ( source, seat, jacked ) local playercar = getPedOccupiedVehicle ( source ) if(seat == 0) then if getElementData(source, "owner") and getElementData(source, "owner" ) ~= getAccountName(getPlayerAccount(player)) then outputChatBox ("Este es tu carro Privado!" ) else outputChatBox ("El dueño del auto es: "..getElementData ( playercar, "owner" ).."",source, 255,255,127 ) end else local price = getElementData ( playercar, "price" ) triggerClientEvent ( source, "showBuyCar", source, price) toggleAllControls ( source, false, true, false ) return true end end end end addEventHandler ( "onVehicleEnter", getRootElement(), enterVehicle ) function AcceptToBuyCar ( ) local playercar = getPedOccupiedVehicle ( source ) if(getElementData ( playercar, "owner" ) == "Nobody") then if(getPlayerMoney ( source ) > tonumber(getElementData ( playercar, "price"))) then setElementData ( playercar, "owner", getAccountName(getPlayerAccount(player)) takePlayerMoney ( source, tonumber(getElementData ( playercar, "price" ))) toggleAllControls ( source, true ) outputChatBox ("You buy this car!", source, 243,149,72 ) destroyElement(buycarpickup[getElementData(playercar,"num")]) saveCars () else outputChatBox ("Error: You don't have enought money", source, 243,149,72 ) setControlState ( source, "enter_exit", true ) end end end addEvent("acceptBuyCar",true) addEventHandler("acceptBuyCar",root,AcceptToBuyCar) function playerCarLock ( source, cmd) for i,v in ipairs (cars) do if(getElementData ( cars[i], "owner" ) == getAccountName(getPlayerAccount(player)) then setVehicleLocked ( cars[i], true ) setElementData (cars[i],"lock", 1) outputChatBox ("You closed your car",source, 243,149,72 ) saveCars() end end end addCommandHandler ("lockmycar",playerCarLock) function playerCarUnLock ( source, cmd) for i,v in ipairs (cars) do if(getElementData ( cars[i], "owner" ) == getAccountName(getPlayerAccount(player)) then setVehicleLocked ( cars[i], false ) setElementData (cars[i],"lock", 0) outputChatBox ("You opened your car",source, 243,149,72 ) saveCars() end end end addCommandHandler ("unlockmycar",playerCarUnLock)
  12. Y donde saco lo de lock y unlock para que cuando el dueño salga no deje a nadie entrar, sin necesidad del /lockcar y el /unlockcar?
  13. Its not easy to Host servers, but since you want to host cheaply, i recomend a very stable game panel with auto, sync. Lookup in google opengamepanel. its the panel that Venezuela server uses an its stable. Install the agent on ur dedicate and the web-side on your apache htdocs. Good luck n dont steal scripts
  14. Men debes asignar el zombieProof al ColRectangle, no al Radar area... ._. Seria: local hillArea = createColRectangle ( -3298.0908203125, 357.818359375, 200, 210 ) local hillRadar = createRadarArea ( -3298.0908203125, 357.818359375, 400, 210, 0, 0, 0, 250 ) setElementData (hillArea, "zombieProof", true) Saludos
  15. esta mal asigando el element data. Los zombies haran spawn en tu radar
  16. Haber haber.... Tu script empieza mal, debes definir un evento: kills= { } function murio (ammo, attacker, weapon, bodypart) --Aca va toda tu funcion que sera trigeada desde el evento onPlayerWasted(solo la he hecho de ejemplo) if ( attacker ) then if ( getElementType ( attacker ) == "player" ) then setElementData --Aca le definis tu tabla+1 outputChatBox ("Has sumando 1 muerte!") end addEventHandler("onPlayerWasted", attacker, murio) PD:Tambien debes definir que la accion se hara sobre ti, ando medio dormido,
  17. Bueno pues he sacado este script de un resource de la comunidad llamado : Buycarsmod El problema con este script es lo siguiente: 1-Quiero que en vez de guardar el nick del jugador, se guarde la cuenta 2-Eliminar lo de /lockcar y /unlockcar aca el cars_main: cars={} buycarpickup={} maxcars = 0 addEventHandler ( "onResourceStart", getResourceRootElement(), function () local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) if (houseroot) then for i,v in ipairs (xmlNodeGetChildren(houseroot)) do local carmodel = xmlNodeGetAttribute (v,"model") local x = xmlNodeGetAttribute (v,"x") local y = xmlNodeGetAttribute (v,"y") local z = xmlNodeGetAttribute (v,"z") local color1 = xmlNodeGetAttribute (v,"color1") local color2 = xmlNodeGetAttribute (v,"color2") local owner = xmlNodeGetAttribute (v,"owner") local price = xmlNodeGetAttribute (v,"price") local lock = xmlNodeGetAttribute (v,"lock") local a = xmlNodeGetAttribute (v,"a") cars[i] = createVehicle ( tonumber(carmodel),tonumber(x),tonumber(y),tonumber(z), 0, 0, tonumber(a) ) setElementInterior ( cars[i], 0 ) setElementData (cars[i],"xpos",tonumber(x)) setElementData (cars[i],"ypos",tonumber(y)) setElementData (cars[i],"zpos",tonumber(z)) setElementData (cars[i],"angle",tonumber(a)) setElementData (cars[i],"owner",owner) setElementData (cars[i],"price",tonumber(price)) setElementData (cars[i],"lock",tonumber(lock)) setElementData (cars[i], "num", i ) setVehicleColor ( cars[i], tonumber(color1), tonumber(color2), 0, 0 ) if(lock == 1) then setVehicleLocked ( car, true ) end if getElementData ( cars[i], "owner" ) == "Nobody" then buycarpickup[i] = createPickup ( x, y, z, 3, 1274 ) attachElements ( buycarpickup[i], cars[i], 0, 0, 1.9 ) end maxcars = maxcars+1 end outputDebugString ("Cars loaded!") end end ) function saveCars () local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) if (houseroot) then for i,v in ipairs (xmlNodeGetChildren(houseroot)) do local color1, color2, color3, color4 = getVehicleColor ( cars[i] ) xmlNodeSetAttribute ( v, "model", getElementModel(cars[i]) ) xmlNodeSetAttribute ( v, "x", getElementData(cars[i], "xpos") ) xmlNodeSetAttribute ( v, "y", getElementData(cars[i], "ypos") ) xmlNodeSetAttribute ( v, "z", getElementData(cars[i], "zpos") ) xmlNodeSetAttribute ( v, "a", getElementData(cars[i], "angle") ) xmlNodeSetAttribute ( v, "color1", color1 ) xmlNodeSetAttribute ( v, "color2", color2 ) xmlNodeSetAttribute ( v, "owner", getElementData(cars[i], "owner") ) xmlNodeSetAttribute ( v, "price", getElementData(cars[i], "price") ) xmlNodeSetAttribute ( v, "lock", getElementData(cars[i], "lock") ) end xmlSaveFile(root) end end function adminCreateVehicle ( source, cmd ) local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Admin" ) ) then local root = xmlLoadFile ("cars.xml") local houseroot = xmlFindChild (root,"cars",0) local createdcar = xmlCreateChild ( houseroot, "vehicle" ) local carmodel = xmlNodeSetAttribute ( createdcar, "model", "451" ) local x, y, z = getElementPosition ( source ) local xa,ya,a = getElementRotation ( source ) xmlNodeSetAttribute ( createdcar, "x", x ) xmlNodeSetAttribute ( createdcar, "y", y ) xmlNodeSetAttribute ( createdcar, "z", z ) xmlNodeSetAttribute ( createdcar, "a", a ) xmlNodeSetAttribute ( createdcar, "color1", "0" ) xmlNodeSetAttribute ( createdcar, "color2", "0" ) xmlNodeSetAttribute ( createdcar, "owner", "Nobody" ) xmlNodeSetAttribute ( createdcar, "price", "0" ) xmlNodeSetAttribute ( createdcar, "lock", "0" ) cars[maxcars+1] = createVehicle ( 451,x,y,z,0,0,a ) setElementData (cars[maxcars+1],"xpos",x) setElementData (cars[maxcars+1],"ypos",y) setElementData (cars[maxcars+1],"zpos",z) setElementData (cars[maxcars+1],"angle", a) setElementData (cars[maxcars+1],"owner","Nobody") setElementData (cars[maxcars+1],"price",0) setElementData (cars[maxcars+1],"lock",0) xmlSaveFile(root) maxcars = maxcars+1 else outputChatBox ("Error: You can't use this command",source, 255,255,127 ) end end addCommandHandler ("acarcreate", adminCreateVehicle) addCommandHandler ("acarsave", saveCars) function getCar ( car ) return cars[car] end function enterVehicle ( source, seat, jacked ) local playercar = getPedOccupiedVehicle ( source ) if(seat == 0) then if getElementData(source, "owner") and getElementData(source, "owner" ) ~= getAccountName(getPlayerAccount(player)) then outputChatBox ("Este es tu carro Privado!" ) else outputChatBox ("El dueño del auto es: "..getElementData ( playercar, "owner" ).."",source, 255,255,127 ) end else local price = getElementData ( playercar, "price" ) triggerClientEvent ( source, "showBuyCar", source, price) toggleAllControls ( source, false, true, false ) return true end end end end addEventHandler ( "onVehicleEnter", getRootElement(), enterVehicle ) function AcceptToBuyCar ( ) local playercar = getPedOccupiedVehicle ( source ) if(getElementData ( playercar, "owner" ) == "Nobody") then if(getPlayerMoney ( source ) > tonumber(getElementData ( playercar, "price"))) then setElementData ( playercar, "owner", getPlayerName ( source )) takePlayerMoney ( source, tonumber(getElementData ( playercar, "price" ))) toggleAllControls ( source, true ) outputChatBox ("You buy this car!", source, 243,149,72 ) destroyElement(buycarpickup[getElementData(playercar,"num")]) saveCars () else outputChatBox ("Error: You don't have enought money", source, 243,149,72 ) setControlState ( source, "enter_exit", true ) end end end addEvent("acceptBuyCar",true) addEventHandler("acceptBuyCar",root,AcceptToBuyCar) function playerCarLock ( source, cmd) for i,v in ipairs (cars) do if(getElementData ( cars[i], "owner" ) == getPlayerName ( source )) then setVehicleLocked ( cars[i], true ) setElementData (cars[i],"lock", 1) outputChatBox ("You closed your car",source, 243,149,72 ) saveCars() end end end addCommandHandler ("lockmycar",playerCarLock) function playerCarUnLock ( source, cmd) for i,v in ipairs (cars) do if(getElementData ( cars[i], "owner" ) == getPlayerName ( source )) then setVehicleLocked ( cars[i], false ) setElementData (cars[i],"lock", 0) outputChatBox ("You opened your car",source, 243,149,72 ) saveCars() end end end addCommandHandler ("unlockmycar",playerCarUnLock) y el client side comands: function adminSetCarModel ( source, cmd, model ) if(model) then if((tonumber(model) > 399) and (tonumber(model) < 612))then local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Admin" ) ) then if(isPedInVehicle(source)) then local playercar = getPedOccupiedVehicle ( source ) setElementModel (playercar,tonumber(model)) saveCars() else outputChatBox ("Error: You isn't in car",source, 255,255,127 ) end else outputChatBox ("Error: You can't use this command",source, 255,255,127 ) end else outputChatBox ("Error: Model ID must be between 400 and 611",source, 255,255,127 ) end else outputChatBox ("Правильно: /acarmodel vehicle model",source, 255,255,127 ) end end addCommandHandler ("acarmodel", adminSetCarModel) function adminSetCarColor ( source, cmd, color1, color2 ) if(color2) then local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Admin" ) ) then if(isPedInVehicle(source)) then local playercar = getPedOccupiedVehicle ( source ) setVehicleColor (playercar,color1,color2,0,0) saveCars() else outputChatBox ("Error: You isn't in car",source, 255,255,127 ) end else outputChatBox ("Error: You can't use this command",source, 255,255,127 ) end else outputChatBox ("Correct: /acarcolor [color 1] color 2",source, 255,255,127 ) end end addCommandHandler ("acarcolor", adminSetCarColor) function adminSetCarPrice ( source, cmd, carprice ) if(carprice) then local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Admin" ) ) then if(isPedInVehicle(source)) then local playercar = getPedOccupiedVehicle ( source ) setElementData(playercar, "price", tonumber(carprice)) outputChatBox ("You set car "..tostring(playercar).." price $"..tostring(carprice).."",source, 243,149,72 ) saveCars() else outputChatBox ("Error: You isn't in car",source, 255,255,127 ) end else outputChatBox ("Error: You can't use this command",source, 255,255,127 ) end else outputChatBox ("Correct: /acarprice car price",source, 255,255,127 ) end end addCommandHandler ("acarprice", adminSetCarPrice) function adminSetCarPark ( source, cmd) local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Admin" ) ) then if(isPedInVehicle(source)) then local playercar = getPedOccupiedVehicle ( source ) local x, y, z = getElementPosition ( source ) local xa,ya,a = getElementRotation ( source ) setElementData (playercar,"xpos",x) setElementData (playercar,"ypos",y) setElementData (playercar,"zpos",z) setElementData (playercar,"angle",a) outputChatBox ("You set car "..tostring(playercar).." spawn point",source, 243,149,72 ) saveCars() else outputChatBox ("Error: You isn't in car",source, 255,255,127 ) end else outputChatBox ("Error: You can't use this command",source, 255,255,127 ) end end addCommandHandler ("acarpark", adminSetCarPark) function playerCarPark ( source, cmd) if(isPedInVehicle(source)) then local playercar = getPedOccupiedVehicle ( source ) if(getElementData ( playercar, "owner" ) == getPlayerName ( source )) then local x, y, z = getElementPosition ( source ) local xa,ya,a = getElementRotation ( playercar ) setElementData (playercar,"xpos",x) setElementData (playercar,"ypos",y) setElementData (playercar,"zpos",z) setElementData (playercar,"angle",a) outputChatBox ("You parked your car, don't forget to close it!",source, 243,149,72 ) saveCars() else outputChatBox ("Error: It is not your car!",source, 255,255,127 ) end else outputChatBox ("Error: You isn't in car",source, 255,255,127 ) end end addCommandHandler ("carpark",playerCarPark) function playerCarSell ( source, cmd) if(isPedInVehicle(source)) then local playercar = getPedOccupiedVehicle ( source ) if(getElementData ( playercar, "owner" ) == getPlayerName ( source )) then setElementData (playercar,"owner","Nobody") givePlayerMoney ( source, getElementData ( playercar, "price" )/100*50 ) outputChatBox ("You sold your car!",source, 243,149,72 ) saveCars() else outputChatBox ("Error: It is not your car!",source, 255,255,127 ) end else outputChatBox ("Error: You isn't in car",source, 255,255,127 ) end end addCommandHandler ("carsell",playerCarSell) como seria el script con lo que indique que necesitaba,xq lo he intentado pero falla Gracias
  18. Men usas un simple script o lo haces tu mismo para que cuando inicie se creen los teams... usarias: createTeam Si no entiendes me contactas por PM y te mando un script hecho de ejemplo
  19. 0xCiBeR

    KillMessages

    Bueno y pues me indican mas o menos en que linea debo meterlo, xq lo he intentado y no anda.
  20. 0xCiBeR

    KillMessages

    Hola que tal, quisiera saber si ya hay algun resource modificado del killmessages de la comunidad donde en vez de salir el nombre con el codigo de color, directamente salga el nombre con el color sin el #FFFFFF O que debo agregarle al killmessages!? Gracias
  21. 0xCiBeR

    Acensor

    si es que me he equivocado, proba asi: objeto = createObject ( 3095, -1099.6999511719, -1052.3000488281, 877.90002441406, 0, 0, 0 ) x,y,z = getElementPosition (objeto) Zona = createColCuboid ( -1102.9949951172, -1055.9497070313, 877.95538330078, 5.75, 6.75, 50 ) function funcion (hitElement) if getElementType( hitElement ) == "player" and getTeamName( getPlayerTeam( hitElement ) ) == "Clan" then moveObject ( objeto, 8000, -1099.69921875, -1052.3994140625, 931.79998779297 ) else outputChatBox ( "No Heres Del Clan Largate", hitElement, 0, 255, 0 ) end end addEventHandler ( "onColShapeHit", Zona, funcion ) function funcion2 (hitElement) if getElementType( hitElement ) == "player" and getTeamName( getPlayerTeam( hitElement ) ) == "Clan" then moveObject ( objeto, 8000, -1099.6999511719, -1052.3000488281, 877.90002441406, 0, 0, 0 ) end end addEventHandler ( "onColShapeLeave", Zona, funcion2 )
  22. 0xCiBeR

    Acensor

    Proba asi objeto = createObject ( 3095, -1099.6999511719, -1052.3000488281, 877.90002441406, 0, 0, 0 ) x,y,z = getElementPosition (objeto) Zona = createColCuboid ( -1102.9949951172, -1055.9497070313, 877.95538330078, 5.75, 6.75, 50 ) function funcion (hitElement) if getElementType( hitElement ) == "player" and getTeamName( getPlayerTeam( hitElement ) ) == "Clan" then moveObject ( objeto, 8000, -1099.69921875, -1052.3994140625, 931.79998779297 ) else outputChatBox ( "No Heres Del Clan Largate", hitElement, 0, 255, 0 ) end end end addEventHandler ( "onColShapeHit", Zona, funcion ) function funcion2 (hitElement) if getElementType( hitElement ) == "player" and getTeamName( getPlayerTeam( hitElement ) ) == "Clan" then moveObject ( objeto, 8000, -1099.6999511719, -1052.3000488281, 877.90002441406, 0, 0, 0 ) end end end addEventHandler ( "onColShapeLeave", Zona, funcion2 ) PD: Heres es ERES con E no H
  23. Jo*** perdon es que se me olvido de meterme a un team Gracias igual
  24. Mmm no entiendo como aplicas eso al script que te pase, ocea para que la parte de [PUBLIC] y la de [RADIO] aparezca en el color que corresponde al Color del Team.Agradeceria que me lo demostraras
×
×
  • Create New...