Jump to content

TigreBlanco

Members
  • Posts

    59
  • Joined

  • Last visited

Everything posted by TigreBlanco

  1. Mis Conocimientos de Mapper: Medio Mis Conocimientos de Scripter: Neutro Las Bases y los Mapas de Cmd/DeathMatch Etc Me Salen Bien Los Scripts Basicos me Salen Muy Bien Los Avanzados Regular Espero que me Contraten Llevo 7 Años Jugando a Mta, Espero Respuesta
  2. Hola, Perdonen si no es Sitio en Donde Debo Publicar el Tema, pero Estoy Buscando Servidores los Cuales Necesitan Scripters o Mappers Baratos, para que me Contraten, ya Tengo Bastante Experiancia con Esto, Le Hice 1 Script por 3 $ Via Paypal a un Amigo, pero Necesito Plata para Abrirme un Servidor de Minecraft (Esto a Nadie le Importara ), el Caso es que Si Alguien Necesita Trabajador Estoy Disponible, Mapper Mejor que Scripter Cobro Siempre Via Paypal, y Tambien Vendo Algunos Resources Aparte, Si Quieren mas Info Respondan al tema, o Envienme un MP, Gracias por Pasaros
  3. una ultima pregunta, como lo puedo hacer en otros scripts por ejemplo water level, que tengo que poner aparte de las comillas comas etc, se que tiene algo que ver con isobjectaclgroup, ya que en el caso de water level, para permitir grupos se encuentra en meta.xml
  4. Gracias a Todos, Asi que Es Asi, Poniendo Comillas mas Coma, Ya creo que Intente Hacerlo Hace Tiempo, Despues lo Intento otra Vez Cuando me Heche un Ciesta
  5. Si lo Tengo, no me Entendistes , lo que Quiero es agregar mas Grupos de ACL, no Solo Admin, Quiero Agregar Tambien Mod, SuperMod, VIP, y Fundador
  6. Hola Muy Buenas a Todos , Tengo un Pequeño Problema con las Restrinciones/Permisos de Scripts para que lo Usen la Gente que no Sea Solo Admin, que Sea Tambien Moderador/Supermod/VIP/Yo Etc. Me Explico: Necesito que Unos Resources Fabricados por Mi no Queden Restringidos Para Todos los Grupos de ACL, es Decir, que los Puedan Usar Los Vips, Moderadores, Etc, Pero que no Los Puedan Usar la otra Gente del Server, como los Guest. Un Ejemplo de Resource No Fabricado por Mi (Water_Level): Water_Gui.lua: localPlayer = getLocalPlayer() allow_negative = "false" x,y = guiGetScreenSize() WaterWin = {} function isNumeric(a) return type(tonumber(a)) == "number" end WaterWin = guiCreateWindow(x/2 - 127,y/2 - 70,254,140,"Nivel de Agua",false) EditCurrLevel = guiCreateEdit(105,35,136,23,"",false,WaterWin) guiEditSetReadOnly(EditCurrLevel,true) EditObjLevel = guiCreateEdit(105,67,135,22,"",false,WaterWin) LblCurrentLevel = guiCreateLabel(10,38,87,22,"Nivel de Ahora",false,WaterWin) LblObjectiveLevel = guiCreateLabel(10,72,85,14,"Nivel Objetivo",false,WaterWin) guiLabelSetColor(LblObjectiveLevel,255,0,0) BtnCancel = guiCreateButton(171,111,69,20,"Cancelar",false,WaterWin) BtnOk = guiCreateButton(95,111,69,20,"Poner",false,WaterWin) guiSetVisible ( WaterWin, false ) function showWindow(level, neg, highlevel) guiSetText(EditCurrLevel, level) allow_negative = neg if (highlevel ~= nil) then if (isNumeric(highlevel)) then guiSetText(EditObjLevel, highlevel) changeWaterLevel() else showCursor(true) guiSetVisible(WaterWin, true) end else showCursor(true) guiSetVisible(WaterWin, true) end end addEvent("onShowWindow", true) addEventHandler("onShowWindow", getRootElement(), showWindow) function onClickBtn ( button, state ) if (button == "left" and state == "up") then if (source == BtnCancel) then --if he clicked Cancel showCursor(false) guiSetVisible ( WaterWin, false ) elseif (source == BtnOk) then --if he clicked Ok changeWaterLevel() end end end addEventHandler("onClientGUIClick", BtnOk, onClickBtn, false) addEventHandler("onClientGUIClick", BtnCancel, onClickBtn, false) function changeWaterLevel() if isNumeric(guiGetText(EditObjLevel)) then if ((allow_negative) == "false" and (tonumber(guiGetText(EditObjLevel)) < 0)) then guiEditSetCaretIndex ( EditObjLevel, 0 ) else triggerServerEvent( "onWaterLevel", localPlayer, localPlayer, guiGetText(EditObjLevel) ) showCursor(false) guiSetVisible ( WaterWin, false ) end else guiEditSetCaretIndex ( EditObjLevel, 0 ) end return true end bindKey("8", "6", changeWaterLevel) Water_level.lua: level = 0 highlevel = 0 floodWater1 = 0 function setAllWatersLevel(level) setWaterLevel(level) if isElement(floodWater1) then if (getElementType(floodWater1) == "water") then if (level > 0.2) then setWaterLevel(floodWater1, level) else setWaterLevel(floodWater1, -500) end end end end function checkLevel(glevel) local allow_negative = get("allow_negative") if ((allow_negative == "false") and (tonumber(glevel) < 0)) then return false end return true end function setFloodWeather() local flood_weather = get("flood_weather") if (flood_weather ~= "") then setWeather(tonumber(flood_weather)) end end function setFloodEndWeather() local flood_end_weather = get("flood_end_weather") if (flood_end_weather ~= "") then setWeather(tonumber(flood_end_weather)) end end function waterLevel ( source, glevel ) if ( checkLevel(glevel) == true ) then highlevel = tonumber ( glevel ) if (highlevel == nil) then highlevel = 0 end if (highlevel ~= level) then if ( isTimer(waterTimer)) then killTimer(waterTimer) end --water is going up if (highlevel > level) then setFloodWeather() waterTimer = setTimer ( addSomeWater, 100, 0, highlevel ) if (get("show_messages") == "true") then if (highlevel > -0.2) then outputChatBox ( "Alerta: Se Acerca un Tsunami a San Andreas, Nivel de "..tostring(highlevel).." metros", getRootElement(), 255, 0, 0 ) else outputChatBox ( "Informacion: El Nivel de Agua Esta Bajando a "..tostring(highlevel).." metros", getRootElement(), 0, 255, 0 ) end end else --water is going down setFloodEndWeather() waterTimer = setTimer ( removeSomeWater, 100, 0, highlevel ) if (get("show_messages") == "true") then if (highlevel > -0.2) then outputChatBox ( "Informacion: El Nivel de Agua Esta Bajando a "..tostring(highlevel).." metros", getRootElement(), 0, 255, 0 ) else outputChatBox ( "Alerta: Se Acerca un Tsunami a San Andreas, Nivel de "..tostring(highlevel).." metros", getRootElement(), 255, 0, 0 ) end end end outputDebugString ( "Nivel de Agua Cambiado Por " .. getPlayerName ( source ) .. " to a level " .. highlevel .. ".", 3 ) end end end addEvent( "onWaterLevel", true ) addEventHandler( "onWaterLevel", getRootElement(), waterLevel ) function showClientGui(source, command, highlevel) local neg = get("allow_negative") if (get("restrict_to") ~= "") then if ( isObjectInACLGroup ( "user." .. getAccountName ( getPlayerAccount ( source )), aclGetGroup ( get("restrict_to") ) ) ) then triggerClientEvent( source, "onShowWindow", getRootElement(), level, neg, highlevel) end else triggerClientEvent( source, "onShowWindow", getRootElement(), level, neg, highlevel) end end addCommandHandler("agua", showClientGui) function addSomeWater ( highlevel ) local thelevel = level local speed = tonumber(get("speed")) level = thelevel + tonumber(speed) setAllWatersLevel(level) if (level >= highlevel) then level = highlevel if ( isTimer(waterTimer)) then killTimer(waterTimer) end setFloodEndWeather() end end function removeSomeWater ( highlevel ) local thelevel = level local speed = tonumber(get("speed")) level = thelevel - speed setAllWatersLevel(level) if (level <= highlevel) then level = highlevel if ( isTimer(waterTimer)) then killTimer(waterTimer) end end end function initialize() setWaterLevel(0) floodWater1 = createWater ( -2998, -2998, -500, 2998, -2998, -500, -2998, 2998, -500, 2998, 2998, -500) end addEventHandler ( "onResourceStart", getResourceRootElement(getThisResource()), initialize) function destroy() if ( isTimer(waterTimer)) then killTimer(waterTimer) end setWaterLevel(floodWater1, -500) setWaterLevel(0) setFloodEndWeather() end addEventHandler ( "onResourceStop", getRootElement(), destroy) function onPlayerJoin() setAllWatersLevel(level) end addEventHandler( "onPlayerJoin", getRootElement(), onPlayerJoin ) Meta.xml (Aqui es Donde Estan las Restrinciones): <meta> <info author="Dr4x" version="1.1.5" name="water_level" decription="Progressive Change of the Water Level" type="script" /> <script src="water_gui.lua" type="client" /> <script src="water_level.lua" type="server" /> <settings> <setting name="*show_messages" value="true" /> <setting name="*speed" value="0.01" /> <setting name="*allow_negative" value="true" /> <setting name="*restrict_to" value="Admin, Moderator, SuperModerator, VIP, Fundador" /> ---Las Restrinciones en mi Caso Aqui es Donde me Equivoco, no Quiero que lo Usen los Guests <setting name="*flood_weather" value="8" /> <setting name="*flood_end_weather" value="14" /> </settings> </meta> Un Ejemplo de Resource Fabricado por Mi: Atencion.lua: function sayMessage(source, command, ...) theText = {...} text = table.concat(theText, " ") playerAcc = getPlayerAccount(source) if isObjectInACLGroup("user."..getAccountName(playerAcc), aclGetGroup("Admin", Moderator, SuperModerator, Fundador, VIP")) then ---Aqui es Donde me Vuelvo a Equivocar if theText then if not (text == "") then outputChatBox("-> #FF0000Atencion: #FF4444"..text, getRootElement(), 0,153,255, true) else outputChatBox("-> #FF4444Escribe el mensaje",source, 0,153,255,true) end end end end addCommandHandler("atencion", sayMessage) Espero que me Ayuden Visiten mi Server si Quieren, es un Freeroam Buenisimo: Juramento Freeroam, Nuestro Blog por si Acaso: http://www.mtajuraserver.blogspot.com Foro: http://www.mtajuraserver.foroactivo.com
  7. Muchas Gracias SolidSnake, Ahora lo Pruebo, no Necesito ni Probarlo Porque Estoy 100% Seguro que Funciona , Yo Soy solo Nada Mas que Un Scripter/Mapper, Pero tu Eres mi Idolo Tio , de Verdad que Gracias
  8. Ok Disculpa Castillo , Esque me Emociono Cuando me Habla un Famoso, Orita lo Posteo. Lo Traduci al Español en Menos de 3 Min Muy Facil. gp-c.lua: -- * Reeditado Por TigreBlanco, Hecho por $ora GppWindow = guiCreateWindow(0.1900,0.3400,0.6400,0.4500,"Panel para Dar Permisos por TigreBlanco",true) guiSetVisible(GppWindow,false) guiWindowSetSizable(GppWindow,false) Gpedit = guiCreateEdit(251,54,203,33,"",false,GppWindow) GiveModeratorButton = guiCreateButton(250,91,215,40,"Dar Permisos de Moderador",false,GppWindow) GiveSuperModeratorButton = guiCreateButton(250,143,215,40,"Dar Permisos de SuperModerador",false,GppWindow) GiveAdminsButton = guiCreateButton(251,194,210,40,"Dar Permisos de Admin",false,GppWindow) label = guiCreateLabel(252,31,154,17,"Jugador :",false,GppWindow) CloseButton = guiCreateButton(445,25,18,16,"X",false,GppWindow) removebutton = guiCreateButton(369,26,65,21,"eliminar",false,GppWindow) -------------------------- ---Lista Grid ------------------------- addEventHandler("onClientResourceStart",resourceRoot, function() grid = guiCreateGridList(9,25,228,214,false,GppWindow) guiGridListSetSelectionMode(grid,2) local column = guiGridListAddColumn( grid, "Nombre del Jugador", 0.89 ) if ( column ) then for id, player in ipairs(getElementsByType("player")) do local row = guiGridListAddRow ( grid ) guiGridListSetItemText ( grid, row, column, getPlayerName(player), false, false ) guiGridListSetItemColor ( grid, row, column, 0, 250, 154, 255 ) end addEventHandler ( "onClientGUIClick", grid, click ) end end) function click () local playerName = guiGridListGetItemText ( grid, guiGridListGetSelectedItem ( grid ), 1 ) guiSetText ( Gpedit, playerName ) end ---------------------------- --Abrir Panel con Comando -------------------------- function showPanel () guiSetVisible (GppWindow, true) showCursor (true) playSound("open.mp3",false) end addEvent( "showPanel", true ) addEventHandler ( "showPanel", getRootElement(), showPanel) ------------------------ --Event para Bind Key ------------------------ function show() if guiGetVisible(GppWindow) == true then guiSetVisible(GppWindow,false) showCursor(false) else guiSetVisible(GppWindow,true) showCursor(true) end end addEvent("show",true) addEventHandler("show",root,show) --------------------- --Cuando le Das Clic -------------------- function onGuiClick (button, state, absoluteX, absoluteY) if (source == CloseButton) then guiSetVisible (GppWindow, false) showCursor (false) elseif (source == removebutton) then local name = guiGetText ( Gpedit ) local target = getPlayerFromName(name) triggerServerEvent ("remove", getLocalPlayer(), target) elseif (source == GiveModeratorButton) then local name = guiGetText ( Gpedit ) local target = getPlayerFromName(name) triggerServerEvent("Moderator", getLocalPlayer(), target) playSound("sec.wav",false) elseif (source == GiveSuperModeratorButton) then local name = guiGetText ( Gpedit ) local target = getPlayerFromName(name) triggerServerEvent("SuperModerator", getLocalPlayer(), target) playSound("sec.wav",false) elseif (source == GiveAdminsButton) then local name = guiGetText ( Gpedit ) local target = getPlayerFromName(name) triggerServerEvent("Admin", getLocalPlayer(), target) playSound("sec.wav",false) end end addEventHandler ("onClientGUIClick", getRootElement(), onGuiClick) ----------------------- --Obtener Permisos --------------------- function GetPermission() triggerServerEvent ("OpenPanel", getLocalPlayer(), OpenPanel) end ---------------------- --Sonidos --------------------- function nopsound () playSound("np.mp3",false) end addEvent( "nopsound", true ) addEventHandler ( "nopsound", getRootElement(), nopsound) function removedsound () playSound("removed.wav",false) end addEvent( "removedsound", true ) addEventHandler ( "removedsound", getRootElement(), removedsound) -------------------- --Refrescar la Lista de Jugadores -------------------- function list() guiGridListClear(grid) for id, players in ipairs (getElementsByType("player")) do local row = guiGridListAddRow(grid) guiGridListSetItemText(grid, row, 1, getPlayerName(players), false, false) guiGridListSetItemColor ( grid, row, 1, 0, 250, 154, 255 ) end end addEventHandler("onClientPlayerJoin", getRootElement(), list) addEventHandler("onClientPlayerQuit", getRootElement(), list) addEventHandler("onClientPlayerChangeNick", getRootElement(), list) -- * Reeditado por TigreBlanco, Hecho por $ora gp-s.lua: -- * Editado por TigreBlanco, Hecho por $ora local rootElement = getRootElement() addEventHandler("onPlayerJoin",root, function () bindKey(source,"i","down",show) end) addEventHandler("onResourceStart",resourceRoot, function () for index, player in ipairs(getElementsByType("player")) do bindKey(player,"i","down",show) end end) function show(thePlayer) if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(thePlayer)),aclGetGroup("Console")) then triggerClientEvent(thePlayer,"showPanel",thePlayer) else outputChatBox ("* No Tienes los Suficientes Permisos para Este Comando", thePlayer, 255, 0, 0, true) triggerClientEvent ( thePlayer,"nopsound", thePlayer ) end end ------------------------ --Dar Adm, Mod, SuperMod ----------------------- addEvent("Moderator",true) function Moderator(target) local account = getPlayerAccount ( target ) local group = aclGetGroup ( "Moderator" ) if ( group ) then aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "A '"..getAccountName(getPlayerAccount(target)).."' Le Han Sido Consedidos Permisos de Moderador", source, 0, 255 ,0 ) else outputChatBox ( "No Has Especificado el Nombre de la Cuenta", source, 255, 100 ,100 ) end end addEventHandler("Moderator", getRootElement(), Moderator) addEvent("SuperModerator",true) function SuperModerator(target) local account = getPlayerAccount ( target ) local group = aclGetGroup ( "SuperModerator" ) if ( group ) then aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "A '"..getAccountName(getPlayerAccount(target)).."' Le Han Sido Consedidos Permisos de SuperModerador", source, 0, 255 ,0 ) else outputChatBox ( "No Has Especificado el Nombre de la Cuenta", source, 255, 100 ,100 ) end end addEventHandler("SuperModerator", getRootElement(), SuperModerator) addEvent("Admin",true) function Admin(target) local account = getPlayerAccount ( target ) local group = aclGetGroup ( "Admin" ) if ( group ) then aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "A '"..getAccountName(getPlayerAccount(target)).."' Le Han Sido Consedidos Permisos de Administrador", source, 0, 255 ,0 ) else outputChatBox ( "No Has Especificado el Nombre de la Cuenta", source, 255, 100 ,100 ) end end addEvent("SuperModerator",true) function SuperModerator(target) local account = getPlayerAccount ( target ) local group = aclGetGroup ( "SuperModerator" ) if ( group ) then aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "A: '"..getAccountName(getPlayerAccount(target)).."' Le Han Sido Consedidos Permisos de SuperModerador", source, 0, 255 ,0 ) else outputChatBox ( "No Has Especificado el Nombre de la Cuenta", source, 255, 100 ,100 ) end end addEventHandler("Admin", getRootElement(), Admin) addEvent("remove",true) function removee(target) local account = getPlayerAccount ( target ) if ( account ) then aclGroupRemoveObject (aclGetGroup("Moderator"), "user."..getAccountName ( account ) ) aclGroupRemoveObject (aclGetGroup("SuperModerator"), "user."..getAccountName ( account ) ) aclGroupRemoveObject (aclGetGroup("Admin"), "user."..getAccountName ( account ) ) outputChatBox ( "Todos los Permisos De '"..getAccountName(getPlayerAccount(target)).."' han Sido Eliminados !", source, 255, 0 ,0 ) triggerClientEvent ( source,"removedsound", source ) else outputChatBox ( "No Has Especificado el Nombre de la Cuenta", source, 255, 100 ,100 ) end end addEventHandler("remove", getRootElement(), removee) ---------------------- --Comando ---------------------- function OpenPanel ( player ) local player = player or source local accountname = getAccountName( getPlayerAccount( player ) ) if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "Console" )) then triggerClientEvent ( player,"showPanel", player ) else outputChatBox ("* No Tienes los Suficientes Permisos Parta Este Comando", player, 255, 0, 0, true) triggerClientEvent ( player,"nopsound", player ) end end addEvent( "OpenPanel", true ) addEventHandler ( "OpenPanel", getRootElement(), OpenPanel) addCommandHandler ( "pdp", OpenPanel ) function check() local accountname = getAccountName(getPlayerAccount(source)) if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "Console" )) then outputChatBox ("Escribe /pdp o Apreta la Tecla I para Abrir el Panel para dar Permisos", source, 255, 0, 0, true) end end addEventHandler("onPlayerLogin",getRootElement(),check ) -- * Editado por TigreBlanco, Hecho por $ora
  9. Este es mi Primer Tema Espero que me Apoyen, Tengo un Pequeño Problema, Necesito Poner el Panel para Dar Permisos en el Server Juramento Freeroam, El Problema Consiste en que Hace Poco Tiempo Agregue Nuevos Grupos en ACL, Agregue el Grupo VIP y Fundador, Ahora, Cuando Quiero Ponerlo en GPP, es Decir, Para Dar Permisos de VIP en el Server, para no Molestarse en Cerrarlo (Todavia no Tengo Host) Agregar a la Persona, y Volverlo a Abrir, Quiero Agregar por el GPP Dentro del Server, es Decir, Como Puedo Modificar el Panel para que Funcione sin Errores y Contenga 4 Apartados en Vez de 3, Give Moderator, Supermod, Admin, y VIP. Gracias de Antemano a Todos los Quien me Ayuden a Solucionar Este problema, Aqui Os Paso la Version que Hice Mal: GppWindow = guiCreateWindow(0.1900,0.3400,0.6400,0.4500,"Panel para Dar Permisos por TigreBlanco",true) guiSetVisible(GppWindow,false) guiWindowSetSizable(GppWindow,false) Gpedit = guiCreateEdit(251,54,203,33,"",false,GppWindow) GiveModeratorButton = guiCreateButton(250,91,215,40,"Give Moderator Permissions",false,GppWindow) [color=#FF0000]GiveModeratorButton = guiCreateButton(250,91,215,40,"Give VIP Permissions",false,GppWindow[/color]) GiveSuperModeratorButton = guiCreateButton(250,143,215,40,"Give SuperModerator Permissions",false,GppWindow) GiveAdminsButton = guiCreateButton(251,194,210,40,"Give Admin Permissions",false,GppWindow) label = guiCreateLabel(252,31,154,17,"Player :",false,GppWindow) CloseButton = guiCreateButton(445,25,18,16,"X",false,GppWindow) removebutton = guiCreateButton(369,26,65,21,"remove",false,GppWindow) addEvent("[color=#FF0000]VIP[/color]",true) function Moderator(target) local account = getPlayerAccount ( target ) local group = aclGetGroup ( "[color=#FF0000]VIP[/color]" ) if ( group ) then aclGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "GPP: '"..getAccountName(getPlayerAccount(target)).."' have been given [color=#FF0000]VIP[/color] permissions", source, 0, 255 ,0 ) else outputChatBox ( "No account name specified", source, 255, 100 ,100 ) end end
×
×
  • Create New...