Search the Community

Boas pessoal aqui alguém sabe um site (ou algo do género) que seja bom para dicas de organização de war's etc... AGRADECIA MUITO QUE ME AJUDASSEM... Obrigado :)

Boas Pessoal. Hoje venho aqui partilhar com vocês a programação do "NPC Central" Criado por mim. Categorias e Sub-categorias Novos Jogadores -Dar Nível 105 -Apagar itens -Dar 100kk Reiniciar Habilidades Reiniciar Status Tutorial: 1- Abrir o programa que utilizam para transferências FTP 2- Ir a pasta object que está dentro da pasta quest 2.1- Cada pasta têm números esses números são o ID dos NPC´s Monstros e haveres 3- Procurar o ID do NPC que desejam que efectue esta acção 3.1- Caso o NPC em questão não tenha nenhuma pasta basta criar uma com o nome do ID do NPC 4- Abrir a pasta e mover todo o conteúdo do download para dentro da pasta Após ter concluído este tutorial terá de dar reboot Vírus Total: Créditos: Pastor Alemão# pela maioria do conteúdo Paulo Ferreira pela função de eliminar itens como base Cumprimentos Pastor Alemão#

Boas pessoal, deixo aqui uma função para fazerem uma especie de upgrade a um item para outro tipo de item qualquer, ou seja, levam um item a um npc, arrastam para cima e escolhem a item que querem que transmute... Ou seja, podem colocar a transmutar uma batalha para uma sirius, para uma venenosa, para a arma que assim entenderem... Deixo aqui a função: function pc_upgrade(cell, itemup) if item.select_cell(tonumber(cell)) then local attr = {{item2.get_attr(0)}, {item2.get_attr(1)}, {item2.get_attr(2)}, {item2.get_attr(3)}, {item2.get_attr(4)}, {item2.get_attr(5)}, {item2.get_attr(6)}} local socket = {item.get_socket(0), item.get_socket(1), item.get_socket(2)} item.remove() pc2.give_or_drop_item_and_select(itemup) for i = 1, table.getn(attr) do if tonumber(attr[i][1]) > 0 then item2.set_attr(i-1, attr[i][1], attr[i][2]) end end for i = 1, table.getn(socket) do if tonumber(socket[i]) > 0 then item.set_socket(i-1, socket[i]) end end return true end return false end Deixo aqui um exemplo para a quest: when XXX.take begin say("Update para sirius ou venenosa") local opc = select("Sirius", "Venenosa", "fechar") if opc == 3 then return elseif opc == 2 then pc_upgrade(item.get_cell(), ID_VENENOSA) elseif opc == 1 then pc_upgrade(item.get_cell(), ID_SIRIUS) endend Claro que não tem algum tipo de validações, isso façam voces. xD Btw, para uso dessa função terão de usar a lib do iMer (Lib Aqui), mais propriamente as seguintes funções da lib: item2.set_attr e item2.get_attr. Como podem ver no tópico da lib, a mesma é so para o game 34083. Como não tou com o game 2089M não me dei ao trabalho de inventar o sistema para esse game, mas é possivel usando a lf_lib que por sua vez contem o lf_item. Boas ideias, bons sistemas com isso, boa criatividade. Cumprimentos.

Reparei que na pasta quest das files do sg/wom não havia nenhuma quest do sistema de montadas melhoráveis, então decidi fazer. Não tem a parte dos .use dos selos das montadas, basta usar a ride.quest do sg que está logo tudo pronto.Sei que já existe uma quest desta e blablabla, porém o socket usado nela é o das montadas que se colocam no slot dos sapatos de vento.Esta já tem o socket correto, e além disso foi feita por mim.Quest: quest pmount begin state start begin function upgrade(vnum) local pm_up_vnums = { {52001, 52005, 50067}, {52016, 52020, 50067},{52031, 52035, 50067}, {52046, 52050, 50067},{52061, 52065, 50067},{52076, 52080, 50067}, {52006, 52010, 50068},{52021, 52025, 50068},{52036, 52041, 50068}, {52051, 52055, 50068},{52066, 52071, 50068},{52081, 52085, 50068} } say_title(mob_name(npc.get_race())) say("Ah "..pc.name.." estás aqui para melhorar") say"a tua montada é? Hm." say"" say"Dependendo do nível da tua montada, poderá " say"ser melhorada, através de um item específico.[ENTER]" wait() say_title(mob_name(npc.get_race())) for i = 1, 12 do local needed, cor, jov, sel = pm_up_vnums[i][3], pm_up_vnums[i][2], pm_up_vnums[i][1], pm_up_vnums[i][2] if vnum == cor+6 or vnum == cor+7 or vnum == cor+8 or vnum == cor+9 or vnum == cor+10 then say"A tua montada está no nível máximo." return end if vnum >= jov and vnum <= sel then say"Para melhorar esta tua montada, precisas do:" say_item_vnum(needed) say"" if select("Continuar", "Não tenho o item.") == 1 then say_title(mob_name(npc.get_race())) if pc.count_item(needed) >= 1 then if math.random(1,2) == 1 then pc.remove_item(needed, 1) pc.give_item2(vnum+5, 1) pc.remove_item(vnum, 1) say"Melhoramento efetuado com sucesso[ENTER]Recebeste:" say_item_vnum(vnum+5) else pc.remove_item(needed, 1) say("O Melhoramento falhou.") end else say("Não tens o item.") say_item_vnum(needed) return end else return end end end end function increase_time() local snacks = {{38100,7}, {38101,15}, {38102,30}} say_title(mob_name(npc.get_race())) say"Queres aumentar o tempo da tua montada?" say"Com os famosos Snacks do Poder, poderás aumentar o" say"seu tempo durante 7, 15 ou 30 dias." say"Escolhe o Snack do Poder que possuis." local c = select ("Snack do Poder - 7 Dias", "Snack do Poder - 15 Dias", "Snack do Poder - 30 Dias", "Sair") if c != 4 then local d, a, i, s = snacks[c][2], 60*60*24, snacks[c][1], item.get_socket(0) say_title(mob_name(npc.get_race())) if pc.count_item(i) >= 1 then say"A tua montada com este Snack poderá durar" say("mais "..d.." dias.") say_item_vnum(i) say"" say"Queres continuar?" if select("Sim", "Não") == 1 then item.set_socket(0, s + a*d) pc.remove_item(i, 1) say("Feito. A tua montada durará mais "..d.." dias.") else say"Volta quando quiseres" end else say_item_vnum(i) say"" say"Precisas deste Snack do Poder para proceder." end end end when 9003.take with item.vnum >= 52001 and item.vnum <= 52090 begin say_title(mob_name(npc.get_race())) local op = select("Aumentar a Duração da Minha Montada", "Evoluir a Minha Montada", "Sair") if op == 1 then pmount.increase_time() elseif op == 2 then pmount.upgrade(item.get_vnum()) end end endend

Boas Comunidade Hoje trago-vos tres pequenas quests que eu proprio escrevi e poderão fazer-vos falta caso queiram fazer um server pvp. A 1°quest davos exp a cada player que matem (nao importa reino, lvl) A 2°quest davos yang a cada player que matem (nao importa reino, lvl) A 3°quest davos um item a cada player que matem (nao importa reino, lvl) Depois dentro das () onde eu escrevi: yang desejado, exp desejada. trocam por o numero de exp/yang k voces kerem k o player ganhe Quest de exp: https://mega.co.nz/#!ERAARBSb!NYBLaghgYcc8mphgzpDDgQ88iXABjtfTMBBVo6xHpbU Quest de yang: https://mega.co.nz/#!lRxjWQxQ!EmnTgi7bKKHhaXoh7riH4yAWGqcKaqrels6-xoGXvTY Quest do item: https://mega.co.nz/#!BA502YhK!PRo0fXck_3bTzt36Q5dFIzz1CjUgHWPDt7rzQQB-_3Y

​Preciso da quest que vamos ao professor e pedimos skills a nivel 5 , é básico mas estou a precisar e não sei como a fazer a quem ajudar .

Boas, Cyber Gamers venho por este meio ver se alguem me pode ajudar ou arranjar uma quest que retire os trajes ao clicarmos na quest!! Dou +1 a quem me ajudar!!

Boas Pessoal . Bem muitos vocês já devem ter adicionado armaduras novas e ao teleportar ficam sem VD esta quest é muito útil para essas ocasiões . quest vidabug begin state start begin when login or logout begin if pc.get_hp() < 0 then affect.add_collect(apply.HP_REGEN, 100000, 5) elseif pc.get_sp() < 0 then affect.add_collect(apply.SP_REGEN, 100000, 5) end end endend Créditos pela quest By ForceBro Skype: ForceToBro Não dou permissão a nenhum membro para partilhar este conteúdo noutra comunidade pois esta quest foi feita exclusivamente para esta comunidade . Um agradecimento especial ao por ter verificado se existia algum erro . Se gostaram basta agradecer-me dando o vosso , Não custa e incentiva a continuar . Cumpz.ForceBro

Boas Pessoal . Decidi criar uma quest simples de mudar de raça ao terminar a alteração de raça irá vos aparecer também uma mensagem no chat a dizer "Mudas-te de raça com sucesso !" . quest alterar beginstate start beginwhen 30183.use begin say_title("Mudar de raça") say("Com este objecto poderás mudar a raça") say("da tua personagem.") wait() say("Atenção: Retira a tua arma , armadura e elmo ") say("") say("Quando acabares não te esqueças de alterar personagem") say("para não ficares bugado.") say_reward("Queres mesmo mudar de raça ?") say("") local main_set = select ("Sim","Não") if main_set == 2 then return endlocal razzacambiasex = select (" Guerrero "," Ninja "," Sura "," Shaman "," Mudei de ideias ... ") if razzacambiasex == 1 then local sexwar = select ("Homem","Mulher")if sexwar == 1 then pc.polymorph("4")pc.change_sex()elseif sexwar == 2 thenpc.polymorph("4")pc.change_sex()pc.polymorph("20032")pc.polymorph("1")pc.change_sex()pc.polymorph("20032")endpc.remove_item(39915,1) chat(" A tua personagem mudou de raça com sucesso ! ") elseif razzacambiasex == 2 thenlocal sexninja = select ("Homem","Mulher")if sexninja == 2 then pc.polymorph("5")pc.change_sex()elseif sexninja == 1 thenpc.polymorph("5")pc.change_sex()pc.polymorph("20032")pc.polymorph("1")pc.change_sex()pc.polymorph("20032")endpc.remove_item(39915,1)chat(" A tua personagem mudou de raça com sucesso ! ") elseif razzacambiasex == 3 thenlocal sexsura = select ("Homem","Mulher")if sexsura == 1 then pc.polymorph("6")pc.change_sex()elseif sexsura == 2 thenpc.polymorph("6")pc.change_sex()pc.polymorph("20032")pc.polymorph("1")pc.change_sex()pc.polymorph("20032")endpc.remove_item(39915,1) chat(" A tua personagem mudou de raça com sucesso ! ") elseif razzacambiasex == 4 thenlocal sexshamy = select ("Homem","Mulher")if sexshamy == 2 then pc.polymorph("7")pc.change_sex()elseif sexshamy == 1 thenpc.polymorph("7")pc.change_sex()pc.polymorph("20032")pc.polymorph("1")pc.change_sex()pc.polymorph("20032")endpc.remove_item(30183,1)chat(" A tua personagem mudou de raça com sucesso ! ") elseif razzacambiasex == 5 then return endendendend Para alterar o ID do item que desejam usar a quest basta alterar o numero "30183" que se localiza na terceira linha da quest pelo ID do item que queres usar a quest . Créditos pela quest By ForceBro Skype: ForceToBro Não dou permissão a nenhum membro para partilhar este conteúdo noutra comunidade pois esta quest foi feita exclusivamente para esta comunidade . Se gostaram basta agradecer-me dando o vosso , Não custa e incentiva a continuar . Cumpz.ForceBro

Boa Noite Galera ... Meu 2 turturial feito no forum espero que ajude alguém..... Bom no meu serve file o arquivo do npc 9012 - some toda vez que eu uso o ./qc tals... e resolvi fazer uma quest pro teleportador e fiz o seguinte... Teleporta para 10 mapas Orc,Sohan,Miokio,Torre,Catacumbas,Chun,Floresta,deserto2 e 1 e mais alguns que irão ver abaixo... Seguinte chega de papo e vamos lá ;) Instalando a quest no FTP.... Local de instalação acho que todos ja sabem neh /usr/%%$%$/share/locale/germany/quest depende do serve file... caso nao souber mi avisa que ajudo... 1º O nome da quest eu escolhi teleport_soy - isso fica a seu criterio... 2º Escolheu o nome da quest vai em quest_list adicione na ultima linha a o nome da quest lembrando que tem que conter .quest no meu caso teleport_soy.quest ... Feito isso criar 1 novo arquivo com o nome que colocou no quest_list.... 3º Adicionar a quest no arquivo e usar o .qc nome da quest e pronto... 3ª Continuação -- Se usar serve file do rancoroso apenas sh quest... 4º Se reparar say_title("Teleportador") say ("Bom "..pc.name..".") say ("Irei lhe dar um anel.") say ("Boa sorte...") wait() pc.give_item2 (70007,1) Estou usando 1 anel script criada pelo pacificador caso quere adicionar o anel ou implementar as opções de cidade no teleportador. Espero ter ajudado e se algum mode por spoiler eu agradeçeria *-* nao custa

Boas comunidade . Bem decidi criar uma quest que consiste em informar os jogadores das rates , forum , site e suporte , cada vez que entram no servidor . quest login begin state start begin when login begin say(" Servidor: ") say("") say(" Bem-Vindo de novo ao servidor ! ") say("") say(" Rates: 100% ") say("") say(" Site: Cyber-Gamers.Org ") say("") say(" Forum: Cyber-Gamers.Org ") say("") say(" Suporte: Cyber-Gamers.Org ") say("") say("") say" Noticias actualizadas a [20-10-2013] ") end endend Espero ter ajudado :) Cumpz. ForceBro

Boas Pessoal :) Bem a minha ideia tornou-se realidade graças a um grande amigo meu o qual que merece o meu respeito e confiança ele e uma grande pessoa eu fui um otario uma besta em agir como agi em outros tempos esse é o Pacificador ..... A quest têm basicamente a função do elixir mas em vez de regenerar vida ou MN chama monstros . quest autocapas begin state start begin when IDITEM.use begin -- ID do Item. if pc.getqf("ativado") == 0 then pc.setqf("ativado", 1) syschat("Ativado.") else pc.setqf("ativado", 0) syschat("Desativado.") end while pc.getqf("ativado") == 1 do pc.aggregate_monster() end end endend Em "IDITEM" colocam o item que querem que chame os monstros .... Nota: se queres dar o +1 não me dês a mim passa pelo perfil do PACIFICADOR e dá o +1 . Quest By Se vais partilhar esta quest noutra comunidade não te esqueças de copiar os créditos . Cumprimentos Pastor Alemão#

Boas Pessoal . Bem venho aqui partilhar com vocês uma ideia que tive .... Bem a minha ideia era haver um item que tivesse a função de chamar monstros teria o mesmo sistema que o elixir , pensei nisto quando upava em certos servidores PvM e custa estar sempre a clicar na tecla ou com a seta nas capas .... Eu não tenho conhecimentos suficientes para criar esta quest se alguém a quiser desenvolver :) Deixem o vosso +1 se gostaram da ideia e comentem com prós e criticas construtivas . Cumpz. Pastor Alemão#

[*] -- ######################################################################-- # ----------------------------------- #-- # Copyright © Exodius #-- # by iSouli #-- # ------------------------------------- #-- ######################################################################quest exo_userpanel begin state start begin when letter begin cmdchat("userpanel "..q.getcurrentquestindex()) end when button or info begin exo_userpanel.UserpanelStart() end function UserpanelStart() say_title("Userpanel - Exodius") say() say("Was möchtest du tun?") say() local a = select("Teleportieren","Lager öffnen","Abbrechen") if a == 3 then return elseif a == 2 then exo_userpanel.OpenSafebox() elseif a == 1 then exo_userpanel.UserWarp() end end function OpenSafebox() if not in_table(pc.get_map_index(),{1, 21, 41, 3, 23, 43}) then chat("Du darfst auf dieser Map das Lager nicht öffnen!") return end game.open_safebox() end function UserWarp() local map_select = { [1] = {[1] = {"rotes Reich Map1 (ab 1)", 474107, 954645, 1},[2] = {"gelbes Reich Map1 (ab 1)", 63294, 165936, 1},[3] = {"blaues Reich Map1 (ab 1)", 959569, 269075, 1},[4] = {"Zurück"},[5] = {"Abbrechen"}}, [2] = {[1] = {"Wüste (ab 15)", 296397, 547365, 10},[2] = {"Orktal (ab 15)", 332942, 746975, 15},[3] = {"Feuerland (ab 50)", 600906, 686661, 50},[4] = {"Eisland (ab 50)", 436269, 215805, 50},[5] = {"Geisterwald (ab 70)", 290328, 5920, 70},[6] = {"roter Wald (ab 75)", 1119342, 70092, 75},[7] = {"Zurück"},[8] = {"Abbrechen"}}, [3] = {[1] = {"SpinnendungeonI (ab 50)", 60000, 496200, 50}, [2] = {"SpinnendungeonII(ab 65)", 703605, 462962, 65}, [3] = {"SpinnendungeonII Nr.2(ab 65)", 813747, 622877, 65}, [4] = {"SpinnendungeonIII(ab 75)", 97320, 571277, 75}, [5] = {"Dämonenturm(ab 50)", 590594, 110550, 50}, [6] = {"Grotte der Heiligen(75)", 241700, 1274900, 75}, [7] = {"Zurück"},[8] = {"Abbrechen"}}, [4] = {[1] = {"palkische Gebirge(ab 75)", 1065100, 1702900, 75}, [2] = {"eisige Stadt(ab 75)", 664875, 828649, 75}, [3] = {"Naga-Tal(ab 75)", 6672900, 6690700, 75}, [4] = {"Zurück"},[5] = {"Abbrechen"}}, [5] = {[1] = {"OX-Wettbewerb", 896500, 24600, 1}, [2] = {"Zurück"},[3] = {"Abbrechen"}}, } say_title("Teleportieren") say() say("Wähle die Map-Kategorie aus!") say() local a = select("Heimatstädte", "normale Maps", "Dungeons", "neue Maps", "Eventmaps", "Abbrechen") if a == 6 then return end local tab_warp = {4} for b = 1, table.getn(map_select[a]) do table.insert(tab_warp, map_select[a][b][1]) end say_title("Teleportieren") say() say("Such dir die Map deiner Wahl aus!") say() local c = select2(tab_warp) if map_select[a][c][1] == "Abbrechen" then return end if map_select[a][c][1] == "Zurück" then return exo_userpanel.UserWarp() end if map_select[a][c][1] == "OX-Wettbewerb" and game.get_event_flag("oxevent_status") ~= map_select[a][c][4] and not pc.is_gm() then return chat("Der OX-Wettbewerb ist derzeit nicht aktiv!") end if map_select[a][c][1] == "OX-Wettbewerb" and pc.is_gm() then pc.warp(896446, 21593) return end if pc.get_level() < map_select[a][c][4] then return chat("Dein Level ist zu niedrieg!") end pc.warp(map_select[a][c][2], map_select[a][c][3]) end endend Créditos : Exodius

quest remove_polymorph begin state start begin when 9006.chat."Cancel the transformation" begin say_title("Old Lady:") say("") say("Hy, i have the force to remove the transformation,") say("but that it will cost: 10.000 Yang.") say("") say_reward("Do you agree?") local s = select ("Yes", "No") if s == 2 then return end if pc.gold < 10000 then say_title("Old Lady:") say("") say("I'm sorry but you don't have") say("enough Yang") return end if s == 1 then if not pc.is_polymorphed() then say_title("Old Lady:") say("") say("I'm sorry, but you're not transformed.") return end pc.remove_polymorph() pc.changegold(-10000) end end endend [*]Créditos : Eu Tradução .

quest shop begin state start begin when 9001.chat."Shop" begin npc.open_shop(1) setskin(NOWINDOW) end when 9002.chat."Shop" begin npc.open_shop(2) setskin(NOWINDOW) end when 9003.chat."Shop" begin npc.open_shop(3) setskin(NOWINDOW) end when 9003.chat."Shop Stone" begin npc.open_shop(4) setskin(NOWINDOW) end when 20016.chat."Shop Upgrade's I" begin npc.open_shop(5) setskin(NOWINDOW) end when 20016.chat."Shop Upgrade's II" begin npc.open_shop(6) setskin(NOWINDOW) end when 20016.chat."Shop Upgrade's III" begin npc.open_shop(19) setskin(NOWINDOW) end when 9009.chat."Shop" begin npc.open_shop(7) setskin(NOWINDOW) end when 9006.chat."Shop" begin npc.open_shop(8) setskin(NOWINDOW) end when 20015.chat."Shop" begin npc.open_shop(18) setskin(NOWINDOW) end when 20349.chat."Shop" begin npc.open_shop(20) setskin(NOWINDOW) end when 9003.chat."Shop Book's" begin if pc.get_skill_group() == 0 then say_title("General Store") say("") say("You cant open this shop, if don't") say("know nothing about fights.") return end if pc.get_skill_group() == 1 then npc.open_shop(10) setskin(NOWINDOW) end if pc.get_skill_group() == 2 then npc.open_shop(11) setskin(NOWINDOW) end if pc.get_skill_group() == 3 then npc.open_shop(12) setskin(NOWINDOW) end if pc.get_skill_group() == 4 then npc.open_shop(13) setskin(NOWINDOW) end if pc.get_skill_group() == 5 then npc.open_shop(14) setskin(NOWINDOW) end if pc.get_skill_group() == 6 then npc.open_shop(15) setskin(NOWINDOW) end if pc.get_skill_group() == 7 then npc.open_shop(16) setskin(NOWINDOW) end if pc.get_skill_group() == 8 then npc.open_shop(17) setskin(NOWINDOW) end end endend [*]Créditos : Newforce <- Quest ! #Tenho as opções em inglês pq meu server vai ser inglês.

quest welcome begin state start begin when letter begin send_letter("Welcome to VenusM2") end when button or info begin say_title("Welcome to VenusM2 !") say("") say("Step into an eastern fantasy world with picturesque") say("towns and impressive landscapes.") say("") say("Dangerous battles await you!") say("") say_reward("Become a master of martial arts and protect") say_reward("the country from the dark influence of") say_reward("Metin stones.") set_state(complete) end end state complete begin endend [*]Créditos : NewForce <- Quest Pus as falas em pt , depois traduzi para inglês !

quest npc_reset_skill begin state start begin when 9006.chat."Resetar Skills Ou Status " begin if pc.level < 5 then say_title("Lady : ") say("") say("Você primeiro precisa aprender algo") say("sobre as skills !") return end if pc.level >75 then say_title("Lady:") say("") say("Teu Lvl.: "..pc.level..", Eu não posso te ajudar.") say("Com este LvL. não pode resetar os seus status nem") say("Skills. Só a lvl 75 é que posso resetar") say("os Status ou Skills.") return end if pc.get_skill_group()==0 then say_title("Lady:") say("") say("Você não começou um estágio ainda.") return end local cost = 50000 + pc.level * 15000 say_title("Lady:") say("") say("Você está no lugar certo, seus olhos") say("mostra um monte de tristeza. Eu deixo as pessoas a") say("esquecer o seu estatuto, para que eles possam") say("começar de novo.") say("Custos: "..cost.." Yang.") say("") say_reward("Você concorda?") local s = select ("Sim", "Não") if s == 2 then return end if s == 1 then say_title("Lady:") say("") say("Haha que é possível, você não está se sentindo") say("bem? Sua cara me mostra que você precisa") say("de ajuda. Você não está satisfeito com o seu") say("status ou skills ?") say("") say_reward("Você tem certeza que quer começar") say_reward("de novo ?") local s1 = select ("Sim", "Não") if s1 == 2 then return end if s1 == 1 then if pc.money < cost then say_title("Lady:") say("") say("Eu realmente sinto muito, mas você não tem") say("suficiente Yang.") return end pc.changegold(-cost) pc.clear_skill() pc.set_skill_group(0) set_quest_state("skill_group","run") end end end endend [*]Quest by : EndoZ Traduzida por : NewForce Testada por : NewForce

--[[ -- Music Player(Funny) -- Quest Writer By : HaveBeen™]]--quest music begin state start begin when 20091.chat."Music Player" with pc.name == "HaveBeen" begin say_title(mob_name(npc.get_race())) say("") --- say("Enter the music name") say("") local name = input() if(name == "" or name == nil) then return end say_title(mob_name(npc.get_race())) say("") --- local mapindex = {1,21,41} -- Shinsoo,Chunjo,Jinno MapIndex i = 0 repeat i = i + 1 add_bgm_info(mapindex[i],name..".mp3") until i == table.getn(mapindex) say("Completed thanks.. ") say("") end endend

## Quest By NewForce# Corrigida Por Pacificador# Enjoy ! quest newforce begin state start begin when 20092.chat."Marmores" begin say("Queres receber 50 mármores?") if select("Sim", "Não") == 1 then pc.give_item2(70024,50) end end endend [*]Créditos : Eu Por Fazer A Quest . PACIFICADOR : Por corrigir a quest Bom aproveito .

Quest Criada Por MIM !Item Utilizado : Quest : ----------------------------------------------|-- Quest By NewForce ! --|-- Criado desenvolvida por NewForce --|-- é a minha 1 quest --|----------------------------------------------| quest colocar_habilidades_a_p begin state start begin when 40001.use begin say("Boas ..pc.get_name().." se quiseres ter as tuas habilidades a p ! Estás no bom caminho !) say("Com esta pedra meto-te os skills a P") say("De graça.") say("Portanto, quando resetares os teus skills ,") say("Poderás utilizarme todas as vezes que quiseres ! ") say_reward("Colocar Skills A P") local habs = select ("Warrior" , "Ninja" , "Sura" , "Shaman" , "Saír") if habs == 1 then say("Pedra Iris :") say("És Guerreiro Corpo ou Mental?") say_reward("Escolhe a tua Arte ...") local guerr = select ("Corpo", "Mental", "Saír") pc.set_skill_level(1,59) pc.set_skill_level(2,59) pc.set_skill_level(3,59) pc.set_skill_level(4,59) pc.set_skill_level(5,59) pc.set_skill_level(6,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif guerr == 2 then pc.set_skill_level(16,59) pc.set_skill_level(17,59) pc.set_skill_level(18,59) pc.set_skill_level(19,59) pc.set_skill_level(20,59) pc.set_skill_level(21,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif guerr == 3 then return end elseif habs == 2 then say("És Ninja Adagas ou Arco?") say_reward("Escolhe a tua Arte") local ninj = select ("Adagas", "Arco", "Fechar") if ninj == 1 then pc.set_skill_level(31,59) pc.set_skill_level(32,59) pc.set_skill_level(33,59) pc.set_skill_level(34,59) pc.set_skill_level(35,59) pc.set_skill_level(36,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif ninj == 2 then pc.set_skill_level(46,59) pc.set_skill_level(47,59) pc.set_skill_level(48,59) pc.set_skill_level(49,59) pc.set_skill_level(50,59) pc.set_skill_level(51,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif ninj == 3 then return elseif habs == 3 then say("És Sura Magias ou Armas?") say_reward("Escolhe a tua Arte") local sur = select ("Magia Negra", "Armas", "Fechar") if sur == 1 then pc.set_skill_level(76,59) pc.set_skill_level(77,59) pc.set_skill_level(78,59) pc.set_skill_level(79,59) pc.set_skill_level(80,59) pc.set_skill_level(81,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif sur == 2 then pc.set_skill_level(61,59) pc.set_skill_level(62,59) pc.set_skill_level(63,59) pc.set_skill_level(64,59) pc.set_skill_level(65,59) pc.set_skill_level(66,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif sur == 3 then return end elseif habs == 4 then say("És Shaman Dragão ou Cura?") say_reward("Escolhe a tua Arte") local cham = select ("Dragão", "Cura", "Fechar") if cham == 1 then pc.set_skill_level(91,59) pc.set_skill_level(92,59) pc.set_skill_level(93,59) pc.set_skill_level(94,59) pc.set_skill_level(95,59) pc.set_skill_level(96,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif cham == 2 then pc.set_skill_level(106,59) pc.set_skill_level(107,59) pc.set_skill_level(108,59) pc.set_skill_level(109,59) pc.set_skill_level(110,59) pc.set_skill_level(111,59) chat("Prontos já tens as tuas habilidades Perfect Master!") item.remove() elseif cham == 3 then return end elseif habs == 5 then return end end endend Créditos : Eu !

quest autopotas beginstate start begin when 53501.use begin say_title ("Autopotas") say_red ("Bienvenido Joven viajero, este cofre que has obtenido te concedera 1 de los maravilloses elixires") say_red ("Elixir del Sol, o Elixir de la Luna") say_red ("Cual quieres?") local autopotas = select (" Elixir del Sol", "Elixir de la Luna", "Me lo he pensado mejor ninguno") if autopotas == 1 then say_item_vnum ("72726") local elixirs = select ("Comprar", "Salir") if elixirs == 1 then pc.give_item2("72726", 1) pc.remove_item("53501", 1) elseif elixirs == 2 then return end elseif autopotas == 2 then say_item_vnum ("72730") local elixirl = select ("Comprar", "Salir") if elixirl == 1 then pc.give_item2("72730", 1) pc.remove_item("53501", 1) elseif elixirl == 2 then return end elseif autopotas == 3 then return end endendend PRINTS : http://puu.sh/VuNG [*]2 PRINT : http://puu.sh/VuLM Créditos : BlackLotus

quest panamera_rates begin state start beginwhen 11000.chat."GM: Activar Rates Automaticos" or 11002.chat."GM: Activar Rates Automaticos" or 11004.chat."GM: Activar Rates Automaticos" with pc.is_gm() beginsay_title("Guarda:")say("Aqui­ podes activar a Rates do servidor.")say("Cada 20 horas se actualizarem. Por tanto,")say("nao vais necesitar de preocuparte si esta")say("activo ou não.")say("")say_reward("¿Qué queres haceder?")local s = select("Activar Rates","Desactivar Rates","Sair")if s == 1 thensay_title("Guarda:")say("Queres activar as rates ?")local a = select("Sim", "Nao")if 1 == a thensay("Rates Activadas !")server_loop_timer("autorates", 20*60*60)__give_empire_priv(0, 1, 100, 24*60*60)__give_empire_priv(0, 2, 200, 24*60*60)__give_empire_priv(0, 4, 200, 24*60*60)endendif s == 2 thensay_title("Guarda:")say("Os rates foram desactivados !.")clear_server_timer("autorates")endendwhen autorates.server_timer begin__give_empire_priv(0, 1, 100, 24*60*60)__give_empire_priv(0, 2, 200, 24*60*60)__give_empire_priv(0, 4, 200, 24*60*60)endendend Quest Rates Automaticos ------ -- Criada por ElRaulxX -------------- -- Exclusiva de Metin2Panamera ------ -- e Metin2 Zone -------------- --------------------------------------

quest myexp begin state start begin when kill with not npc.is_pc() and pc.getqf("block_exp") == 1 begin pc.give_exp(-pc.get_next_exp() + pc.get_exp()) end when iditem.use begin if pc.getqf("block_exp") == 1 then pc.setqf("block_exp", 0) else pc.setqf("block_exp", 1) end end endend Fonte : Metin2Zone !Créditos : Dextrok.

Boas pessoal trago aqui uma quest para troca de nome, traduzida por mim: Créditos: Sinval (forneceu-me a quest) Se te ajudei ou gostaste dá +1 :D Cumprimentos CroSSie