Jump to content

Rafa23Alzira

Miembro
  • Contador contenido

    588
  • Ingreso

  • Última visita

  • Días ganados

    34

Mensajes publicados por Rafa23Alzira

  1. quest anilloteleport begin
    state start begin
      when 70058.use begin
       say_title ("Teletransportador Portátil:")
       say ("Hola!")
       say ("Hacia donde quieres transportarte?")
    local a = select ("Reinos", "Mapas", "Castillos de los Reinos", "Salir")
    if a == 1 then
    local b = select ("Reino Shinsoo", "Reino Chunjo", "Reino Jinno", "Salir")
    if b == 1 then
      local c = select ("Area Yongan", "Jayang","País Jungrang","País Miryang", "Salir")
      if c == 1 then
       pc.warp ( 469300 , 964200 )
      elseif c == 2 then
       pc.warp ( 360800 , 877600 )
      elseif c == 3 then
       pc.warp ( 128500 , 1000 )
      elseif c == 4 then
       pc.warp ( 230400 , 232200 )
       return
      end
    elseif b == 2 then
      local d = select ("Area Joan", "Bokjung","País Waryong","País Songpa", "Sair")
      if d == 1 then
      pc.warp ( 55700 , 157900 )
      elseif d == 2 then
      pc.warp ( 138500 , 234900 )
      elseif d == 3 then
      pc.warp ( 179500 , 1000 )
      elseif d == 4 then
      pc.warp ( 639700 , 411400 )
      return
      end
    elseif b == 3 then
      local e = select ("Area Pyungmoo", "Bakra","País Imha","País Daeyami", "Salir")
      if e == 1 then
        pc.warp ( 969600 , 278400 )
      elseif e == 2 then
        pc.warp ( 873100 , 242600 )
      elseif e == 3 then
        pc.warp ( 271800 , 13000 )
      elseif e == 4 then
        pc.warp ( 282100 , 846300 )
        return
      end
    end
    elseif a == 2 then
    local main_set = select ("Valle del Seungryong","Monte Sohan","Tierra de Fuego","Desierto Yongbi", "Bosque Fantasma", "Templo Hwang", "Más Mapas")
    if main_set == 1 then
      pc.warp ( 256000 , 665600 )
    elseif main_set == 2 then
      pc.warp ( 491800, 173600 )
    elseif main_set == 3 then
      pc.warp ( 730700, 689800 )
    elseif main_set == 4 then
      pc.warp ( 344000 , 502500 )
    elseif main_set == 5 then
      pc.warp ( 281600 , 0 )
    elseif main_set == 6 then
      pc.warp ( 590500 , 110500 )
    elseif main_set == 7 then
      return
      
    local main_set3 = select ("Bosque Rojo","Campo Serpiente","Arañas","Arañas 2","Gruta del Exilio","Gruta del Exilio 2","Cerrar")
    if main_set3 == 1 then
      pc.warp ( 1049600 , 0 )
    elseif main_set3 == 2 then
      pc.warp ( 1059000 , 726200 )
    elseif main_set3 == 3 then
      pc.warp ( 51200 , 486400 )
    elseif main_set3 == 4 then
      pc.warp ( 665600 , 435200 )
    elseif main_set3 == 5 then
      pc.warp ( 0 , 1203200 )
    elseif main_set3 == 6 then
      pc.warp ( 241300 , 1275500 )
    elseif main_set3 == 7 then
      return
      end
    end
    elseif a == 3 then
    local f = select ("Castillo Milaard", "Castillo Dendera", "Castillo Listhmos", "Sair")
    if f == 1 then
      pc.warp ( 975200 , 133000 )
    elseif f == 2 then
      pc.warp ( 977200 , 185000 )
    elseif f == 3 then
      pc.warp ( 923900 , 183600 )
      return
       end
      end
    end
    end
    

    Prueba así

  2. Prueba con esta si quieres:

     

    quest horse_change_name begin
    state start begin
      when 71110.use begin
      local old_horse_name = horse.get_name() ;
    	 say_title("Cambio de nombre")
    	 say("Con este pbjeto puedes cambiar el nombre")
    	 say("de tu caballo. así darle un toque")
    	 say("personalizado a tu caballo...")
    	 say("")
    	 if string.len(old_horse_name) == 0 then
    	  say_reward("No pongas caracteres especiales.")
    	 else
    	  say_reward("Ahora mismo el nombre del caballo es: "..old_horse_name..".")
    	 end
    	 say("")
    	 say("Pon aquí el nombre que deseas:")
    	 say("")
    	 local horse_name = input()
    	 if string.len(horse_name) < 2 then
    	  say_title("Cambio de nombre")
    	  say("El nombre es demasiado corto.")
    	  say_reward("Minimo 2 caracteres")
    	  return
    	 elseif string.len(horse_name) > 12 then
    	  say_title("Cambio de nombre")
    	  say("El nombre ed demasiado grande.")
    	  say_reward("Maximo 12 caracteres")
    	  return
    	 end
    	 local ret = horse.set_name(horse_name)
    	 say_title("Cambio de nombre")
    	 if ret == 0 then
    	  say_reward("Este nombre no es valido")
    	  say("")
    	 elseif ret == 1 then
    	  say_reward("Este nombre no es valido")
    	  say("")
    	 elseif ret == 2 then
    	  pc.remove_item("71110")
    	  say("Le has cambiado el nombre a tu caballo!")
    	  say("")
      end
    end
    end
    end
    

    Si no deseas esta y deseas otra, indica más concretamente el error que te da.

     

    La quest no es mía, ahora no recuerdo de quien era, si me acuerdo te lo pongo.

  3. Hola gente :D hoy me decidí a intentar hacer una quest desde 0 un poco mas larga, pero me da un error (normal con el lio que me he hecho xd )

    ¿Alguien sabría arreglarla? Da el error "expecting state"

    quest elegir_mascota begin
    state start begin
      when login begin
    set_state(information)
      end
    end
    state information begin
      when letter begin
       send_letter("Regalo de Bienvenida")
      end
      when button or info begin
    say_title("Regalo de Bienvenida")
    say("El Capitan te quiere dar la bienvenida,")
    say("ve a hablar con el.")
    set_state(regalo)
    state regalo begin
    when 20355.chat."Bienvenido a Metin2Neocon" begin
    say_title("Bienvenido a Metin2Neocon")
    say("Como regalo de bienvenida te queremos")
    say("dar una mascota que te seguira")
    say("allá donde vayas, ayudandote en todo")
    say("Las mascotas son estas:")
    say_title("Mini Azrael")
    say_title("León")
    say_title("Tigre")
    say_title("Cerdito")
    say_title("Perro")
    say_reward("Ven a hablar conmigo cuando tengas")
    say_reward("la mascota que deseas.")
    set_state(eleccion)
    state eleccion begin
    when 20355.chat."Ya lo tengo decidido!" begin
    local regalo =select ("Azrael","León","Tigre","Cerdito","Perro")
    if regalo == 1 then
    pc.give_item(50621, 1)
    end
    elseif regalo == 2 then
    pc.give_item(50621, 1)
    elseif regalo == 3 then
    pc.give_item(50621, 1)
    elseif regalo == 4 then
    pc.give_item(50621, 1)
    elseif regalo == 5 then
    pc.give_item(50621, 1)
    set_state(terminado)
    state terminado begin
    end
    end
      end
       end
    	end
    	 end
    	end
       end
      end
    end
    
  4. Aquí les dejo las nuevas armaduras sacadas del .es para el evento de navidad, no tengo fotos pero son atuendos típicos de navidad, si tienen fotos podrían ponerlas =)

     

    Aquí el link de descarga:

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

     

    Dentro van los archivos de las armaduras y los peinados.

  5. Hola, tengo esta quest pero cada vez que alguien sale y entra, o cambia de mapa y eso se le vuelven a dar los items, como es para que solo sea una vez?

     

    quest give_basic_weapon begin
    	    state start begin
    			    when login begin
    					   say_title ( "Bienvenido" )
    					   say_title ( "A Metin2Neocon" )
    					   say ( "" )
    					   pc . give_exp2 ( )
    					   set_quest_state ( "levelup" , "run" )
    					   pc . give_item2 ( "70042" , 1 )
    					   pc . give_item2 ( "70007" , 1 )
    					   pc . give_item2 ( "27003" , 200 )
    					   pc . give_item2 ( "27003" , 200 )
    					   pc . give_item2 ( "27003" , 200 )
    					   pc . give_item2 ( "27006" , 200 )
    					   pc . give_item2 ( "72701" , 1 )
       pc . give_item2 ( "71150" , 1 )
    					   pc . give_item2 ( "50052" , 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   horse . advance ( 1 )
    					   say_reward ( "" )
    					   say_reward ( "" )
    					   say_reward ( "Recibes 600 Pociones Rojas(G)." )
    					   say_reward ( "Recibes 200 Pociones Azules(G)." )
    					   say_reward ( "Recibes Caballo Armado" )
    					   clear_letter ( )
    					   set_state ( "__COMPLETE__" )
    					   if pc . job == 0 then
    					   pc . give_item2 ( "11209" , 1 )
    					   pc . give_item2 ( "11219" , 1 )
    					   pc . give_item2 ( "13007" , 1 )
    					   pc . give_item2 ( "14007" , 1 )
    					   pc . give_item2 ( "15007" , 1 )
    					   pc . give_item2 ( "19" , 1 )
    					   pc . give_item2 ( "3009" , 1 )
    					   pc . give_item2 ( "12207" , 1 )
    					   pc . give_item2 ( "16007" , 1 )
    					   pc . give_item2 ( "17007" , 1 )
    					   say_reward ( "Bienvenido a Metin2neocon" )
    					   elseif pc . job == 1 then
    					   pc . give_item2 ( "11409" , 1 )
    					   pc . give_item2 ( "11419" , 1 )
    					   pc . give_item2 ( "13007" , 1 )
    					   pc . give_item2 ( "14007" , 1 )
    					   pc . give_item2 ( "15007" , 1 )
    					   pc . give_item2 ( "1009" , 1 )
    					   pc . give_item2 ( "2009" , 1 )
    					   pc . give_item2 ( "8009" , 200 )
    					   pc . give_item2 ( "12347" , 1 )
    					   pc . give_item2 ( "16007" , 1 )
    					   pc . give_item2 ( "17007" , 1 )
    					   say_reward ( "Bienvenido a Metin2neocon" )
    					   elseif pc . job == 2 then
    					   pc . give_item2 ( "11609" , 1 )
    					   pc . give_item2 ( "11619" , 1 )
    					   pc . give_item2 ( "13007" , 1 )
    					   pc . give_item2 ( "14007" , 1 )
    					   pc . give_item2 ( "15007" , 1 )
    					   pc . give_item2 ( "19" , 1 )
    					   pc . give_item2 ( "29" , 1 )
    					   pc . give_item2 ( "12487" , 1 )
    					   pc . give_item2 ( "16007" , 1 )
    					   pc . give_item2 ( "17007" , 1 )
    					   say_reward ( "Bienvenido a Metin2neocon" )
    					   elseif pc . job == 3 then
    					   pc . give_item2 ( "11809" , 1 )
    					   pc . give_item2 ( "11819" , 1 )
    					   pc . give_item2 ( "13007" , 1 )
    					   pc . give_item2 ( "14007" , 1 )
    					   pc . give_item2 ( "15007" , 1 )
    					   pc . give_item2 ( "7009" , 1 )
    					   pc . give_item2 ( "12627" , 1 )
    					   pc . give_item2 ( "16007" , 1 )
    					   pc . give_item2 ( "17007" , 1 )
    					   say_reward ( "Bienvenido a Metin2neocon" )
    				  end
    			  end
    		  end
    		  state __COMPLETE__ begin
    			    when enter begin
    					    q.done()
    			    end
    		  end
    end
    
×
×
  • Crear nuevo...