Jump to content

DryUz

Miembro
  • Contador contenido

    96
  • Ingreso

  • Última visita

  • Días ganados

    8

Mensajes publicados por DryUz

  1. asi no se repite

    horse . advance ( 1 )
    										   horse . advance ( 1 )
    										   horse . advance ( 1 )
    										   horse . advance ( 1 )
    										   horse . advance ( 1 )
    										   horse . advance ( 1 )
    										   horse . advance ( 1 )
    										   horse . advance ( 1 )-- esto podes cambiarlo por
    horse.set_level ("21")
    			    horse.ride()
    
    

    Asi queda mejor

     

    quest give_basic_weapon begin
        state start begin
    	    when login begin
    			  notice_all(""..string . format ("%s",pc.name).." Bienvenido")
    		    if pc.getqf("basic_weapon") == 0 then
    			    pc.setqf("basic_weapon", 1)
    			    if pc.job == 0 then
    				    pc.give_item2(11209,1)
    								   pc.give_item2(12209,1)
    								   pc.give_item2(00019,1)
    								   pc.give_item2(03009,1)
    			    elseif pc.job == 1 then
    								   pc.give_item2(11409,1)
    								   pc.give_item2(12349,1)
    								   pc.give_item2(01009,1)
    								   pc.give_item2(02009,1)
    								   pc.give_item2(08000,200)
    			    elseif pc.job == 2 then
    								   pc.give_item2(11609,1)
    								   pc.give_item2(12489,1)
    								   pc.give_item2(00019,1)
    			    elseif pc.job == 3 then
    								   pc.give_item2(11809,1)
    								   pc.give_item2(12629,1)
    								   pc.give_item2(05009,1)
    								   pc.give_item2(07009,1)
    			    else
    			    say_title("Bienvenido a Mt2Infinity!")
    			    say("Bienvenido a Mt2Inifnity!")
    			    say("Para empezar, podras cazar")
    			    say("perros salvajes y callejeros.")
    			    say("Buena suerte!")
    			    say_title("Has recibido:")
    			    say_reward("Un equipamiento nivel +9")
    			    say_reward("200 pociones rojas y azules.")
    			    say_reward("100 pociones verdes y moradas")
    			    end
    			    if pc.countitem(item) == 0 and pc.weapon != item then
        horse.set_level ("21")
    			    horse.ride()
    				    pc.give_item2(50051,1)
    				    pc.give_item2(13009,1)
    				    pc.give_item2(14009,1)
    				    pc.give_item2(15009,1)
    				    pc.give_item2(16009,1)
    				    pc.give_item2(17009,1)
    				    pc.give_item2(27003,200)
    				    pc.give_item2(27006,200)
    				    pc.give_item2(27112,100)
    				    pc.give_item2(27115,100)
                        pc.give_item2(50053,1)
    			    end
    		    end
    	    end
        end
    end
    
  2. necesito saber si al poner esto en la quest de regalar un caballo

     

    horse . advance ( )

    horse . advance ( )

    horse . advance ( )

     

    cada horse . advance ( ) sube 1 lv el caballo o sube 2?

     

    ejemplo quiero que el caballo sea lv 21

     

    horse . advance ( )

    horse . advance ( )

    horse . advance ( )

     

     

    horse . advance ( )

    horse . advance ( )

    horse . advance ( )

     

    horse . advance ( )

    horse . advance ( )

    horse . advance ( )

     

    horse . advance ( )

     

    cuantos tengo que poner?

    va puse

     

     

    if horse.get_level() == 1 then

    horse.set_level(21)

     

    en otra quest y no funciono solo esa de advance funciona

  3. Mis files tiene un bug de stats necesito que con esta quest:

    quest reset_scroll begin
    state start begin
    when 71002.use begin
    ---												   l
    say_title("Redistribucines")
    say("Esta utilidad permite")
    say("La restribucion de puntos de estado.")
    say("Asi podras desarrolar a tu PJ")
    say("De otra manera.")
    say("")
    say_reward("Quieres Continuar?")
    say("")
    
    local s = select("Restablecer Puntos De Estado", "Restablecer Puntos De Estado y Magia", "Cancelar")
    
    -- status
    if 1 == s then
    say_title("Advertencia:")
    say("No se puede revertir este efecto.")
    say("")
    say_reward("Deseas Continuar?")
    say("")
    
    local d = select("Si", "No")
    if 2 == d then
    return
    end
    
    char_log(0, "RESET_ALL", "USE_ITEM(71002)")
    pc.remove_item(71002)
    
    char_log(0, "RESET_ALL", "RESET_STAT_POINTS")
    pc.reset_point()
    char_log(0, "RESET_ALL", "RESET_END")
    
    -- beides
    elseif 2 == s then
    say_title("Advertencia:")
    say("No se puede revertir este efecto")
    say("Y perdera todas las habilidades aprendidas!")
    say("")
    say_reward("Deseas Continuar?")
    say("")
    
    local c = select("Si", "No")
    if 2 == c then
    return
    end
    
    char_log(0, "RESET_ALL", "USE_ITEM(71002)")
    pc.remove_item(71002)
    
    char_log(0, "RESET_ALL", "RESET_STAT_POINTS")
    pc.reset_point()
    
    char_log(0, "RESET_ALL", "RESET_SKILL_POINTS")
    pc.clear_skill()
    pc.set_skill_group(0)
    char_log(0, "RESET_ALL", "RESET_END")
    
    -- abbrechen
    elseif 3 == s then
    return
    end
    end
    
    when 71003.use begin
    
    ---												   l
    say_title("El arte de la restribucion")
    say("Le permite a usted")
    say("Reasignar puntos de habilidades.")
    
    local result = BuildSkillList(pc.get_job(), pc.get_skill_group())
    
    local vnum_list = result[1]
    local name_list = result[2]
    
    if table.getn(vnum_list) < 2 then
    say("")
    say_reward("No se A encontrado la habilidad!")
    say("")
    return
    end
    
    say("")
    say_reward("Por Favor Seleccione Una Habilidad:")
    
    local i = select_table(name_list)
    
    if table.getn(name_list) == i then
    return
    end
    
    local name = name_list[i]
    local vnum = vnum_list[i]
    
    say_title("Advertencia:")
    say_reward("No se puede revertir este efecto")
    say_reward("Y solo recibira 17 puntos de habilidad")
    say_reward("Decide con cuidado!")
    say("")
    say(string.format("Deseas Continuar?", name))
    
    local s = select("Si", "No")
    if 2 == s then
    return
    end
    
    char_log(0, "RESET_ONE_SKILL", "USE_ITEM(71003)")
    pc.remove_item(71003)
    
    char_log(0, "RESET_ONE_SKILL", string.format("RESET_SKILL[%s]", name))
    pc.clear_one_skill(vnum)
    
    char_log(0, "RESET_ONE_SKILL", "APPLY_17MASTER_BONUS")
    pc.setqf("force_to_master_skill", 1)
    
    say_title("Restablecido con exito!")
    say(string.format("%s Se restableció correctamente.", name))
    say("")
    
    ---												   l
    say_reward("Has Sido restablecido con 17 puntos de habilidad.")
    say("")
    end
    end
    end
    

     

    que quede algo asi en el lateral Puntos_Stats

    lo abres y te da 1 punto o 2 depende si subes una o 2 volitas o si pasas de lv

  4. por si mediafire deja de funcionar

     

    Sheet1Page 1
    * UPDATE player.mob_proto SET gold_min=gold_min/4
    * UPDATE player.mob_proto SET gold_min=gold_min*4
    * UPDATE player.mob_proto SET exp=exp*10 ;
    * UPDATE player.mob_proto SET exp=exp/10 ;
    1. Sirve para dividir la caida del yang del mob_proto de todos los bichos en 2
    2. Sirve para multiplicar la caida del yang del mob_proto de todos los bichos en 2
    3. Sirve para multiplicar la exp del Mob_proto de todos los bichos en 10
    4. Sirve para dividir la exp del mob_proto de todos los bichos en 10
    
  5. Aca el en un Npc

    quest banco begin
    state start begin
    when 20095.chat."Banco" begin
      say_title("Banco")
      say("")
      say("Hola soi el encargado del banco del server")
      say("asi que a mi deberas acudir si no sabes")
      say("que puedes hacer con tu dinero")
      say("")
      say("Que desea hacer?")
      say("")
    local s = select ( "Retirar Dinero" , "Depositar Dinero" , "Informacion" , "Cancelar" )
      if s == 1 then
      say_title("Banco")
      say("")
      say("Quiere retirar dinero?")
      say("")
    local b = select ( "Si" , "No" )
      if b == 1 then
      say_title("Banco")
      say("")
      say("Elige la cantidad que deseas sacar:")
    local c = select ( "250kk" , "500kk" , "1kkk" , "1,5kkk" , "1.9kkk" , "Cancelar" )
      if c == 1 then
       if pc.get_gold() >= 1750000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30120 ) >= 1 then
     
    pc . remove_item ( 30120 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 250000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
     
      elseif c == 2 then
       if pc.get_gold() >= 1500000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30121 ) >= 1 then
     
    pc . remove_item ( 30121 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 500000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
      elseif c == 3 then
       if pc.get_gold() >= 1000000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30122 ) >= 1 then
     
    pc . remove_item ( 30122 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 1000000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
      elseif c == 4 then
       if pc.get_gold() >= 500000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30123 ) >= 1 then
     
    pc . remove_item ( 30123 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 1500000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
      elseif c == 5 then
       if pc.get_gold() >= 10000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30124 ) >= 1 then
     
    pc . remove_item ( 30124 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 1900000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
     
      elseif c == 6 then
       return
      end
      elseif b == 2 then
       return 
      end
    elseif s == 2 then
      say_title("Banco")
      say("")
      say("Aqui puedes dipositar tu dinero")
      say("A cambio te dare un cheque")
      say("")
      say("El dia que quieras coger tu dinero")
      say("Solo me tienes que dar el cheque")
      say("")
    local d = select ("250kk" , "500kk" , "1kkk" , "1.5kkk" , "1.9kkk" , "Cancelar")
    pasta = {250000000,500000000,1000000000,1500000000,1900000000}
    cheque = {30120,30121,30122,30123,30124}
    
      if d == 1 then
       if pc.get_gold() >= pasta[1] then
     
    pc.change_money( -pasta[1] )
    pc . give_item2 ( cheque[1] , 1 )
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 250kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 250kkk de yang")
       say("")
     
      elseif d == 2 then
       if pc.get_gold() >= pasta[2] then
     
    pc.change_money( -pasta[2] )
    pc . give_item2 (cheque[2], 1 )
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 500kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 500kkk de yang")
       say("")
      elseif d == 3 then
       if pc.get_gold() >= pasta[3] then
     
    pc.change_money( -pasta[3] )
    pc . give_item2 (cheque[3], 1 )
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 1kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 1kkk de yang")
       say("")
      elseif d == 4 then
       if pc.get_gold() >= pasta[4] then
     
    pc.change_money( -pasta[4] )
    pc . give_item2 (cheque[4], 1)
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 1.5kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 1.5kkk de yang")
       say("")
      elseif d == 5 then
       if pc.get_gold() >= pasta[5] then
     
    pc.change_money( -pasta[5] )
    pc . give_item2 (cheque[5] , 1)
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 1.9kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 1.9kkk de yang")
       say("")
     
      elseif d == 6 then
       return
     
      end
     
     
      elseif s == 3 then
       say_title("Banco")
       say("")
       say("El banco de este servidor es conocido")
       say("Por su excelente calidad")
       say("")
       say("No todos tienen acceso a cierta informacion")
       say("Sin embargo, con la cantidad de dinero necesaria")
       say("Podemos hacer importantes transacciones juntos")
       say("")
     
     
      elseif s == 4 then
       return
     
       end
      end
    end
    end
    

    Aca en un Pergamino

     

    quest banco begin
    state start begin
    when login begin
      set_state(banco_porta)
      end
    end
    state banco_porta begin
      when letter begin
       send_letter("Banco Portatil")
    end
    when button or info begin
      say_title("Banco")
      say("")
      say("Hola soi el encargado del banco del server")
      say("asi que a mi deberas acudir si no sabes")
      say("que puedes hacer con tu dinero")
      say("")
      say("Que desea hacer?")
      say("")
    local s = select ( "Retirar Dinero" , "Depositar Dinero" , "Informacion" , "Cancelar" )
      if s == 1 then
      say_title("Banco")
      say("")
      say("Quiere retirar dinero?")
      say("")
    local b = select ( "Si" , "No" )
      if b == 1 then
      say_title("Banco")
      say("")
      say("Elige la cantidad que deseas sacar:")
    local c = select ( "250kk" , "500kk" , "1kkk" , "1,5kkk" , "1.9kkk" , "Cancelar" )
      if c == 1 then
       if pc.get_gold() >= 1750000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30120 ) >= 1 then
     
    pc . remove_item ( 30120 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 250000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
     
      elseif c == 2 then
       if pc.get_gold() >= 1500000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30121 ) >= 1 then
     
    pc . remove_item ( 30121 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 500000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
      elseif c == 3 then
       if pc.get_gold() >= 1000000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30122 ) >= 1 then
     
    pc . remove_item ( 30122 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 1000000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
      elseif c == 4 then
       if pc.get_gold() >= 500000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30123 ) >= 1 then
     
    pc . remove_item ( 30123 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 1500000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
      elseif c == 5 then
       if pc.get_gold() >= 10000000 then
     
    say_title("Banco")
    say("")
    say("Lo siento, con tanto yang")
    say("si sacas esta cantidad se te va a bugear")
    say("")
    return
    end
       if pc . count_item ( 30124 ) >= 1 then
     
    pc . remove_item ( 30124 , 1 )
    chat("La retirada acabo con exito!")
    pc.change_money( 1900000000 )
    return
    end
     
       chat("Lo siento pero no tienes cheques")
     
      elseif c == 6 then
       return
      end
      elseif b == 2 then
       return 
      end
    elseif s == 2 then
      say_title("Banco")
      say("")
      say("Aqui puedes dipositar tu dinero")
      say("A cambio te dare un cheque")
      say("")
      say("El dia que quieras coger tu dinero")
      say("Solo me tienes que dar el cheque")
      say("")
    local d = select ("250kk" , "500kk" , "1kkk" , "1.5kkk" , "1.9kkk" , "Cancelar")
    pasta = {250000000,500000000,1000000000,1500000000,1900000000}
    cheque = {30120,30121,30122,30123,30124}
    
      if d == 1 then
       if pc.get_gold() >= pasta[1] then
     
    pc.change_money( -pasta[1] )
    pc . give_item2 ( cheque[1] , 1 )
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 250kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 250kkk de yang")
       say("")
     
      elseif d == 2 then
       if pc.get_gold() >= pasta[2] then
     
    pc.change_money( -pasta[2] )
    pc . give_item2 (cheque[2], 1 )
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 500kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 500kkk de yang")
       say("")
      elseif d == 3 then
       if pc.get_gold() >= pasta[3] then
     
    pc.change_money( -pasta[3] )
    pc . give_item2 (cheque[3], 1 )
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 1kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 1kkk de yang")
       say("")
      elseif d == 4 then
       if pc.get_gold() >= pasta[4] then
     
    pc.change_money( -pasta[4] )
    pc . give_item2 (cheque[4], 1)
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 1.5kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 1.5kkk de yang")
       say("")
      elseif d == 5 then
       if pc.get_gold() >= pasta[5] then
     
    pc.change_money( -pasta[5] )
    pc . give_item2 (cheque[5] , 1)
    chat("El deposito ha sido un exito!")
    chat("Usted recibe un cheque por valor de 1.9kkk")
    return
    end
     
       say_title("Banco")
       say("")
       say("Lo siento pero para hacer esto")
       say("necesitas tener al menos 1.9kkk de yang")
       say("")
     
      elseif d == 6 then
       return
     
      end
     
     
      elseif s == 3 then
       say_title("Banco")
       say("")
       say("El banco de este servidor es conocido")
       say("Por su excelente calidad")
       say("")
       say("No todos tienen acceso a cierta informacion")
       say("Sin embargo, con la cantidad de dinero necesaria")
       say("Podemos hacer importantes transacciones juntos")
       say("")
     
     
      elseif s == 4 then
       return
     
       end
      end
    end
    end
    
  6. Aca te la dejo en quest ya que si aplicas sh make.sh se te borra los script...

    quest mineral begin
    state start begin
    when 20090.chat."Minerales" begin
    say_title ( "Minerales" )
    say ( "Hola, amigo soy el Soy el Sura y te pago por minar para mi" )
    say ( "Que desea?" )
    local item =select ("Cobrar","Info","Cancelar")
    if item == 1 then
       say_title ( "Sistema de Pagos Force" )
       say ( "Hola, este es el Sistema de pago a trabajadores" )
       say ( "Aquí usted puede Recibir dinero por los minerales extraidos.." )
       say ( "Espero que esto puede serle de gran ayuda " )
       say ( "Entonces...." )
       say ( "Quiere Cobrar su salario?" )
       local confirm =select ( "Si" , "No" )
       if confirm == 1 then
    	  say_reward ( "que joya tiene, su salario depende de eso:" )
    	  local ritiro = select ("200 de Plata 100kk","200 de Oro 150kk","200 de Oro blanco 200kk","200 de Diamante 250kk","NO quiero")
    	  if ritiro == 1 then
    		 if pc . count_item ( 50605 ) >= 200 then
    		    pc . remove_item ( 50605 , 200 )
    		    say ( "Aqui tienes tu pago!!!" )
    		    pc . changegold ( 100000000 )
    		 else
    		    say ( "No tienes la plata crees que me estafaras" )
    		    say ( "largate o te asesino. " )
    		    return
    		 end
    	  elseif ritiro == 2 then
    		 if pc . count_item ( 50606 ) >= 200 then
    		    pc . remove_item ( 50606 , 200 )
    		    say ( "Aqui tienes tu pago!!!" )
    		    pc . changegold ( 150000000 )
    		 else
    		    say ( "No tienes el oro crees que me estafaras" )
    		    say ( "largate o te asesino. " )
    		    return
    		 end
    	  elseif ritiro == 3 then
    		 if pc . count_item ( 50610 ) >= 200 then
    		    pc . remove_item ( 50610 , 200 )
    		    say ( "Aqui tienes tu pago!!!" )
    		    pc . changegold ( 200000000 )
    		 else
    		    say ( "No tienes el oro blanco crees que me estafaras" )
    		    say ( "largate o te asesino. " )
    		    return
    		 end
    	  elseif ritiro == 4 then
    		 if pc . count_item ( 50601 ) >= 200 then
    		    pc . remove_item ( 50601 , 200 )
    		    say ( "Aqui tienes tu pago!!!" )
    		    pc . changegold ( 250000000 )
    		 else
    		    say ( "No tienes el diamante crees que me estafaras" )
    		    say ( "largate o te asesino. " )
    		    return
    		 end
    	  end
       elseif confirm == 2 then
    	  return
       end
    elseif item == 2 then
       say_title ( "Sistema de pagos" )
       if pc . gold >= 1 then
    	  pc . changegold ( - 100000 )
    	  say ( "-Hola, soy el TM Ares y este es el sistema de pago.." )
    	  say ( "Estoy aquí para darle alguna información .." )
    	  say ( "como trabajas de minero para mi tienes que traerme minerales" )
    	  say ( "a cambio yo te doy dinero en efectivo.." )
    	  say ( "-cuando este aburrido de matar MOBS o te den poco yang" )
    	  say ( "solo ve un rato por ahi y traeme unos metales preciosos.." )
    	  say ( "esto es util para los negocios" )
    	  say ( "asi puedes tener yang con poco esfuerzo.." )
    	  say ( "De esta forma puedes aumentar " )
    	  say ( "tu capital" ) ;
       else
    	  say ( "no hay suficiente yang" )
    	  say ( "Mi informacion tiene un precio!! xD" )
    	  return
       end
    elseif item == 3 then
       return
    end
    end
    end
    end
    
  7. Estas creo que ya estan solo queda traducirlas

    Imagen enviada

     

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

     

    Imagen enviada

     

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    otra Web

    Imagen enviada

     

    Link:

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Otra

    Imagen enviada

     

    Link:

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

     

    Otra

    Imagen enviada

     

    Link:

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Foro Mt2

    Imagen enviada

     

    Link:

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Pagina de inicio:

    Imagen enviada

     

    Link

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Mas Cosas Mias :D

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    creditos epvp...

  8. Parecida a la del elemets o algo asi

    Imagen enviada

     

    Link:

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.
    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

     

    Aca la otra:

    Imagen enviada

     

     

     

    Link:

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

     

    Mas cosas mias :D

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

  9. Sistema iPhone: los mensajes pueden ser enviados a otros jugadores dentro del juego.

    aun que el jugador este desconectado podes enviar editarlo borrarlo y muchas otras cosas

     

    Funciones

    Los mensajes se puede borrar.

    Los mensajes pueden salvarte.

    Mensaje letra.

    Restaurar.

     

    el el rar esta la quest el la del navicat.. va en la table de player "gracias a

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Imagen enviada

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.
    por corregirme

    ya que el es una persona que no ase nada mal y no comete errores" :kiddingme:Imagen enviada

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Mas Cosas Mias :D

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    epvp

  10. Este es un sistema gremial cuenta funciona sin el Mysql.

     

    Todo va con la bandera evento `s, etc.

     

    ¿Funciona de esta manera:

     

    Como líder del clan puede ser una "cuenta gremio" abrirlo tiene que introducir un PIN de 5 dígitos con esto usted puede entonces posteriormente administrar el dinero en la cuenta.

    Ahora, para las funciones: el hombre puede como miembro de un gremio (si tienen una cuenta) instruir Yang.

    Como director / propietario del PIN `s puede enviar el dinero a la gente

    * SOLO SI EN EL MISMO PLANO /

    solo tiene que traducirlo yo no tengo tiempo!...

    [/color]
    function pc.change_money_for_other_pc(name,betrag)
    local name2 = pc.get_name()
    local m
    local d = pc.select(find_pc_by_name(name))
    m = pc.get_gold()
    pc.select(d)
    if m+betrag >= 2*10^9 then
      say("Er hat zu viel Geld")
      return
    end
    local d = pc.select(find_pc_by_name(name))
    pc.change_money(betrag)
    chat('Du hast von '..name2..' '..betrag..' Yang erhalten!')
    pc.select(d)
    end
    [color=#ffd700]

    Las funciones aquí en la misión.

    pc.change_money_for_other_pc()
    
    Y aquí está la búsqueda

    quest konto begin
    	state start begin
    		when 20020.chat."Gilden Konto" begin
    			if pc.getqf("konto") == 0 and pc.is_guild_master() then
    				say("Du hast noch kein Konto fuer deine Gilde gemacht")
    				say("Willst du das jetzt tun?")
    				local a = select ("Ja","Nein")
    				if a == 2 then
    					return
    				elseif a == 1 then
    					say("Bitte gib einen Pin ein der fuer deine Gilde gillt")
    					say("Die Leute die diesen Pin besitzen koennen das Geld")
    					say("auf dem Konto verwalten.")
    					say("Er muss 5 Stellig sein!!!")
    					local pin_eing = tonumber(input("12345"))
    					if pin_eing > 9999 and pin_eing < 100000 then
    						say("")
    						say("Dieser Pin ist ok!")
    						say("")
    						say_reward("Pin " ..pin_eing.. " Speichern?")
    						local sel=select("Ja", "Nein")
    						if sel==1 then
    							game.set_event_flag(pc.get_guild().."_pin",pin_eing)
    							game.set_event_flag(pc.get_guild(),1)
    							say("")
    							say("Pin wurde gespeichert.")
    							say("Bis bald mal.")
    							pc.setqf("konto",1)
    						elseif sel==2 then
    							say("")
    							say("Bis bald mal.")
    						else
    							-- Fehler abfangen!
    							say("Unbekannter Fehler!")
    							say("Bitte umgehend mit ihren")
    							say("Fehler Code beim Serverleiter")
    							say("melden!")
    							say("Fehler Code: 1")
    						end
    					elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
    						say("")
    						say("Tut mir leid doch irgendwas stimmt nicht mit")
    						say("deiner Pin.")
    						say("")
    						say_reward("Info: Pin darf nur Zahlen enthalten!")
    						say_reward("Info: Pin darf nicht größer als 99999")
    						say_reward("oder kleiner als 10000 sein!")
    					end
    				end
    			end
    			if game.get_event_flag(pc.get_guild()) == 1 then
    				say("Willkommen im Gildenkontosystem")
    				say("Du kannst hier Geld einweisen und als Leader mit dem PIN verwalten")
    				say("Was willst du tun ?")
    				local a = select ("Einweisen","Verwalten mit PIN","Abbrechen")
    				if a == 3 then
    					return
    				elseif a == 1 then
    					say("Du willst also geld einweinsen.")
    					say("Wie viel Yang willst du auf dein Konto einzahlen?")
    					say("Maximal 1.999.999.999!")
    					say("")
    					say_reward("Dabei: " ..pc.get_money())
    					say("")
    					local geld_auf_konto = tonumber(input(""))
    					local auf_konto_new = tonumber(geld_auf_konto) + game.get_event_flag(pc.get_guild().."_konto_yang")
    					if geld_auf_konto < 0 then
    						say("")
    						say("Das geht leider nicht.")
    					else
    						if pc.get_money() < geld_auf_konto then
    							say("")
    							say("Soviel hast du garnicht dabei.")
    							return
    						else
    							if auf_konto_new < 2000000000 then
    								pc.change_money(-geld_auf_konto)
    								game.set_event_flag(pc.get_guild().."_konto_yang", auf_konto_new)
    								say("")
    								say("Ich habe " ..geld_auf_konto.. " Yang auf dein Konto getan.")
    							else
    								say("")
    								say("Soviel kannst du nicht aufs Konto")
    								say("machen. Das würde die Maximal menge")
    								say("von 1.999.999.999 überschreiten.")
    							end
    						end
    					end
    				elseif a == 2 then
    					say("")
    					say("Bitte Pin eingeben.")
    					local pin_abf = tonumber(input(""))
    					if pin_abf == game.get_event_flag(pc.get_guild().."_pin") then
    						say("")
    						say("Pin ist Korrekt.")
    						say("Wie viel Yang willst du vom Konto abheben?")
    						say("")
    						say_reward("Auf Konto: " ..game.get_event_flag(pc.get_guild().."_konto_yang"))
    						say("")
    						local geld_von_konto = tonumber(input(""))
    						if geld_von_konto < 0 then
    							say("")
    							say("Das geht leider nicht.")
    						else
    							if geld_von_konto > game.get_event_flag(pc.get_guild().."_konto_yang") then
    								say("")
    								say("Soviel hast du nicht auf deinem Konto.")
    							elseif geld_von_konto <= game.get_event_flag(pc.get_guild().."_konto_yang") then
    								say("Wemm willst du das geben ?")
    								say("Gib bitte etwas ein")
    								local name2 = input()
    								if find_pc_by_name(name2) == 0 or find_pc_by_name(name2) == nil then say("Die Person ist nicht online") return end  
    									local auf_konto_new = tonumber(game.get_event_flag(pc.get_guild().."_konto_yang") - geld_von_konto)
    									say("Das Geld wurde ihm gegeben.")
    									pc.change_money_for_other_pc(name2,geld_von_konto)
    									game.set_event_flag(pc.get_guild().."_konto_yang", auf_konto_new)
    							end
    						end
    					else
    						say("")
    						say("Falscher Pin.")
    					end
    				end
    			end
    		end
    	end
    end
    

    La búsqueda está trabajando otra vez. Diga nuevas características tales como PIN Cambiar todos los miembros de todo el dinero que se atribuya.

     

    Mas cosas mias :D

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

    Debes iniciar sesión para ver el contenido del enlace en esta publicación.

  11. Aca esta :)

    ---------------------------------------
    ---- Datei : Sistema GPS
    ---- Datei version : 1.0
    ---- Creado Por : DarealRefuse
    ----------------------------------------
    quest gps begin
    state start begin[/color]
    [color=#ffd700]function start()
    say_title('Sistema GPS')
    say('')
    --
    say_reward('Utilice el nombre de la persona. ')
    local sname = input()
    local find = find_pc_by_name(sname)
    if(find == 0 or sname == '' or sname == nil or sname == pc.name) then return say_reward('Error [ENTER] Error nuevamente.. ') end
    say_title('Sistema GPS')
    say('')
    ---
    local select = pc.select(sname)
    local x,y = pc.get_y(),pc.get_x()
    pc.select(select)
    pc.setqf('targetpc_x',x)
    pc.setqf('targetpc_y',y)
    say_reward('Persona identificada en el mapa. ')
    say_reward('¡gracias!.. ')
    say_reward('')
    wait()
    pc.warp(pc.getqf('targetpc_x'),pc.getqf('targetpc_y'))
    end[/color]
    [color=#ffd700]when letter begin
      send_letter('Sistema GPS')
    end
    when button or info begin
    gps.start()
      end
    end
    end
    
×
×
  • Crear nuevo...