Jump to content

darksirk

Miembro
  • Contador contenido

    67
  • Ingreso

  • Última visita

  • Días ganados

    2

Todo lo publicado por darksirk

  1. Hola amigos aquí les dejo una forma o maneras sencillas de compilar en varios lenguajes, espero a alguien le sirva. https://youtu.be/FdcAxYat_ZE
  2. Si tienes el source entonces haces lo que dice arkano, si no pues simplemente cambia la db y el game por uno que use sql y ya (:
  3. joder, que paci y luego yo te dimos la solucion y aun asi no lo arreglas
  4. Nop, en el caso de los end obvio que tiene que ir, me refiero alos espacios, tabulaciones y el orden que les quieras poner, no tiene que ir tabulado amenos que te sientas mas comodo
  5. el error es obvio al fina de las quest está asi notice_all("Acabas-te de antigir o nível máximo! Parabens!!), nota que no se cierra entre comillas debe ser asi notice_all("Acabas-te de antigir o nível máximo! Parabens!!")
  6. los end no tienen nada que ver jovensito XD de hecho ni las tabulacion ni los espacios afectan
  7. Que intentas agregando acortadores?
  8. la usare para mi server esta reguapas como atuendos
  9. te estas equivocando de modelo gr2 o de value 3
  10. casi al final tienes esto say ( "tu capital" ) ; <--- when 11000.chat."Pago a Mineros" or 11002.chat."Pago a Mineros" or 11004.chat. beginy aqui deberias arreglarlo
  11. mas especifico, en caso de poner nuevos mobs, para mapas de leveo, etc xd
  12. una pregunta, yo nunca he sabido distribuir bien la experiencia, y digamos que por ejempo, el 150 dice, 699771330, mas o menos como se decide cuanta exp darle a cada mob?
  13. yo lo tengo to pero tu no tiene ná
  14. me di una vuelta por dev para ver si encontraba la funcion y no la vi, la tendras, si es asi la pasarias? o pondrias el post
  15. Hay muchas formas, una de ellas seria enviando ese texto a una tabla especial, esos datos que serian texto se actualizarian constantemente al enviar uno, la informacion que tenga esa tabla, se visualizaría unicamente para algun miembro del staff, seria la manera mas facil y rapida y si funcionaria PD: tambien se podria llenar la tabla, y ala hora de enviar el mensaje con el pergamino o con un npc, debes señalar el nombre del miembro del staff al que se lo quieres enviar, o algo paresido solo habria que pensarlo y que el men este sea mas especifico con lo que quiere :|
  16. asi se ve la textura ya te podras imaginar que es...
  17. darksirk

    Ranking PVP

    Hola chavos hoy les traigo un pequeño ranking pvp ingame, seguro a alguno le sirve, esta es la quest quest rankingpvp begin state start begin when 20095.chat."Ranking PVP" begin local consultatop = mysql_query("SELECT * FROM player.KillsTop ORDER BY KillsTop.Puntos DESC") say("#: Nombre // Eliminados ") say_gold("1: "..consultatop.name[1].." // "..consultatop.Puntos[1].." ") say_red("2: "..consultatop.name[2].." // "..consultatop.Puntos[2].." ") say_blue2("3: "..consultatop.name[3].." // "..consultatop.Puntos[3].." ") say_white("4: "..consultatop.name[4].." // "..consultatop.Puntos[4].." ") say_white("5: "..consultatop.name[5].." // "..consultatop.Puntos[5].." ") say_white("6: "..consultatop.name[6].." // "..consultatop.Puntos[6].." ") say_white("7: "..consultatop.name[7].." // "..consultatop.Puntos[7].." ") say_white("8: "..consultatop.name[8].." // "..consultatop.Puntos[8].." ") say_white("9: "..consultatop.name[9].." // "..consultatop.Puntos[9].." ") say_white("10: "..consultatop.name[10].." // "..consultatop.Puntos[10].." ") end when kill with npc.is_pc() begin if pc.getqf("bienvenidoaltop_Sssss") == 0 then pc.setqf("bienvenidoaltop_Sssss",1) mysql_query("INSERT INTO player.KillsTop (name, Puntos) VALUES('"..pc.getname().."','1')") chat("Has ingresado al TOPKill.") else mysql_query("UPDATE player.KillsTop SET KillsTop.Puntos= Puntos + 1 WHERE name='"..pc.get_name().."'") end end end end en caso de que les pida las funciones deben añadir esto al quest lib mysql_query = function(query) if not pre then local rt = io.open('CONFIG','r'):read('*all') pre,_= string.gsub(rt,'.+PLAYER_SQL:%s(%S+)%s(%S+)%s(%S+)%s(%S+).+','-h%1 -u%2 -p%3 -D%4') end math.randomseed(os.time()) local fi,t,out = 'mysql_data_'..math.random(10^9)+math.random(2^4,2^10),{},{} os.execute('mysql '..pre..' -e'..string.format('%q',query)..' > '..fi) -- für MySQL55 for av in io.open(fi,'r'):lines() do table.insert(t,split(av,'\t')) end; os.remove(fi); for i = 2, table.getn(t) do table.foreach(t[i],function(a,b) out[i-1] = out[i-1] or {} out[i-1][a] = tonumber(b) or b or 'NULL' out[t[1][a]] = out[t[1][a]] or {} out[t[1][a]][i-1] = tonumber(b) or b or 'NULL' end) end return out end function split(str, delim, maxNb) if str == nil then return str end if string.find(str, delim) == nil then return { str } end if maxNb == nil or maxNb < 1 then maxNb = 0 end local result = {} local pat = "(.-)" .. delim .. "()" local nb = 0 local lastPos for part, pos in string.gfind(str, pat) do nb = nb + 1 result[nb] = part lastPos = pos if nb == maxNb then break end end if nb ~= maxNb then result[nb + 1] = string.sub(str, lastPos) end return result end function say_blue ( name ) say ( color256 ( 0 , 0 , 255 ).. name .. color256 ( 0 , 0 , 255 )) end function say_red ( name ) say ( color256 ( 255 , 0 , 0 ).. name .. color256 ( 255 , 0 , 0 )) end function say_green ( name ) say ( color256 ( 0 , 238 , 0 ).. name .. color256 ( 0 , 238 , 0 )) end function say_gold ( name ) say ( color256 ( 255 , 215 , 0 ).. name .. color256 ( 255 , 215 , 0 )) end function say_black ( name ) say ( color256 ( 0 , 0 , 0 ).. name .. color256 ( 0 , 0 , 0 )) end function say_white ( name ) say ( color256 ( 255 , 255 , 255 ).. name .. color256 ( 255 , 255 , 255 )) end function say_yellow ( name ) say ( color256 ( 255 , 255 , 0 ).. name .. color256 ( 255 , 255 , 0 )) end function say_blue2 ( name ) say ( color256 ( 0 , 206 , 209 ).. name .. color256 ( 0 , 206 , 209 )) end function say_grey ( name ) say ( color256 ( 196 , 196 , 196 ).. name .. color256 ( 196 , 196 , 196 )) end function say_color(color, text) local rgb = rawget(colors_data, color) say(color256(rgb[1],rgb[2],rgb[3])..text..color256(colors_data.default[1], colors_data.default[2], colors_data.default[3])) end function set_text_color(color) local rgb = rawget(colors_data, color) raw_script(color256(rgb[1],rgb[2],rgb[3])) end colors_data = { ['verde'] = {0,190,0}, ['verde chiaro'] = {0,255,0}, ['verde scuro'] = {0,120,0}, ['verde leggero'] = {144,238,144}, ['verde acqua'] = {102,205,170}, ['rosso'] = {240,0,0}, ['rosso leggero'] = {255,69,51}, ['rosa'] = {255,64,160}, ['rosa scuro'] = {255,0,128}, ['rosa chiaro'] = {255,182,193}, ['corallo'] = {255,127,80}, ['arancione'] = {255,130,0}, ['arancione scuro'] = {255,90,0}, ['fucsia'] = {255,0,255}, ['viola'] = {224,129,255}, ['viola scuro'] = {148,0,148}, ['lilla'] = {200,162,200}, ['marrone'] = {161,63,0}, ['marrone scuro'] = {120,66,0}, ['marrone chiaro'] = {200,164,115}, ['giallo'] = {255,255,53}, ['giallo chiaro'] = {255,255,128}, ['oro'] = {255,191,24}, ['blu'] = {0,0,250}, ['blu scuro'] = {0,0,150}, ['azzurro'] = {128,255,255}, ['azzurro chiaro'] = {193,255,255}, ['turchese'] = {0,255,255}, ['bianco'] = {255,255,225}, ['grigio'] = {128,128,128}, ['nero'] = {0,0,0}, ['default'] = {196,196,196} } QuestFolder = get_locale_base_path().."/quest/" function say_light_yellow(str) say(color256(255,255,128)..str..color256(196, 196, 196)) end function say_yellow(str) say(color256(255,255,53)..str..color256(196, 196, 196)) end function say_orange(str) say(color256(255,191,24)..str..color256(196, 196, 196)) end function say_light_blue(str) say(color256(130, 192, 255)..str..color256(196, 196, 196)) end function say_bonus(str) say(color256(167, 255, 212)..str..color256(196, 196, 196)) end function pc.change_coins(value) mysql_query("UPDATE account.account SET coins=coins +"..value.." WHERE ID='"..pc.get_account_id.."' LIMIT 1") end y esto al quest function say_blue say_blue2 say_red say_green say_gold say_black say_white say_yellow say_grey y por ultimo deben crear una tabla en player llamada "KillsTop", con las siguientes caracterisiticas creditos por mi y hellraiser, y a rafa23alzira(la idea de la quest fueron sacadas de los files necon y fue reesctructurado) foto "ingame"
  18. de hecho solo reemmplazas los archivos "db", o tal vez mysql no inicia bien con el arranque
  19. No se a quien dejar los creditos imagino que a algun servidor brasileiro, en fin estan buenas XD PD: el .rar tiene los creditos asi que no se preocupen https://mega.co.nz/#!VY9GABCB!6GpftXRd7nOh5LMKbvH9JZvsCkj23D7Dw53tLGP_9uQ
×
×
  • Crear nuevo...