antiblock
https://i.imgur.com/aJ17bf7.gif

Vintereais

Membro
  • Content Count

    90
  • Joined

  • Last visited

  • Days Won

    1

Posts posted by Vintereais


  1. quest logros_keko begin
    state start begin
      when login begin
       local actual_achievement_points = pc.getqf("achievement_points")
       if pc.getqf("firstlogin") != 1 then
            local Reward = 1
            pc.setqf("firstlogin", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Primer_login%".. actual_achievement_points + Reward .."")
       else
            cmdchat("achievementpoints ".. pc.getqf("achievement_points"))
       end
      end
     
       when 691.kill begin
       local Reward = 2
       local Achievement = "Jefe_Orco"
       local killcount = pc.getqf("691")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("691", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 791.kill begin
       local Reward = 3
       local Achievement = "Lider_esoterico"
       local killcount = pc.getqf("791")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("791", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 2493.kill begin
       local Reward = 100
       local Achievement = "Dragon_azul"
       local killcount = pc.getqf("2493")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("2493", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 2492.kill begin
       local Reward = 20
       local Achievement = "Comandante_Setaou"
       local killcount = pc.getqf("2492")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("2492", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 1091.kill begin
       local Reward = 5
       local Achievement = "Rey_demonio"
       local killcount = pc.getqf("1091")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("1091", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 2597.kill begin
       local Reward = 20
       local Achievement = "Muerte"
       local killcount = pc.getqf("2597")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("2597", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 1192.kill begin
       local Reward = 12
       local Achievement = "Bruja_de_hielo"
       local killcount = pc.getqf("1192")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("1192", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 1304.kill begin
       local Reward = 5
       local Achievement = "Tigre_fantasma"
       local killcount = pc.getqf("1304")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("1304", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 1901.kill begin
       local Reward = 4
       local Achievement = "9_colas"
       local killcount = pc.getqf("1901")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("1901", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 2091.kill begin
       local Reward = 3
       local Achievement = "Reina_araña"
       local killcount = pc.getqf("2091")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("2091", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 2206.kill begin
       local Reward = 4
       local Achievement = "Jefe_logros"
       local killcount = pc.getqf("2206")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("2206", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 2191.kill begin
       local Reward = 5
       local Achievement = "Tortuga_del_desierto"
       local killcount = pc.getqf("2191")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("2191", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 692.kill begin
       local Reward = 3
       local Achievement = "Orco_elite"
       local killcount = pc.getqf("692")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("692", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 693.kill begin
       local Reward = 5
       local Achievement = "Orco_renacido"
       local killcount = pc.getqf("693")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("693", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 50129.use begin
      say_title ( "Obten puntos logro")
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      local p = select ( "Obten 200 puntos logro" )
      if p == 1 then
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      pc . setqf ( "achievement_points" , actual_achievement_points + 200 )
      say ( "Enorabuena tienes 200 logros mas" )
      say ( "Disfrutalos!" )
      item.remove ( "50129", 1 )
      end
      end
      when 50130.use begin
      say_title ( "Obten puntos logro")
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      local p = select ( "Obten 100 puntos logro" )
      if p == 1 then
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      pc . setqf ( "achievement_points" , actual_achievement_points + 100 )
      say ( "Enorabuena tienes 100 logros mas" )
      say ( "Disfrutalos!" )
      item.remove ( "50130", 1 )
      end
      end
      when 50131.use begin
      say_title ( "Obten puntos logro")
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      local p = select ( "Obten 50 puntos logro" )
      if p == 1 then
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      pc . setqf ( "achievement_points" , actual_achievement_points + 50 )
      say ( "Enorabuena tienes 50 logros mas" )
      say ( "Disfrutalos!" )
      item.remove ( "50131", 1 )
      end
      end
      when 50132.use begin
      say_title ( "Obten puntos logro")
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      local p = select ( "Obten 25 puntos logro" )
      if p == 1 then
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      pc . setqf ( "achievement_points" , actual_achievement_points + 25 )
      say ( "Enorabuena tienes 25 logros mas" )
      say ( "Disfrutalos!" )
      item.remove ( "50132", 1 )
      end
      end
      when 50115.use begin
      say_title ( "Canjea tus puntos logro" )
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      local p = select ( "Caballo armado - 5 puntos" , "Caballo militar - 30 puntos" , "Bonus mediohumanos +20% por 30min - 50 puntos" , "Bonus HP +5000 por 30min - 60 puntos" , "Armadura divina - 400 logros" , "Mascota de ataque - 30 puntos" , "Mas" )
      if p == 1 then
      if pc . getqf ( "achievement_points" ) <= 4 then
      say ( "Lo siento necesitas mas puntos" )
      return
      end
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      pc . setqf ( "achievement_points" , actual_achievement_points - 5 )
      say ( "Has recibido un caballo armado" )
      horse . set_level ( "11" )
      horse . unsummon ( )
      horse . summon ( )
      pc . give_item2 ( "50052" , 1 )
      return
      elseif p == 2 then
      if pc . getqf ( "achievement_points" ) <= 29 then
      say ( "Lo siento necesitas mas puntos" )
      return
      end
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      pc . setqf ( "achievement_points" , actual_achievement_points - 30 )
      say ( "Has recibido un caballo militar" )
      horse . set_level ( "21" )
      horse . unsummon ( )
      horse . summon ( )
      pc . give_item2 ( "50053" , 1 )
      return
      elseif p == 3 then
      if pc . getqf ( "achievement_points" ) <= 49 then
      say ( "Lo siento necesitas mas puntos" )
      return
      end
      local actual_achievement_points = pc . getqf ( "achievement_points" )
      pc . setqf ( "achievement_points" , actual_achievement_points - 50 )
      say ( "Has recibido 20% fuerza contra mediohumanos por 30min" )
      affect . add_collect ( apply . ATTBONUS_HUMAN , 20 , 60 * 30 )
      return
      elseif p == 4 then
      if pc . getqf ( "achievement_points" ) <= 59 then
      say ( "Lo siento necesitas mas puntos" )
      return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 60 )
    say ( "Has recibido 5000hp por 30min" )
    affect . add_collect ( apply . MAX_HP , 5000 , 60 * 30 )
    return
    elseif p == 5 then
    if pc. getqf ( "achievement_points" ) <= 399 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 399 )
    local armor = select ( "Armd. divina (G)" , "Armd. divina (N)" , "Armd. divina (S)" , "Armd. divina ©" )
    if armor == 1 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "42080" , 1 )
    return
    elseif armor == 2 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "44080" , 1 )
    return
    elseif armor == 3 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "46080" , 1 )
    return
    elseif armor == 4 then
    say ( "Has recibido la Armadura divina" )
    pc . give_item2 ( "48080" , 1 )
    return
    end
    elseif p == 6 then
    if pc . getqf ( "achievement_points" ) <= 29 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 29 )
    say ( "Has recibido la mascota de ataque" )
    pc . give_item2 ( "30312" , 1 )
    return
    elseif p == 7 then
    local p2 = select ( "Leon Blanco - 40 puntos" , "Anillo experiencia - 5 puntos" , "Fuerza monstruo +20% 30min - 15 puntos" , "Velocidad movimiento +25% 30min - 10 puntos" , "Mascota de defensa - 25 puntos" , "Cuantos logros tengo?" , "Cerrar" )
    if p2 == 1 then
    if pc . getqf ( "achievement_points" ) <= 39 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 40 )
    say ( "Has recibido un leon blanco disfrtualo, no se acaba" )
    pc . give_item2 ( "50110" , 1 )
    return
    elseif p2 == 2 then
    if pc . getqf ( "achievement_points" ) <= 4 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 5 )
    say ( "Disfruta de un anillo de experiencia" )
    pc . give_item2 ( "71015" , 1 )
    return
    elseif p2 == 3 then
    if pc . getqf ( "achievement_points" ) <= 14 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 15 )
    say ( "Has recibido 20% fuerza monstruo por 30min" )
    affect . add_collect ( apply . ATTBONUS_MONSTER , 20 , 60 * 30 )
    return
    elseif p2 == 4 then
    if pc . getqf ( "achievement_points" ) <= 9 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 10 )
    say ( "Has recibido 25% velo.movimiento por 30min" )
    affect . add_collect ( apply . MOV_SPEED , 25 , 60 * 30 )
    return
    elseif p2 == 5 then
    if pc . getqf ( "achievement_points" ) <= 24 then
    say ( "Lo siento necesitas mas puntos" )
    return
    end
    local actual_achievement_points = pc . getqf ( "achievement_points" )
    pc . setqf ( "achievement_points" , actual_achievement_points - 25 )
    say ( "Has recibido la mascota de defensa" )
    pc . give_item2 ( "71124" , 1 )
    return
    elseif p2 == 6 then
    local Reward = 0
    local Achievement = "Ver_tus_logros"
    local killcount = pc.getqf("logros")
    local actual_achievement_points = pc.getqf("achievement_points")
    pc.setqf("achievement_points", actual_achievement_points + Reward)
    cmdchat("achievement ".. Achievement .."_derrotado#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
    elseif p2 == 7 then
    return
    end
    end
    end
       when 8013.kill begin
       local Reward = 8
       local Achievement = "Metin_muerte"
       local killcount = pc.getqf("8013")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("8013", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_destruido#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 8016.kill begin
       local Reward = 5
       local Achievement = "Metin_demonio"
       local killcount = pc.getqf("8016")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("8016", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_destruido#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 8012.kill begin
       local Reward = 6
       local Achievement = "Metin_caida"
       local killcount = pc.getqf("8012")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("8012", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_destruido#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 8015.kill begin
       local Reward = 5
       local Achievement = "Metin_dureza"
       local killcount = pc.getqf("8015")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("8015", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_destruido#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 8026.kill begin
       local Reward = 2
       local Achievement = "Metin_85"
       local killcount = pc.getqf("8026")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("8026", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_destruido#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when 8027.kill begin
       local Reward = 3
       local Achievement = "Metin_90"
       local killcount = pc.getqf("8027")
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("8027", killcount + 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)
       cmdchat("achievement ".. Achievement .."_destruido#".. killcount + 1  .."%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 100 and pc.getqf("Level00") != 1 begin
       local Reward = 2
       local Achievement = "Level_100"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level00", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 110 and pc.getqf("Level10") != 1 begin
       local Reward = 2
       local Achievement = "Level_110"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level10", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 115 and pc.getqf("Level15") != 1 begin
       local Reward = 3
       local Achievement = "Level_115"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level15", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 120 and pc.getqf("Level00") != 1 begin
       local Reward = 4
       local Achievement = "Level_120"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level20", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 125 and pc.getqf("Level25") != 1 begin
       local Reward = 5
       local Achievement = "Level_125"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level25", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 130 and pc.getqf("Level30") != 1 begin
       local Reward = 10
       local Achievement = "Level_130"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level30", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 135 and pc.getqf("Level35") != 1 begin
       local Reward = 25
       local Achievement = "Level_135"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level35", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 140 and pc.getqf("Leve140") != 1 begin
       local Reward = 50
       local Achievement = "Level_140"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Level40", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login or levelup with pc.get_level() >= 140 and pc.getqf("Leve140") != 1 begin
       local Reward = 100
       local Achievement = "Level_140"
       local actual_achievement_points = pc.getqf("achievement_points")
       pc.setqf("Leve140", 1)
       pc.setqf("achievement_points", actual_achievement_points + Reward)  
       cmdchat("achievement ".. Achievement .."_alcanzado%".. actual_achievement_points + Reward .."")
      end
      when login begin
      loop_timer("check_eq", 10)
      end
      when check_eq.timer begin
       local russi = pc.get_armor()
       local waffe = pc.get_weapon()
       local actual_achievement_points = pc.getqf("achievement_points")
       local Reward = 5
       if russi==11299 and pc.getqf("achievement_ssp") != 1 then
            pc.setqf("achievement_ssp", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Armadura negra+9%".. actual_achievement_points + Reward .."")
       elseif russi==11499 and pc.getqf("achievement_swa") != 1 then
            pc.setqf("achievement_swa", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Armadura negra+9%".. actual_achievement_points + Reward .."")
       elseif russi==11699 and pc.getqf("achievement_mpp") != 1 then
            pc.setqf("achievement_mpp", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Armadura negra+9%".. actual_achievement_points + Reward .."")
       elseif russi==11899 and pc.getqf("achievement_sk") != 1 then
            pc.setqf("achievement_sk", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Armadura negra+9%".. actual_achievement_points + Reward .."")
       elseif waffe==189 and pc.getqf("achievement_gifti") != 1 then
            pc.setqf("achievement_gifti", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Giftschwert+9%".. actual_achievement_points + Reward .."")
       elseif waffe==199 and pc.getqf("achievement_lowenschw.") != 1 then
            pc.setqf("achievement_lowenschw.", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Löwenschwert+9%".. actual_achievement_points + Reward .."")
       elseif waffe==5129 and pc.getqf("achievement_orchiglocke") != 1 then
            pc.setqf("achievement_orchiglocke", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Orchideenglocke+9%".. actual_achievement_points + Reward .."")
       elseif waffe==2179 and pc.getqf("achievement_krahenstahl") != 1 then
            pc.setqf("achievement_krahenstahl", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Krähenstahlbogen+9%".. actual_achievement_points + Reward .."")
       elseif waffe==1139 and pc.getqf("achievement_teufelsflugenchak") != 1 then
            pc.setqf("achievement_teufelsflugenchak", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Teufelsflügel-Chakram+9%".. actual_achievement_points + Reward .."")
       elseif waffe==3169 and pc.getqf("achievement_Grolli") != 1 then
            pc.setqf("achievement_Grolli", 1)
            pc.setqf("achievement_points", actual_achievement_points + Reward)
            cmdchat("achievement Grollschwert+9%".. actual_achievement_points + Reward .."")
       end  
      end
    end

     

    A quest está a me dar esse erro!!
    assertion failure : nested==0

    logros_keko.quest:514:Abort (core dumped)

    Se alguém sobe e u dou +1
     

  2. Vai me você ensinar a fazer quests?

    Aprenda a ler antes de falar:

     

    O que acha que possa se melhor do que alguém ai nesta comunidade???

    mas de qualquer forma.. vou deixar acha que é o soberando de toda sabedoria... e só pq têm uma comunidade saber tudo..

    passa bem PACIFICADOR


  3. pc.warp((10496+645)*100, (15104+80)*100)

    O que isso têm a ver?? :( quest só está malfeita,, não está a saca o que o grajo está a dizer na quest.. ele quer que tenha lv e pague gold para se teleporta.. 

     

    if pc . get_level ( ) < 95 then say ("Apenas podes utilizar isto quando fores nível 95!") else

    isso precisa que tenha algo a dizer que não pode.. pq não têm lv.. tipo assim. 

     

      end        else          say_title ("teleporter:" )          say ("Não tens nivel suficiente! ")          say ("Volta quando tiveres. ")        end      else        return      end

    em baixo da quest.. isso se não pedi gold ou item.. pq se pedi precisa de mais coisa na quest.... o que estraga essa comunidade são os MOD que não ajudar ninguém. =/


  4.  

    Boas ... Coloquei um novo mapa no servidor

    e criei uma quest para fazer warp...

    até aí tudo bem... mas quando vou ao npc e me teleporto para o mapa, o char vai para as coordenadas (0,0) ...

    alguem sabe como alterar a quest para o char ir para as coordenadas (645,80)?

    Fica aqui o codigo da quest: 

    quest teleportar begin    state start begin		when 9011.chat."Teleportador" begin			if pc . get_level ( ) < 95 then 				say ("Apenas podes utilizar isto quando fores nível 95!") 			else 				say_title("Teleportador")				say("Gostarias de ir para lugares longinquos fora da tua")				say("vila? Pois mas para isso precisas de ser forte! Nao")				say("e qualquer um que consegue enfrentar os malditos Gnolls")				say("que perseguem os mais fracos ate a morte!")				say_reward("Entao, para onde gostarias de ir?")				say("")				local s = select("Ilha das Lagrimas", "Reino Preto")					if s == 1 then						pc.warp(1049600,	1510400)					else						notice("Es um Gay")					end			end		end	endend

    Link para baixa mega.https://mega.co.nz/#!2UZhALoC!ePCE_DBnDaB5DiGS4Z2y601UHsdsANgTeaMJaqgXSoILink do Virustotal.https://www.virustotal.com/pt/file/dd3e0e3ee385d4ff45a30e3fc56360506be92ed6982d9c206edde329e1978cea/analysis/1381868635/ 

     

    Qunaod tu baixar.. extrai e edita tu qual NPC vai ser o teleporte... e eidta lá o lv que queres que entre e se o jogador vai paga gold, ou da um item para entra.. depois >.>

    vai aqui...home/game/share/locale/germany/ques/objet>> depois procura o Npc que queres que sejá o teleportador..>> jogar lá tudo as três pasta.>> depois da reboot dai e só testa.. depois não esquecer de dizer deu certo.. e se acha que mreço +1 deixar ai.

     


  5. quest esperia@ begin

    state start begin

    when login or levelup with pc.get_level() >= 80 begin

    send_letter("Vai a Uriel")

    end

    when button or info begin

    say_title("Carta:")

    say("")

    say("Hey, vaiUriel ela tem algo para você.")

    say("Vai querer definitivamente dar-te uma tarefa.")

    local v = find_npc_by_vnum(20011)

    if v != 0 then

    target.vid("__TARGET__", v,"uriel")

    end

    end

    when __TARGET__.target or 20011.click begin

    target.delete("__TARGET__")

    say_title("Uriel")

    say("")

    say("Ehi "..pc.get_name().." Eu tenho uma tarefaper te.")

    say("Trata-se de 25 peças de cristal.")

    say("Você pode encontrá-los na Cave of Exile")

    say("Primeiro andar.")

    set_state("lettera_to_cristal")

    end

    end

    state lettera_to_cristal begin

    when letter begin

    send_letter("Encontre o Crystals")

    end

    when button or info begin

    local c = pc.getqf("Crystals")

    say_title("Carta:")

    say("")

    say("Uriel deu-lhe uma tarefa.")

    say("Você deve encontrar 25 peças de cristal")

    say("Exílio na caverna.")

    say("Viajando para a terra e")

    say("Executar a tarefa.")

    say("")

    say("")

    say_reward("Você ainda pode encontrar ".. c.." Cristais.")

    set_state("drop_cristalli")

    end

    end

    state drop_cristalli begin

    when 1131.kill or 1132.kill or 1133.kill or 1135.kill or 1137.kill or begin

    local cristalli = number(1,120)

    if cristalli <= 20 pc.getqf("cristalli") <= 24 then

    pc.give_item2("30203","1")

    pc.setqf("cristalli" pc.getqf("cristalli") +1)

    set_state("torna_da_uriel")

    end

    end

    end

    state torna_da_uriel begin

    when letter begin

    send_letter("Volta a Uriel")

    end

    when button or info begin

    say_title("Carta")

    say("")

    say("Bom que você encontrou objetos")

    say("você tivesse perguntado Uriel.")

    say("Volta para ele para entregá-los.")

    local v = find_npc_by_vnum(20011)

    if v != 0 then

    target.vid("__TARGET2__", v,"torna_da_uriel")

    end

    end

    when __TARGET2__.target.click or 20011.click begin

    if pc.count_item("30203") < 0 then

    target.delete("__TARGET2__")

    say_title("Uriel")

    say("")

    say("Ehi "..pc.get_name().." você está de volta")

    say("e eu vejo que você está carregando objetos")

    say("eu lhe pedi para me encontrar.")

    say("Muito bom, conseguiu e vai receber uma recompensa.")

    local consegna = select("Aqui você vai Cristais "," Eles são meus")

    if consegna == 2 then

    say("Para você, esses cristais são inúteis ")

    say("então faça como quiser. ")

    return

    else

    say("Escolhendo o direito ... ")

    say("Eu vou pegar sua recompensa ")

    say("Enquanto isso, nós entregamos Cristais ")

    pc.remove_item("30203","10")

    say("")

    say("")

    say_reward("Recompensa: ")

    say_reward("")

    say_reward("Pontos 110.000.000 Exp ")

    say_reward("HP 1000 (permanente) ")

    say_reward("Mezzuomini Bonus +15 (permanente) ")

    pc.change_gold(10000000)

    pc.give_exp2(110000000)

    affect.add_collect(apply.ATTBONUS_HUMAN,15,60*60*24*365*60)

    affect.add_collect(apply.MAX_HP,1000,60*60*24*365*60)

    set_state("fix_bonus")

    end

    end

    end

    end

    state fix_bonus begin

    when 50051.use or 50052.use or 50053.use or logout begin

    affect.remove_collect(apply.MAX_HP,1500,60*60*24*365*60)

    end

    when login or unmount begin

    affect.add_collect(apply.MAX_HP,1500,60*60*24*365*60)

    set_state("__COMPLETE__")

    end

    end

    state __COMPLETE__ begin

    end

    end -- fine quest

    Tá ai mano ;D

    A quest não esta a fuciona, quando vou dar ./qc ela não funciona se pude me ajudar dou-te +1


  6. Meti essa Quest (deu tudo bem e dei reboot) e quando vou pescador não aparece nada para ligar ela (em personagem GM).

    Isso porque deve ir até Npc (Pescado) se ajudei não custa dar +1 :)


  7. Informação: Quest para colocar na caixa premium para a dar itens, muito bom para colocar no vosso item-shop

     

    Imagem colocada

    quest cutie_premium beginstate start beginwhen 50126.use beginsay_title(“Cutie Premium :”)say(“Iti multumim pentru donatie.”)say(“Datorita celor ca tine”)say(“serverul continua sa functioneze.”)say(“Ai primit:”)say(“”)say(“”)say_reward(“Inelul Experientei, 30 zile”)say_reward(“Manusile Talharului, 30 zile”)say_reward(“Medalia Norocului, 30 zile”)say_reward(“Masca Emotiei, 30 zile”)pc.give_item2(71015, 1)pc.give_item2(71016, 1)pc.give_item2(71017, 1)pc.give_item2(71011, 1)pc.remove_item(50126, 1)endendend
    Para quem quiser alterar os itens a receber só tem que alterar estas linhas:

    pc.give_item2(71015, 1)pc.give_item2(71016, 1)pc.give_item2(71017, 1)pc.give_item2(71011, 1)
    Fonte: Pro-Area

    Utilizador: Sedativ

    Criador de Quest: Sedativ

    Tópico CG: Zeraw

    PS: Quest em Romeno, para traduzir usem o Google Tradutor não é complicado!

     

    os bau não abre -.-''