Jump to content

Narutimmy

Members
  • Posts

    1,004
  • Joined

  • Last visited

Everything posted by Narutimmy

  1. Por Favor, lo necesito, ayudenme
  2. function getTwoAndTwo() return 2, 2 end local a+1, b = getTwoAndTwo() print( a, b ) --[[OUTPUT: input:5: unexpected symbol near '+' ]] http://www.lua.org/cgi-bin/demo que raro, como dije a mi no me dio problema
  3. Lamentablemente en Lua no puedes hacer sumas directamente en la definición de la variable, pero puedes reemplazar la función 'getTime' para que devuelva lo mismo con la hora alterada. *Ademas, la función para conseguir la hora real es 'getRealTime', 'getTime' devuelve la hora del juego. Pues te dire que asi lo tengo en mi servidor y funciona bien
  4. ese es el codigo completo que encontre.
  5. me refiero a que cuando tienes acceso a la consola del vps, puedes cambiar la hora con un comando...
  6. Eso es facil si tienes un vps, ya que toma la hora del PC Host, pero si no es vps mmm necesitas editar en survivorSystem_client creo.. por la linea 220, donde dice: local hour, minutes = getTime() si en el host son las 10 am y en tu pais las 11am puedes poner algo como: local hour+1, minutes = getTime()
  7. en el codigo espesifique la line , necesito hacer uno nuevo porque tendra otro uso.
  8. Encontre este otro, pero me da error, y en la tabla todo dice "false" en el sv: sv: -------- addEventHandler( 'onResourceStart', getResourceRootElement(getThisResource()), function( ) outputChatBox(" Top-50 Players ", root, 255, 125, 0,true) outputChatBox("Press F5 To Open top 50 Players", root, 50, 255, 0,true) end ) function getPlayerFromNamePart(name) if name then for i, player in ipairs(getElementsByType("player")) do if string.find(getPlayerName(player):lower(), tostring(name):lower(), 1, true) then return player end end end return false end function createTopSystem( player ) if not isElement( player ) then return end local Top = {} for i = 1, #CreatTop do ---linea 743 table.insert(Top,{name = CreatTop[i].Name,score = CreatTop[i].Score}) end if #CreatTop >0 then table.sort(Top, function(a,b) return (tonumber(a.score)or 0) > (tonumber(b.score)or 0) end) setTimer( function() for k, data in ipairs(Top) do if k == 1 then triggerClientEvent (player,"deltTop",player) end triggerClientEvent (player,"updateTop",player,tostring(data.name),tostring(data.score),tonumber(k)) triggerClientEvent (player,"updateTop",player,tostring(data.deaths),tostring(data.score),tonumber(k)) triggerClientEvent (player,"updateTop",player,tostring(data.kills),tostring(data.score),tonumber(k)) if k == 30 then table.remove(Top) break end end end, 500, 1 ) end end function setAcontSqlData( player, top, name) if not isElement( player ) then return end if isGuestAccount ( getPlayerAccount ( player ) ) then return end result = executeSQLQuery("SELECT * FROM `Kills` WHERE `Owner`=?", getAccountName(getPlayerAccount( player ))) result = executeSQLQuery("SELECT * FROM `Deaths` WHERE `Owner`=?", getAccountName(getPlayerAccount( player ))) if ( type ( result ) == "table" and #result == 0 ) or not result then executeSQLQuery( 'INSERT INTO kills( Owner, Score , Name) VALUES( ?, ?, ? )', getAccountName(getPlayerAccount( player )), top, name) else if tonumber ( top ) < tonumber( result[1]["Score"] ) then top = result[1]["Score"] else top = top end executeSQLQuery( 'UPDATE kills SET Score =?,Name =? WHERE Owner =?', top, name, getAccountName(getPlayerAccount( player ))) end end addEventHandler("onElementDataChange",root, function (data) if ( data == "deaths" ) and getElementType(source) == "player" then local deaths = getElementData(source,data) end if ( data == "kills" ) and getElementType(source) == "player" then local kills = getElementData(source,data) end end ) addEvent("getTop", true) addEventHandler("getTop", root, function() createTopSystem( source ) end ) Client: local Key = "F3" --- bind key HD = { gridlist = {50}, q = {} } function centerWindow(center_window) local screenW,screenH=guiGetScreenSize() local windowW,windowH=guiGetSize(center_window,false) local x,y = (screenW-windowW)/2,(screenH-windowH)/2 guiSetPosition(center_window,x,y,false) end HD.wnd = guiCreateWindow(415, 146, 450, 505, "Top 50", false) guiWindowSetSizable(HD.wnd, false) guiSetAlpha(HD.wnd, 1.00) guiSetProperty(HD.wnd, "CaptionColour", "FF200AF3") centerWindow(HD.wnd) HD.gridlist[1] = guiCreateGridList(20, 34, 432, 502, false, HD.wnd) local column = guiGridListAddColumn(HD.gridlist[1], "Rank", 0.20 ) -- Create a 'rank' column in the list local column1 = guiGridListAddColumn(HD.gridlist[1], "Player Name", 0.40 ) -- Create a 'players' column in the list local column2 = guiGridListAddColumn(HD.gridlist[1], "Kills", 0.30 ) -- Create a 'Kills' column in the list local column3 = guiGridListAddColumn(HD.gridlist[1], "Deaths", 0.30 ) -- Create a 'Kills' column in the list for i = 1,50 do local row = guiGridListAddRow ( HD.gridlist[1] ) guiGridListSetItemText ( HD.gridlist[1], row, column, "" .. i .. "-", false, false ) guiGridListSetItemText ( HD.gridlist[1], row, column1, "false", false, false ) guiGridListSetItemText ( HD.gridlist[1], row, column2, "0", false, false ) guiGridListSetItemText ( HD.gridlist[1], row, column3, "0", false, false ) guiGridListSetItemColor(HD.gridlist[1], row, column1, 255, 255, 0) guiGridListSetItemColor(HD.gridlist[1], row, column2, 0, 180, 255) guiGridListSetItemColor(HD.gridlist[1], row, column, 255, 0, 0) end guiSetVisible(HD.wnd, not guiGetVisible(HD.wnd)) bindKey (Key, "down", function() guiSetVisible(HD.wnd, not guiGetVisible(HD.wnd)) showCursor(guiGetVisible(HD.wnd)) triggerServerEvent("getTop", localPlayer) end ) function convertNumber ( number ) local formatted = number while true do formatted, k = string.gsub(formatted, "^(-?%d+)(%d%d%d)", '%1,%2') if ( k==0 ) then break end end return formatted end function updateTopList(name, top, i) local row = guiGridListAddRow ( HD.gridlist[1] ) guiGridListSetItemText ( HD.gridlist[1], row, column, "" .. i .. "-", false, false ) guiGridListSetItemText ( HD.gridlist[1], row, column1, tostring(name), false, false ) guiGridListSetItemText ( HD.gridlist[1], row, column2, tostring(kills), false, false ) guiGridListSetItemText ( HD.gridlist[1], row, column3, tostring(deaths), false, false ) guiGridListSetItemColor(HD.gridlist[1], row, column1, 255, 255, 0) guiGridListSetItemColor(HD.gridlist[1], row, column2, 0, 180, 255) guiGridListSetItemColor(HD.gridlist[1], row, column, 255, 0, 0) end addEvent("updateTop", true) addEventHandler("updateTop", root, updateTopList) function update() guiGridListClear(HD.gridlist[1]) end addEvent("deltTop", true) addEventHandler("deltTop", root, update)
  9. edite el bind y el getaccounts (que es mal puesto)
  10. encontre este en el forum pero solo muestra de los que estan conectados. ------------------- function centerWindow(center_window) local screenW,screenH=guiGetScreenSize() local windowW,windowH=guiGetSize(center_window,false) local x,y = (screenW-windowW)/2,(screenH-windowH)/2 guiSetPosition(center_window,x,y,false) end WindowTOP = guiCreateWindow(328, 125, 613, 514, "", false) guiSetProperty(WindowTOP, "CaptionColour", "FF00FF00") guiSetVisible(WindowTOP, false) guiWindowSetSizable(WindowTOP, false) guiWindowSetMovable(WindowTOP, false) centerWindow ( WindowTOP ) GridListTOP = guiCreateGridList(9, 27, 594, 477, false, WindowTOP) guiGridListAddColumn(GridListTOP, "Rank", 0.2) guiGridListAddColumn(GridListTOP, "Name", 0.2) ---guiGridListAddColumn(GridListTOP, "Money", 0.2) guiGridListAddColumn(GridListTOP, "Kills", 0.2) ---guiGridListAddColumn(GridListTOP, "Deaths", 0.1) function U ( ) guiGridListClear ( GridListTOP ) local players = getPlayersSortByKills ( ) for i = 1, 30 do if ( players [ i ] )then local row = guiGridListAddRow ( GridListTOP ) guiGridListSetItemText( GridListTOP, row, 1, i ..'-', false, false ) guiGridListSetItemColor( GridListTOP, row, 1, 0, 0, 255 ) guiGridListSetItemText( GridListTOP, row, 2, getPlayerName ( players [ i ].element ), false, false ) guiGridListSetItemColor( GridListTOP, row, 2, 255, 255, 0 ) guiGridListSetItemText( GridListTOP, row, 3, tostring ( players [ i ].kills ), false, false ) guiGridListSetItemColor ( GridListTOP, row, 3, 255, 0, 0 ) ---guiGridListSetItemText ( GridListTOP, row, 4, tostring ( players [ i ].deaths ), false, false ) guiGridListSetItemColor ( GridListTOP, row, 4, 250, 154, 255 ) end end end function getPlayersSortByKills ( ) local players = { } for _, player in ipairs ( getAccounts () ) do table.insert ( players, { element = player, kills = getElementData ( player, "Kills" ) or 0, deaths = getElementData ( player, "Deaths" ) or 0, } ) end table.sort ( players, function ( a, b ) return ( tonumber ( a.kills ) or 0 ) > ( tonumber ( b.kills ) or 0 ) end ) return players end bindKey ( "F3" , "down" , function () if guiGetVisible ( WindowTOP , true ) then guiSetVisible ( WindowTOP , false ) showCursor ( false ) outputChatBox ( "Closed" , 255 , 0 , 0 , true ) else guiSetVisible ( WindowTOP , true ) showCursor ( true ) outputChatBox ( "Opened" , 0 , 255 , 0 , true ) U ( ) end end )
  11. Hola bueno me preguntaba si conocen algun shader o alguna forma de dar un efecto apocaliptico.. como contaminado.. jeje alguno?
  12. Hola bueno me llego la idea.. como podria hacerla? es Crear una Tabla en (un Gui) que muestre los 30 mejores usuarios.. osea los que mas kills han echo, alguna idea?
  13. No, es un problema de hace mucho tiempo, yo les digo que quisas es su PC, ya que ami no me a pasado en ninguna de mis pc
  14. Hola bueno tengo otro problema, tengo reportes de que a mis usuarios en mi server estan jugando bien y les crashea el juego nose porque dicen ellos solo en mi server les pasa, a otros estan jugando y lso descoecta asi de la nada no por ping. Alguna ideA?
  15. mm lo cambiaron, gracias
  16. si lo intente con source pero no me funciono tambien el get lo tenia dentro de la funcion y nada me daba error en el argumento 1, o error al obtener la "Y" EDIT: Porque no funciona el " " ?¿
  17. Hola bueno ise este script la idea es al morir te transporta a la misma posision pero 500m en el aire con un paracaidas... pero no funciona local R, T, Y = getElementPosition(thePlayer) function Restart ( thePlayer ) setElementData(thePlayer,"AAutoS",0) setElementData(thePlayer,"Iitemss",0) setTimer ( function (thePlayer) setElementPosition ( thePlayer, R, T, Y + 500 ) giveWeapon ( thePlayer, 46, 1 ) end , 5000, 1 ) end addEventHandler ( "onPlayerWasted", getRootElement(), Restart )
  18. Gracias, si no es molestia podrias ayudarme a corregirlo ? no entiendo lo de que tendria que ser una tabla, y lo de definir thePlayer puedo cambiarlo por source?
  19. ok, Gracias, y como puedo hacer para agregar al team a todos los miembros del gang?
  20. Se supone es para verificar si el team ya esta creado, sino cada que se una un nuevo miembro se crearia el team de nuevo no?.. corrigeme si me estoy equivocando
  21. hola a todos bueno ando haciendo un script, para que si tu gang tiene mas de 5 miembros se cree un team y te una a el, y que si ahi menos de 5 miembros en el se elimine, aun no lo pruebo pero quiero saber si esta bien. Ademas Este Script solo va a unir al Integrante numero 6.. como puedo hacer que tambien una a los que ya estaban en el gang ? Gracias. ---TEAM GANG local nameTeam = getElementData(source,"gang") local Leader = getGangLeader (nameTeam) local GangMembers = getElementData(Leader,"gangslots") local random = math.random ( 0,255 ) local r,g,b = random,random,random ---local teamAdmmin = {} function Gang (gangName) if teamAdmmin[thePlayer] then setPlayerTeam ( source, getTeamFromName ( teamAdmmin ) ) elseif GangMembers > 5 then ---Numero de miembros minimo local teamAdmmin[thePlayer] = createTeam ( nameTeam, r, g, b ) setPlayerTeam ( source, getTeamFromName ( teamAdmmin ) ) end end addEvent ( "onPlayerJoinGang", true ) addEventHandler ( "onPlayerJoinGang", root, Gang ) ---DestruirTEAM function eliminargang (gangName) if GangMembers < 5 then destroyElement ( teamAdmmin[thePlayer] ) end end addEvent ( "onPlayerLeaveGang", true ) addEventHandler ( "onPlayerLeaveGang", root, eliminargang )
×
×
  • Create New...