Search the Community

Olá pessoal hoje venho partilhar com todos vcs uma quest que permite vcs irem a um npc e ver quantos kills têm nos 3 reinos;) Quest : Créditos : [*]epvp Cumprimentos .

quest raking begin state start begin when 20095.chat."Ranking" begin local rangliste = mysql_query("SELECT * FROM player.player WHERE player.name NOT LIKE '[%]%' ORDER BY player.level DESC, player.exp DESC","root","rootpw","player","rootip") say_title("Top 15") say("#: Nombre Nivel ") say("Top 1: "..rangliste.name[1].." "..rangliste.level[1].." ") say("Top 2: "..rangliste.name[2].." "..rangliste.level[2].." ") say("Top 3: "..rangliste.name[3].." "..rangliste.level[3].." ") say("Top 4: "..rangliste.name[4].." "..rangliste.level[4].." ") say("Top 5: "..rangliste.name[5].." "..rangliste.level[5].." ") say("Top 6: "..rangliste.name[6].." "..rangliste.level[6].." ") say("Top 7: "..rangliste.name[7].." "..rangliste.level[7].." ") say("Top 8: "..rangliste.name[8].." "..rangliste.level[8].." ") say("Top 9: "..rangliste.name[9].." "..rangliste.level[9].." ") say("Top 10: "..rangliste.name[10].." "..rangliste.level[10].." ") say("Top 11: "..rangliste.name[11].." "..rangliste.level[11].." ") say("Top 12: "..rangliste.name[12].." "..rangliste.level[12].." ") say("Top 13: "..rangliste.name[13].." "..rangliste.level[13].." ") say("Top 14: "..rangliste.name[14].." "..rangliste.level[14].." ") say("Top 15: "..rangliste.name[15].." "..rangliste.level[15].." ") local s = select("Sair") elseif s == 1 then return end endendCréditos : serex

boas pessoal hoje venho trazer uma quest dos pet's officiais ! (PS : VI NA EPVP :) XML PACK : ICONS : Phoenix1 phoenix2 reindeer_young pwahuang1 pwahuang1-sound dog_young lion_young pig_young tiger_young npc-list & mob_proto ( Client e ServerSide) root,eix/.epk ---&--#62; NPC LIST mob_proto / ClientSide mobproto querry/ Serverside itemlist & item_proto (Client- & Serverside) locale_de.eix/epk / itemlist.txt item_proto / Clientside item_proto querry / Serverside Senha Para Extrair - epvp Créditos : Não o vi por isso não coloco !

Uma Quest criada pelo um membro KeKo da equipa do World of Metin2.A quest consiste ao matarem uma metin recebem x esferas(configurável ao vosso gosto), essas mesmas esferas servem para trocarem num npc que receberás um item a tua escolha.Quest Completa: quest puntos_metin beginstate start beginwhen kill begin local metin = { [8001] = {1,"Metin de Dolor"}, [8002] = {1,"Metin de Combate"}, [8003] = {2,"Metin de Batalla"}, [8004] = {2,"Metin de Avaricia"}, [8005] = {3,"Metin Negro"}, [8006] = {3,"Metin de Oscuridad"}, [8007] = {3,"Metin de Celos"}, [8008] = {4,"Metin de Alma"}, [8009] = {4,"Metin de Sombra"}, [8010] = {5,"Metin de Dureza"}, [8011] = {5,"Metin de Demonio"}, [8012] = {6,"Metin de Caida"}, [8013] = {6,"Metin de Muerte"}, [8014] = {8,"Metin Asesino"}, [8024] = {10,"Metin Pung-Ma"}, [8025] = {11,"Metin de Ma-An"}, [8026] = {12,"Metin de Tu-Young"}, [8027] = {13,"Metin Jeon-Un"} } pc.give_item2("27003",metin[npc.get_race()][1]) chat("Has destruido un "..metin[npc.get_race()][2]..", obtienes "..metin[npc.get_race()][1].." esferas de metin") end when 20012.chat."Canjeo de Puntos Metin" begin say_title("Canjeo de Puntos Metin") say("") say("Buenas "..pc.get_name().." aqui podras canjear Puntos Metin") say("que puedes conseguir destruyendo los diferentes") say("metines que te encontraras en el server") say("") say("Cada metin te dara una cantidad diferente de puntos") say("en estos momentos tienes "..pc.count_item("27003").." Puntos Metin") say("") say("Que quieres hacer?") say("") local canj = select ("Canjearlos" , "Cerrar") if canj == 1 then say_size(350,355) say_title("Canjear Puntos Metin") say("") local elegir = select("Item1","Item2","Item3","Item4","Item5","Item6","Item7","Cancelar") local premios = { {27002,1,27003,1}, {27002,5,27003,2}, {27002,10,27003,3}, {27002,15,27003,4}, {27002,50,27003,5}, {27002,100,27003,6}, {27002,200,27003,7} } if elegir != 8 then if pc.count_item(premios[elegir][3]) < premios[elegir][4] then say_title("Canjear Puntos Metin") say("") say("Lo siento, no tienes los puntos necesarios") say("para comprar este objeto") say("") say("Necesitas tener "..premios[elegir][4]-pc.count_item(premios[elegir][3]).." mas para comprarlo") say("vuelve cuando hayas conseguido los que te faltan") say("") return end pc.give_item2(premios[elegir][1],premios[elegir][2]) pc.remove_item(premios[elegir][3],premios[elegir][4]) end end endendendEditar as metins:local metin = { [8001] = {1,"Metin de Dolor"}, [8002] = {1,"Metin de Combate"}, [8003] = {2,"Metin de Batalla"}, [8004] = {2,"Metin de Avaricia"}, [8005] = {3,"Metin Negro"}, [8006] = {3,"Metin de Oscuridad"}, [8007] = {3,"Metin de Celos"}, [8008] = {4,"Metin de Alma"}, [8009] = {4,"Metin de Sombra"}, [8010] = {5,"Metin de Dureza"}, [8011] = {5,"Metin de Demonio"}, [8012] = {6,"Metin de Caida"}, [8013] = {6,"Metin de Muerte"}, [8014] = {8,"Metin Asesino"}, [8024] = {10,"Metin Pung-Ma"}, [8025] = {11,"Metin de Ma-An"}, [8026] = {12,"Metin de Tu-Young"}, [8027] = {13,"Metin Jeon-Un"} }- Entre [ ] temos o ID da metin- entre { } temos o numero de esferas que dropa e o nome da metin O numero antes da virgula é o numero de esferas que dropa entre " " é o Nome da metinEditar Item's e quantidade necessária de esferas para trocar os mesmos.local elegir = select("Item1","Item2","Item3","Item4","Item5","Item6","Item7","Cancelar")- Aqui podem adicionar os items que quiserem, a quest tem como padrão 7.local premios = { --Item 1 {27002,1,27003,1}, -- Premio1 --Item 2 {27002,5,27003,2}, -- Premio2 --Item 3 {27002,10,27003,3}, -- Premio3 --Item 4 {27002,15,27003,4}, --Premio4 --Item 5 {27002,50,27003,5}, --Premio5 --Item 6 {27002,100,27003,6}, --Premio6 --Item 7 {27002,200,27003,7} --Premio7 }- É claro que quantos mais items adicionarem mais linhas terão de meter no código a cima adicionando mais um item.- O 27002 é o item que te vai dar.- O segundo elemento é a quantidade do prémio.- O treceiro elemento é o ID das esferas dropadas nas metins.- O quarto elemento é a quantidade de esferas necessárias para poderes troca-las com o item.Créditos da quest: KeKo

Bom Galera Aki Venho Deixa uma Simples Quest do Evento TochaPS : Ainda nao testei.quest tocha begin state start begin when letter with pc.is_gm() begin send_letter ( "Painel da Tocha" ) endwhen button or info beginlocal b = select("Começar", "Acabar", "Sair") if b == 1 then game.set_event_flag("tocha", 1) game.set_event_flag("tocha_kill", 5)game.get_event_flag("tocha_kill_count1", 0)game.get_event_flag("tocha_kill_count2", 0)game.get_event_flag("tocha_kill_count3", 0)notice_all("A Guerra da Tocha começou!!")notice_all("Boa Sorte para Os Reinos!")npc.purge()say_reward("Guerra da Tocha")say("Voce ativou a guerra!")wait()regen_in_map(63, "data/dungeon/tochared.txt")regen_in_map(63, "data/dungeon/tochablue.txt")regen_in_map(63, "data/dungeon/tochayellow.txt") elseif b == 2 then if game.get_event_flag("tocha") == 1 thengame.set_event_flag("tocha", 0) say("")say("Voce conclui com exito o evento tocha!") game.set_event_flag("tocha_kill", 2)game.get_event_flag("tocha_kill_count1", 0)game.get_event_flag("tocha_kill_count2", 0)game.get_event_flag("tocha_kill_count3", 0)warp_all_to_village( pc.get_map_index() , 5 )notice_all("O Evento tocha Foi finalizado..")npc.purge()else say("")say("Não pode terminar o evento,")say("pois ainda nem o começou...")say("")endelseif b == 3 then return endendwhen 11506.kill with pc.get_map_index() == 63 beginnation = { "Shinsu" , "Chunjo" , "Jinno" }notice_all ( "A Tocha Do Reino Blue foi Destruida pelo Reino " .. nation [ pc . getempire ( ) ] .. " !" )game.set_event_flag("tocha_kill_count"..pc.get_empire(), game.get_event_flag("tocha_kill_count"..pc.get_empire()) + 1)endwhen 11507.kill with pc.get_map_index() == 63 beginnation = { "Shinsu" , "Chunjo" , "Jinno" }notice_all ( "A Tocha Do Reino Red foi Destruida pelo Reino " .. nation [ pc . getempire ( ) ] .. " !" )game.set_event_flag("tocha_kill_count"..pc.get_empire(), game.get_event_flag("tocha_kill_count"..pc.get_empire()) + 1)endwhen 11508.kill with pc.get_map_index() == 63 beginnation = { "Shinsu" , "Chunjo" , "Jinno" }notice_all ( "A Tocha Do Reino Yellow foi Destruida pelo Reino " .. nation [ pc . getempire ( ) ] .. " !" )game.set_event_flag("tocha_kill_count"..pc.get_empire(), game.get_event_flag("tocha_kill_count"..pc.get_empire()) + 1)endwhen 11506.kill or 11507.kill or 11508.kill with pc.get_map_index() == 63 beginif game.get_event_flag("tocha_kill_count1") == game.get_event_flag("tocha_kill") orgame.get_event_flag("tocha_kill_count2") == game.get_event_flag("tocha_kill") orgame.get_event_flag("tocha_kill_count3") == game.get_event_flag("tocha_kill") thenelseif npc.is_pc() and npc.get_empire ~= pc.get_empire() thengame.set_event_flag("tocha_kill_count"..pc.get_empire(), game.get_event_flag("tocha_kill_count"..pc.get_empire()) + 1)notice_in_map("Pontuação atual: Shinsoo: "..game.get_event_flag("tocha_kill_count1").." Chunjo: "..game.get_event_flag("tocha_kill_count2").." Jinno: "..game.get_event_flag("tocha_kill_count3").."")if game.get_event_flag("tocha_kill_count1") == game.get_event_flag("tocha_kill") thennotice_all("Reino Shinsoo Ganho a Guera De Encruzilhada!!!")notice_all(" Mais uma vez, revela-se o mais poderoso reino!")game.set_event_flag("tocha", 0)game.set_event_flag("tohca_kill_count", 2)game.set_event_flag("tohca_kill_count1" , 0 )game.set_event_flag("tohca_kill_count2" , 0 )game.set_event_flag("tohca_kill_count3" , 0 )npc.purge()warp_all_to_village( pc.get_map_index() , 5 )__give_empire_priv(1, 4, 100, 60*60*24)notice_all("O Reino Shinsoo Tera aumento de 100% da Experiencia por 24Horas!")elseif game.get_event_flag("tocha_kill_count2") == game.get_event_flag("tocha_kill") thennotice_all("Reino Chunjo Ganho a Guera De Encruzilhada!!!")notice_all(" Mais uma vez, revela-se o mais poderoso reino!")game.set_event_flag("tocha", 0)game.set_event_flag("tohca_kill_count", 2)game.set_event_flag("tohca_kill_count1" , 0 )game.set_event_flag("tohca_kill_count2" , 0 )game.set_event_flag("tohca_kill_count3" , 0 )npc.purge()warp_all_to_village( pc.get_map_index() , 5 )__give_empire_priv(2, 4, 100, 60*60*24)notice_all("O Reino Chunjo Tera aumento de 100% da Experiencia por 24Horas!")elseif game.get_event_flag("tocha_kill_count3") == game.get_event_flag("tocha_kill") thennotice_all(" Reino Jinno Ganho a Guera De Encruzilhada!")notice_all(" Mais uma vez, revela-se o mais poderoso reino!")game.set_event_flag("tocha", 0)game.set_event_flag("tohca_kill_count", 2)game.set_event_flag("tohca_killl_count1" , 0 )game.set_event_flag("tohca_kill_count2" , 0 )game.set_event_flag("tohca_kill_count3" , 0 )npc.purge()warp_all_to_village( pc.get_map_index() , 5 )__give_empire_priv(3, 4, 100, 60*60*24)notice_all("O Reino Jinno Tera aumento de 100% da Experiencia por 24Horas!")endendendendendOs Arquivos basta vc criar 3 txt cada 1 com o nometocharedtochabluetochayellowe dentro coloca a warp onde vc quer q caia as tochas no desertoEx :m 892 601 10 10 0 0 9999s 100 1 11508m 881 605 10 10 0 0 9999s 100 1 20037m 886 587 10 10 0 0 9999s 100 1 20037m 875 594 10 10 0 0 9999s 100 1 20037m 891 598 10 10 0 0 9999s 100 1 20037Bom Isso ae Glr..

Bem hoje vou vos trazer uma quest de painel gm. Se houver mais um tópico sobre isto podem apagar este. Link da quest: https://mega.co.nz/#...re3rQeP8RSci0qIVirusTotal : https://www.virustot...sis/1370984668/Instalação: Metem esta quest no seguinte directório: /usr/home/game/share/locale/germany/quest (este diretório pode mudar de files para files)Depois fazem: cd(espaço)/usr/home/game/share/locale/germany/quest./qc painel_gm.quest e já tá.Créditos- Retirado das Server Files by VMP.Tutorial, upload e scan: Eu

Nada para fazer, então decidi fazer esta quest. Lembrei-me daquela que se tinhamos um bilhete de equitação podiamos montar um cavalo durante x minutos. Então fiz mas com montadas. Não coloquei todas as montadas porque alguém podia não as ter. Acho que é bastante fácil editar a quest. quest testarmontadas begin state start begin when 20349.chat."Testar as Montadas" begin local npc = "Rapaz do Estábulo" local pergunta = "Queres?" local bilhete = 50083 local n = "Lamento, não tens o bilhete." local pergmont = "Que montada queres?" local s = "Montaste a montada que escolheste durante 10 min." local tempo = 600 local montnorm = {{20110}, {20111}, {20112}, {20113}} local montesp = {{20114}, {20115}, {20116}, {20117}, {20118}} local tigres = {{20219}, {20220}, {20221}, {20222}, {20207}, {20208}} local outras = {{20205}, {20206}, {20119}, {20121}, {20122}} say_title(npc) say("Olá "..pc.get_name().."") say("Existem uma variedade de montadas, e se não tiveres") say("o selo delas, não as poderás montar. Algumas dão") say("algum bónus, outras não. Mas eu dou-te a") say("possibilidade de experimentares as montadas ") say("durante 10 minutos. Só precisas de me entregar") say("um Bilhete de Equitação.") say_item_vnum(bilhete) wait() say_title(npc) say(pergmont) local a = select ("Montadas Normais", "Montadas Especiais", "Tigres Reais", "Outras", "Sair") if a == 1 then say_title(npc) say(pergmont) local norm = select ("Javali", "Lobo", "Tigre", "Leão", "Sair") if norm != 5 then if pc.count_item(bilhete) < 1 then say_title(npc) say(n) else say_title(npc) say(s) pc.mount(montnorm[norm][1], tempo) pc.remove_item(bilhete, 1) end end elseif a == 2 then say_title(npc) say(pergmont) local esp = select ("Leão Branco", "Javali da Guerra", "Lobo de Combate", "Tigre da Tempestade", "Leão da Batalha", "Sair") if esp != 6 then if pc.count_item(bilhete) < 1 then say_title(npc) say(n) else say_title(npc) say(s) pc.mount(montesp[esp][1], tempo) pc.remove_item(bilhete, 1) end end elseif a == 3 then say_title(npc) say(pergmont) local tigr = select ("Tigre Real Azul", "Tigre Real Vermelho", "Tigre Real Dourado", "Tigre Real Verde", "Tigre Real Cinzento", "Tigre Real Branco", "Sair") if tigr != 7 then if pc.count_item(bilhete) < 1 then say_title(npc) say(n) else say_title(npc) say(s) pc.mount(tigres[tigr][1], tempo) pc.remove_item(bilhete, 1) end end elseif a == 4 then say_title(npc) say(pergmont) local outr = select ("Predador Polar", "Panda Blindado", "Equus", "Equus Púrpura", "Cometa", "Sair") if outr != 6 then if pc.count_item(bilhete) < 1 then say_title(npc) say(n) else say_title(npc) say(s) pc.mount(outras[outr][1], tempo) pc.remove_item(bilhete, 1) end end end end end end

Não critiquem por já cá existir, simplesmente não tinha nada para fazer. Limitei-me a escrever a quest da maneira mais pequena possível e que soubesse >.> quest teleport begin state start begin when 70007.use begin local item = "Anel de Teleporte" local pergunta = "Onde queres ir?" local gogo = "Vais ser teleportado." local coordenadas = { {969600, 278400}, {873100, 242600}, {469300, 964200}, {360800, 877600}, {55700, 157900}, {138500, 234900} } say_title(item) say(pergunta) local a = select ("Cidade 1 Azuis", "Cidade 2 Azuis", "Cidade 1 Vermelhos", "Cidade 2 Vermelhos", "Cidade 1 Amarelos", "Cidade 2 Amarelos", "Sair") if a != 7 then say_title(item) say(gogo) wait() pc.warp(coordenadas[a][1], coordenadas[a][2]) end end end end

Boas pessoal, deixo aqui uma quest para fazerem um item se dropar ao matar monstros através de uma quest. Download: https://mega.co.nz/#!olVDUaqb!PrXLR2PzQ-te1f1JwkUdfA1lRYUZUoLQLyw9lLkF4Kw Virus Total: https://www.virustotal.com/pt/file/d75295071cf5b3cc6b20b94c3fe04e797f66ffed708a3df5ed15ebd1df71ab64/analysis/1369827377/ Qualquer erro/dúvida postem aqui. PS: Não foi testado pois estou em trabalho. Logo testo e arranjo para a V2. Créditos: Eu. Cumprimentos.

Boas , cyber-gamers.org Hoje vim postar uma quest de guerra de reinos metin2 :D Como instalar a quest ? 1- Vão fazer o download da quest (está no fim do topico) 2- Editam as falas se quiserem 3- Pegam na quest e poem no fillezilla/winscp ou putty . 4- Feito isso , ter colocado a quest no fillezilla , têm que ir a quest.list ou locale.list e por la o nome da quest que vai ser : guerradereinos.quest . 5- Vão ao virtualbox põe o directorio , no meu caso é : /usr/home/channel/share_data/locale/hongkong/quest 6- Depois vão fazer ./qc guerradereinos.quest ou dão /reload q no jogo :D Download : http://www.4shared.com/file/SwjLqYwU/guerradereinos.html Virus Total : https://www.virustotal.com/pt/file/f76b9f06d586ebc5c4de4e707599a68d0937ccafd691f7780f4c925ce482d10a/analysis/1368363485/

Boas pessoal, vim aqui à cyber para tirar uma dúvida, que é óbvia para voces, mas moi-me um pouco a cabeça, porque é a primeira quest que faço desde o zero. Tentei procurar por paieis de controlo, onde pudesse fazer várias coisas, mas parece que não existem, então criei eu próprio, mas acho que tem alguns erros, por isso peço que me ajudem a resolve-los pff. quest random beginstate start begin when login begin set state(painel) endstate painel begin when letter begin send_letter ( "Painel de Controlo" ) end when button or info begin say_title ( "Painel de Controlo" ) say ( "" ) say ( "Bem-vindo ao painel de controlo do tgmt2," ) say ( "podes usa-lo para executar multi-funcoes" ) say ( "como: teleportes, abrir armazem, abrir" ) say ( "loja de itens, jogar na lotaria tuga e" ) say ( "muitas mais funcoes que podes encontrar" ) say ( "neste painel exclusivo do servidor!" ) say ( "" ) say_reward ( "Escolhe o tipo de funcao que queres executar. " ) say_reward ( "Script by full" ) local a = select ( "Teleportes", "Armazem", "Reportar Jogador", "Kills", "Fechar" ) if a == 1 then say_title ( "Painel de Controlo - Teleportes" ) say ( "" ) say_reward ( "Escolhe o tipo de teleporte a realizar." ) local b = select ( "Reinos", "Mapas", "Cancelar" ) if b == 1 then say_title ( "Painel de Controlo - Teleportes Reinos" ) say ( "" ) say_reward ( "Escolhe o reino para onde queres ir." ) local c = select ( "Azul", "Vermelho", "Amarelo", "Cancelar" ) if c == 1 then say_title ( "Reino Azul" ) say_reward ( "Estas a ser teleportado, boa viagem!" ) say_reward ( "Script by full" ) pc.warp ( 969600 , 278400 ) elseif c == 2 then pc.warp ( 469300 , 964200 ) elseif c == 3 then pc.warp ( 55700 , 157900 ) elseif c == 4 then return end end end end end end if b == 2 then say_title ( "Painel de Controlo - Teleportes Mapas" ) say ( "" ) say_reward ( "Escolhe o mapa para onde queres ir." ) local d = select ( "Vale Seungryong", "Atlantida (Piso 1)", "Atlantida (Piso 2)", "V3", "Cancelar" ) if d == 1 then say_title ( "Vale Seungryong" ) say_reward ( "Estas a ser teleportado, boa viagem!" ) say_reward ( "Script by full" ) pc . warp ( 346400 , 733200 ) if d == 2 then say_title ( "Atlantida (Piso 1)" ) say_reward ( "Estas a ser teleportado, boa viagem!" ) say_reward ( "Script by full" ) pc . warp ( 10000 , 1207800 ) if d == 3 then say_title ( "Atlantida (Piso 2)" ) say_reward ( "Estas a ser teleportado, boa viagem!" ) say_reward ( "Script by full" ) pc . warp ( 241300 , 1275500 ) if d == 4 then say_title ( "V3" ) say_reward ( "Estas a ser teleportado, boa viagem!" ) say_reward ( "Script by full" ) pc.warp ( 51200 , 563200 ) if d == 5 then return end end end end end end if a == 2 then say_title ( "Armazem" ) say ( "" ) say_reward ( "Escolhe oque fazer no teu armazem." ) local e = select ( "Abrir o Armazem", "Abrir Loja de Itens", "Cancelar" ) if e == 1 then game.open_safebox() setskin(NOWINDOW) end if e == 2 then game.open_mall() setskin(NOWINDOW) end if e == 3 then return end end end end end if a == 3 then say_title("Reportar jogador") say("IMPORTANTE: Abusar deste sistema vai conduzir a um [img]http://cyber-gamers.org/public/style_emoticons/<#EMO_DIR#>/ban.gif[/img]!") say("Aqui tu podes reportar quem achas que está") say("a jogar incorretamente e que tem de ser punido.") say("Podes reportar o player por:") say("Uso de hacks.") say("Uso de linguagem não adquada.") say("Fazer-se passar por gm.") say("Roubo de algum item.") say("Aproveitar-se de um bug do servidor.") say("") say_reward("Tens a certeza que queres reportar alguém?") local a = select("Sim","Não") if a == 2 then return end say_title("Reportar jogador") say("IMPORTANTE: Abusar deste sistema vai conduzir a um [img]http://cyber-gamers.org/public/style_emoticons/<#EMO_DIR#>/ban.gif[/img]!") say("Qual é o nome do jogador que queres reportar?") say("") say_reward("Escreve o nome do jogador corretamente.") local name = input() if name == "" then return end local u_vid = find_pc_by_name(name) if u_vid == 0 then say_title("Reportar jogador") say("IMPORTANTE: Abusar deste sistema vai conduzir a um [img]http://cyber-gamers.org/public/style_emoticons/<#EMO_DIR#>/ban.gif[/img]!") say("Esse jogador não está online.") return end say("Reportas o jogador devido a quê?") local reporter = pc.get_name() local b = select("Uso de hacks", "Linguagem não adquada", "Passar-se por gm", "Roubo de itens", "Aproveitar-se de um bug", "Outro") if b == 1 then char_log(1, reporter, name) elseif b == 2 then char_log(2, reporter, name) elseif b == 3 then char_log(3, reporter, name) elseif b == 4 then char_log(4, reporter, name) elseif b == 5 then char_log(5, reporter, name) else return end say_title("Reportar jogador") say("IMPORTANTE: Abusar deste sistema vai conduzir a um [img]http://cyber-gamers.org/public/style_emoticons/<#EMO_DIR#>/ban.gif[/img]!") say("IMPORTANTE: O teu nome também foi registado em caso de mentira!") say("Obrigado por reportares.") say("A equipa do servidor vai investigar brevemente.") if a == 4 then when kill with npc.is_pc() begin pc.setqf("conta_kills", pc.getqf("conta_kills")) say_title("Contador de Kills") say("") say("Boas "..pc.get_name().."") say("") say("Aqui podes ver quantos jogadores") say("matas-te durante a tua jornada no") say("TGMT2!") wait() say_title("Ja matas-te:") say("") say_reward("".. pc.getqf("conta_kills") .." jogadores.") say("") say("A equipa TGMT2 deseja-te um bom jogo!") say("") if a == 5 then return end endend Cumprimentos, fullgamerpt

Como no tópico n tinha créditos dexo apenas fonte : mt2zone quest evento beginstate start beginwhen idnpc.chat."Evento de minerales" begin -- pones la id del npcsay_title("Evento de Minerales")say("")say("Buenas "..pc.get_name().." si me traes 200 minerales")say("sean de lo que sean, te dare un objeto")say("")say("Tienes alguno para mi?")say("")local eleg = select ("Si" , "No")if eleg == 1 thensay_title("Evento de Minerales")say("")say("Que mineral tienes?")say("")local min = select ("Mineral 1" , "Mineral 2" , "Mineral 3" , "Mineral 4" , "Mineral 5" , "Mineral 6" . "Mineral 7" , "Cerrar") -- ponle el nombre de cada unoif min == 1 thenif pc.count_item("idmineral") < 200 then -- pones la id del mineralchat("Lo siento no tienes mineral suficiente, traeme 200")returnendpc.remove_item("idmineral", 200) -- pones la id del mineralpc.give_item2("iditem", cantidad) -- pones la id del premio y la cantidadelseif min == 2 thenif pc.count_item("idmineral") < 200 then -- pones la id del mineralchat("Lo siento no tienes mineral suficiente, traeme 200")returnendpc.remove_item("idmineral", 200) -- pones la id del mineralpc.give_item2("iditem", cantidad) -- pones la id del premio y la cantidadelseif min == 3 thenif pc.count_item("idmineral") < 200 then -- pones la id del mineralchat("Lo siento no tienes mineral suficiente, traeme 200")returnendpc.remove_item("idmineral", 200) -- pones la id del mineralpc.give_item2("iditem", cantidad) -- pones la id del premio y la cantidadelseif min == 4 thenif pc.count_item("idmineral") < 200 then -- pones la id del mineralchat("Lo siento no tienes mineral suficiente, traeme 200")returnendpc.remove_item("idmineral", 200) -- pones la id del mineralpc.give_item2("iditem", cantidad) -- pones la id del premio y la cantidadelseif min == 5 thenif pc.count_item("idmineral") < 200 then -- pones la id del mineralchat("Lo siento no tienes mineral suficiente, traeme 200")returnendpc.remove_item("idmineral", 200) -- pones la id del mineralpc.give_item2("iditem", cantidad) -- pones la id del premio y la cantidadelseif min == 6 thenif pc.count_item("idmineral") < 200 then -- pones la id del mineralchat("Lo siento no tienes mineral suficiente, traeme 200")returnendpc.remove_item("idmineral", 200) -- pones la id del mineralpc.give_item2("iditem", cantidad) -- pones la id del premio y la cantidadelseif min == 7 thenif pc.count_item("idmineral") < 200 then -- pones la id del mineralchat("Lo siento no tienes mineral suficiente, traeme 200")returnendpc.remove_item("idmineral", 200) -- pones la id del mineralpc.give_item2("iditem", cantidad) -- pones la id del premio y la cantidadendendendendendC. Sinval

Olá Cyber-Gamers, Venho-vos apresentar um sistema feito em quest! Este sistema fará com que anoiteça e e amanheça automaticamente. Código: state start begin function funktion() local text = { -------Gunduz Yazisi--- {"Gunduz Modu Aktif"}, {"Iyı Gunler , Quality2!"}, -------Gece Yazisi--- {"Gece Modu Aktif"}, {"Iyı Geceler , Quality2!"}, } local safa1 = number(1, 2) local safa1e = number(3, 4) local gunduzyazi = text[safa1][1] local geceyazi = text[safa1e][1] local saat = os.date ("%H") if saat >= "19" and game.get_event_flag("eclipse") == 0 then notice_all(""..geceyazi.."") game.set_event_flag("eclipse", 1 ) elseif saat >= "07" and game.get_event_flag("eclipse") == 1 then notice_all(""..gunduzyazi.."") game.set_event_flag("eclipse", 0 ) end end when login or levelup or logout begin daymode.funktion() endendendDownload: https://mega.co.nz/#!6BlDXThL!S1jNpUJiWnfh3Lh8mK8oSwNriqosXYCWuSBnZuYnRZo VirusTotal: https://www.virustotal.com/pt/file/7cb06a11f136524eb7b8254a61c73912249ab9e69d095ec3c7d53f3d05acf594/analysis/1365853459/ Créditos: [*]ChevChelios Cumprimentos, Luis Bizarro

Tava com algumas quest aki no pc quando fui fazer uma limpeza achei esta aki acho que é muito útil, eu traduzi e arumei então ta 100% Pt-BR --**--** by BlackYuko--**quest resetar_skill_status_etc begin state start begin----------Permissão de Exílio when 71054.use begin -- Inserir o id do item a ser usado. local yang = 1000000 local liv = 50 local waiting_days = 3 say_title("Permissão de Exílio") if pc.is_engaged() then say("Voçê não pode mudar de reino [ENTER] se voçê tem que se casar.[ENTER]") return elseif pc.is_married() then say("Voçê não pode mudar reino [ENTER] se voçê é casado.[ENTER]") return elseif pc.is_polymorphed() then say("Voçê não pode mudar reino [ENTER] enquanto esta transformado.[ENTER]") return elseif pc.has_guild() then say("Voçê não pode mudar reino [ENTER] se voçê pertence a uma guild.[ENTER]") return elseif pc.getqf("next_time") > get_time() then local rem_seconds = pc.getqf("next_time") - get_time() local rem_minutes = rem_seconds/60 local rem_hours = rem_minutes/60 if rem_hours >= 1 then say("Voçê pode mudar o reino novamente entre [ENTER]"..math.ceil(rem_hours).." horas.[ENTER]") elseif rem_minutes >= 1 then say("Voçê pode mudar o reino novamente entre [ENTER]"..math.ceil(rem_minutes).." minutos.[ENTER]") else say("Voçê pode mudar o reino novamente entre [ENTER]"..rem_seconds.." segundos.[ENTER]") end return end say("Olá" .. pc.get_name() .. ".") say("Quer Trocar de Reino?") say("Tem certeza de que quer continuar?[ENTER]") say_reward("Isso vai te custar: "..yang.." Gold") say_reward("Level mínimo: "..liv.." [ENTER]") local b = select("Sim", "Não") if b == 2 then return end say_title("Permissão de Exílio") if pc.get_gold() < yang then say("Não tem gold suficiente. [ENTER]") return elseif pc.get_level() < liv then say("Seu level é muito baixo.[ENTER]") return end say("Selecione o Reino, para qual voçê quer mudar:[ENTER]") local emp = select("Shinsoo", "Chunjo", "Jinno", "Cancelar") if emp == 4 then return end local ret = pc.change_empire(emp) if ret == 999 then pc.setqf("next_time", get_time()+waiting_days*24*60*60) pc.change_gold(-yang) pc.remove_item(item.get_vnum(), 1) say_title("Permissão de Exílio") say("Parabens, voçê trocou de reino com sucesso![ENTER]") elseif ret == 1 then say_title("Permissão de Exílio") say("Voçê não pode escolher o seu próprio reino.[ENTER]") elseif ret == 2 then say_title("Permissão de Exílio") say("Voçê não pode mudar de reino se estiver em uma guild.[ENTER]") elseif ret == 3 then say_title("Permissão de Exílio") say("Não pode mudar de reino, porque voçê se casou") say("menos de 24 horas atrás.[ENTER]") end end----------Reiniciar Status when 71002.use begin say_title("Reiniciar Status") say("Olá" .. pc.get_name() .. ".") say("Quer reiniciar seus status?") say("Tem certeza de que deseja continuar?[ENTER]") local a = select("Sim", "Não") if a == 2 then return end pc.reset_point() pc.remove_item(item.get_vnum(), 1) say_title("Reiniciar Status") say("Parabens, voçê reinicio seus status com sucesso![ENTER]") end----------Reiniciar Habilidades when 71003.use begin say_title("Reiniciar habilidades'") if pc.get_skill_group() == 0 then say ("Ainda não escolheu suas habilidades.[ENTER]") return end local vnum_list, name_list = reset_scroll.get_skill_list(pc.get_job(), pc.get_skill_group()) if table.getn(vnum_list) == 0 then say("Não há nenhuma habilidade que possa ser reiniciada![ENTER]") return end table.insert(name_list, "Cancelar") say("Voçê quer reiniciar uma habilidade para passar com 17 pontos?") say("Voçê tera 17 pontos para redistribuir.") if table.getn(vnum_list) < 7 then say("") end local i = select_table(name_list) if i == table.getn(name_list)then return end local name = name_list[i] local vnum = vnum_list[i] say_title("Resetar Habilidades'") say("Voçê optou por reiniciar: "..name..".") say("Tem certeza de que deseja continuar?[ENTER]") local b = select("Sim", "Não") if b == 2 then return end pc.clear_one_skill(vnum) pc.setqf("force_to_master_skill", 1) pc.remove_item(item.get_vnum(), 1) say_title("Reiniciar Habilidades'") say("Parabens, habilidade reiniciada com sucesso![ENTER]") end---------Mudar de Sexo when 71048.use begin -- Inserir Isso vai te custar e o level minimo. local yang = 1000000 local liv = 50 say_title("Mudar de Sexo") if pc.is_engaged() then say("Voçê não pode mudar de sexo se voçê tem que se casar.[ENTER]") return elseif pc.is_married() then say("Voçê não pode mudar o sexo se voçê está casado.[ENTER]") return elseif pc.is_polymorphed() then say("Voçê não pode mudar de sexo quando voçê está transformado.[ENTER]") return end say("Voçê quer mesmos trocar de sexo?") say("isso irá afectar a tua vida sentimental.") say("Tem certeza de que quer continuar?[ENTER]") say_reward("Isso vai te custar: "..yang.." Gold") say_reward("Level mínimo: "..liv.." [ENTER]") local b = select("Sim", "Não") if b == 2 then return end say_title("Mudar de Sexo") if pc.get_gold() < yang then say("Voçê não tem gold suficiente.[ENTER]") return elseif pc.get_level() < liv then say("Seu level é muito baixo.[ENTER]") return end pc.change_sex() pc.polymorph(20032) pc.change_gold(-yang) pc.remove_item(item.get_vnum(), 1) say("Parabens, voçê mudou de sexo com sucesso![ENTER]") end--------- Mudar de Nome when 71055.use begin -- Inserir o valor e o level minimo. local yang = 1000000 local liv = 50 say_title("Mudar de Nome") if pc.is_engaged() then say("Voçê não pode mudar o nome, se voçê se casar.[ENTER]") return elseif pc.is_married() then say("Voçê não pode mudar o nome, se voçê é casado.[ENTER]") return elseif pc.has_guild() then say("Voçê não pode mudar o nome, se voçê estiver em uma guilda.[ENTER]") return elseif party.is_party() then say("Voçê não pode mudar o nome, se voçê está em um grupo.[ENTER]") return end say("Digite o novo nome que voçê quer ter:[ENTER]") say_reward("Isso vai te custar: "..yang.." Gold") say_reward("Level mínimo: "..liv.." [ENTER]") local new_name = input() say_title("Mudar de Nome") if pc.get_gold() < yang then say("Voçê não tem gold suficiente.[ENTER]") return elseif pc.get_level() < liv then say("Seu level é muito baixo.[ENTER]") return end local ret = pc.change_name(new_name) if ret == 0 then say("Voçê deve digitar o novo nome.[ENTER]") elseif ret == 1 then say("Ocorreu um erro.[ENTER]") elseif ret == 2 then say("O nome digitado não é válido.[ENTER]") elseif ret == 3 then say("O nome já está em uso.[ENTER]") elseif ret == 4 then pc.change_gold(-yang) pc.remove_item(item.get_vnum(), 1) say("Parabens, o nome foi alterado com sucesso!") say("Nessesario relogar para ver a modificação.") else say("A função é bloqueado para este endereço locale.[ENTER]") end end ------------- Anel do Sucessor when 71099.use begin say_title("Anel do Sucessor") if not pc.is_guild_master() then say("Apenas o líder da guilda pode usar este item.[ENTER]") return end say("Digite o nome do novo líder da guilda:[ENTER]") local successor = input() say_title("Anel do Sucessor") if pc.get_name() == successor then say("Voçê não pode digitar seu nome.[ENTER]") return elseif successor == "" then say("O nome fornecido não é válido.[ENTER]") return end local ret = guild.change_master(successor) if ret == 0 then say("O nome fornecido não é válido.[ENTER]") elseif ret == 1 then say("Apenas o líder da guilda pode usar este item.[ENTER]") elseif ret == 2 then say("O jogador não faz parte da guild.[ENTER]") elseif ret == 3 then pc.remove_item(item.get_vnum(), 1) say("Parabens, o líder da guilda foi modificado com sucesso!") say("Nessesario relogar para ver a modificação.[ENTER]") elseif ret == 4 then say("Não pertence a nenhuma guilda.[ENTER]") end end---------- Redefinir vitalidade/inteligência/forçar/destreza when 71103.use or 71104.use or 71105.use or 71106.use begin local status_name = {[0] = "vitalidade'", [1] = "inteligência", [2] = "forçar", [3] = "destreza"} local item_id = item.get_vnum() - 71103 say_title("Redefinir "..status_name[item_id]) say("Com isso, voçê pode redefinir os pontos de status") say(status_name[item_id].." a 1 punto.") say("Tem certeza de que quer continuar?[ENTER]") local s = select("Sim", "Não") if s == 2 then return end say_title("Redefinir "..status_name[item_id]) local ret = pc.reset_status(item_id) pc.remove_item(item.get_vnum(), 1) if not ret then say("Ocorreu um erro.[ENTER]") return end say("O status "..status_name[item_id].." foi redefinido com sucesso![ENTER]") end----------Reiniciar Habilidades when 71100.use begin -- Inserir valor level minimo. local yang = 1000000 local liv = 50 say_title("Reiniciar Habilidades") if pc.get_skill_group() == 0 then say ("Ainda não escolheu suas habilidades.[ENTER]") return end say("Suas habilidades serão redefinir") say("e voçê pode retomar aos professores para apornder outra habilidade.") say("Tem certeza de que deseja continuar?[ENTER]") say_reward("Isso vai te custar: "..yang.." Gold") say_reward("level mínimo: "..liv.." [ENTER]") local b = select("Sim", "Não") if b == 2 then return end say_title("Reiniciar Habilidades") if pc.get_gold() < yang then say("Voçê não tem gold suficiente.[ENTER]") return elseif pc.get_level() < liv then say("Seu nível é muito baixo.[ENTER]") return end say("Parabes, voçê reiniciou suas habilidades com sucesso!") say("Nessesario relogar, e ir aos seus") say("professores para pegar suas novas habilidades.[ENTER]") pc.clear_skill() pc.set_skill_group(0) pc.remove_item(item.get_vnum(), 1) pc.change_gold(-yang) end ----------Mudar de Raça when 71035.use begin -- Inserir valor e level minimo local yang = 1000000 local liv = 50 say_title("Mudar de Raça") if pc.is_engaged() then say("Voçê não pode mudar de raça, se voçê se casar.[ENTER]") return elseif pc.is_married() then say("Voçê não pode mudar de raça, se voçê é casado.[ENTER]") return elseif pc.is_polymorphed() then say("Voçê não pode mudar de raça, enquanto voçê estiver transformado.[ENTER]") return end say ("Ainda bem que voçê pode mudar a sua raça.") say ("O sexo do personagem vai continuar a ser o mesmo.") say ("Lembre-se que não podes tar equipado com armas e armaduras") say ("incompatível com a nova raça.") say("Tem certeza de que deseja continuar?[ENTER]") say_reward("Isso vai te custar: "..yang.." Gold") say_reward("Level mínimo: "..liv.." [ENTER]") local b = select("Sim", "Não") if b == 2 then return end say_title("Mudar de Raça") if pc.get_gold() < yang then say("Voçê não tem gold suficiente.[ENTER]") return elseif pc.get_level() < liv then say("Seu level é muito baixo.[ENTER]") return end say ("Escolh a nova raça:[ENTER]") local c = select ("Guerriero","Ninja","Shura","Shaman","Cancelar") if c == 5 then return end local polymorph = {4,5,6,7} local sex = {0,1,0,1} if pc.get_sex() == sex[c] then pc.polymorph(polymorph[c]) pc.change_sex() else pc.polymorph(polymorph[c]) pc.change_sex() pc.polymorph(20032) pc.polymorph(1) pc.change_sex() pc.polymorph(20032) end pc.set_part(PART_HAIR, 0) pc.change_gold(-yang) pc.remove_item(item.get_vnum(), 1) say_title("Mudar de Raça") say("Parabens, voçê mudou de raça com sucesso!") end -- Função para redefinir as habilidades function get_skill_list(job, group) local skill_vnum_list = {} local skill_name_list = {} if pc.get_skill_group() != 0 then local skill_list = special.active_skill_list[job+1][group] for i = 1,table.getn(skill_list) do skill_vnum = skill_list[i] if pc.get_skill_level(skill_vnum) > 0 then table.insert(skill_vnum_list, skill_vnum) table.insert(skill_name_list, locale.GM_SKILL_NAME_DICT[skill_vnum]) end end end return skill_vnum_list, skill_name_list end endend Créditos : by BlackYuko Créditos Tradução/Edição : Sinval So traduzi e fiz algumas modificações. C. Sinval

Boas, Venho-vos apresentar umas novas quests. Como sabem quando partem uma metin no EburMt2 dão-vos a escolher os prémios (Conforme o nivel da metin) METINS 45 Ou Menos : Pedras METINS Mais de 45: Mascaras e Armaduras O Ficheiro contem 18 quests! Print: Exemplo: VirusTotal: https://www.virustotal.com/pt/file/005be87cf34ebb825f65b0a54df5b74f7b83560eefd7ec080381b2b53debe49e/analysis/1364802461/ Download: https://mega.co.nz/#!rN1V0KqT!DmweJD8KxfB73u18omSEgl49n6x7HiHfam8ETuNrppM Créditos: [*]KillHumans Cumprimentos, .HaveGone // Luis Bizarro

Bom com base na quest do Paulo Ferreira criei uma, a que eu fiz deleta todos os itens não testei, so iniciante si a quest não funcionar ou tiver algum erro peso a administração para fechar o tópico. Tópico da quest base : http://cyber-gamers.org/index.php?/topic/9109-quest-destruidora-de-items/page__p__61611#entry61611 -----------------------------------------------------------------Quest base : Paulo Ferreiro--------------------------Créditos Modificação : Sinval---------------------------Visite : Cyber-Gamers.org-----------------------------------------------------------------------quest deletaritens beginstate start beginwhen NPC.chat."Deletar todos itens da conta" beginsay_title("Olá" .. pc.get_name() .. "")say("Atraves desse npc vc pode deletar todos")say("os itens que esta na sua conta mais pensa bem,")say("apos fazer isso não tem mais volta.")say("quer deletar?")local opcao = select ("Sim", "Não")if opcao == 1 thensay_title("Obrigado! ")say("")say("")say("Seus itens foram deletados. ")command("ip")elsesay_title("Obrigado! ")say("")say("")say("Quando quiser deletar seus itens")say("volta aki para eu poder remover... ")endendendendCréditos quest base : Paulo FerreiraCréditos Modificação : Sinval Quem puder testa e ve si funciona ou não dexa coment ai. Como a minha conta não pode postar peguei a do meu irmão, si forem da http://cyber-gamers.org/public/style_emoticons/default/451960.gif , da em algum tópico/comentario meu. link da minha conta : http://cyber-gamers.org/index.php?/user/12639-%E0%AA%BDi%E0%B8%97%E2%88%9A%CE%B1%E2%84%93/

Boas pessoal. Estão cheios de ter itens não dropaveis/negociáveis? Aqui está a solução! Esta quest, ao arrastarmos o item que queremos destruir para cima do npc desejado, aparece uma mensagem se queremos mesmo destruir o item... Imagem: Ao carregarmos sim, aparece uma mensagem a dizer que o item foi removido, e se carregarmos em não, aparece uma mensagem a dizer para voltarmos lá mais tarde... Quest: quest removeritens beginstate start beginwhen 20087.take beginsay_title("Remoção de Itens! ")say("Com esta opção podes remover todos os ")say("itens que desejas, mesmo aqueles que ")say("não podes negociar ou deitar para o chão... ")say("")say("Estas a tentar destruir o seguinte item: ")say_reward(string.trim(item.get_name()))say("")say("")say("Desejas mesmo destruir este item? ")local opcao = select ("Sim", "Não")if opcao == 1 thensay_title("Obrigado! ")say("")say("")say("Este item foi destruido com sucesso. ")item.remove()elsesay_title("Obrigado! ")say("")say("")say("Volta quando estiveres mais seguro ")say("para removeres esse item... ")endendendend Créditos: Meus. Cumprimentos.

quest Meias_Natal beginstate start beginwhen login with pc.getqf("navidad")==0 begin --with pc.getqf("navidad")==0 si qieres poner un flag en la questsend_letter("Procurar Meias de Natal")endwhen info or button beginsay_title("Olá "..pc.get_name().." ")say("Bem, como estamos perto do Natal")say("Proponho-te uma tarefa, de modo")say("a que possas ganhar prendas.")say_reward("Deves Dropar 3 Meias")say("")say_item_vnum(50010)say("")say_reward("Poderás Dropá-las nos")say_reward("monstros da Montanha da")say_reward("Escuridão.")if pc.count_item(50010)>=3 thenpc.setqf("navidad", 1)setstate(infos)endendendstate infos beginwhen letter beginsend_letter("Encontraste as Meias")endwhen info or button beginsay_title("Encontraste as Meias")say("Por isso terás direito a uma recompensa.")say("Disfruta-a.")clear_letter()pc.remove_item("50010", 3)pc.change_gold(250000000)pc.give_item2("ITEM QUE QUERES QUE GANHE", 1)pc.give_item2("ITEM QUE QUERES QUE GANHE", 1)pc.give_item2("ITEM QUE QUERES QUE GANHE", 1)pc.give_item2("ITEM QUE QUERES QUE GANHE", 1)endendend

Boas, caros cyber-noberianos :$ Venho-vos apresentar uma quest nova! Explicação: Quote Código: ------------------------------------------------------------------------------------ Kill De Alguns Monstros ---- Copyright by Luis Bizarro ---- World Of Chaos ---- Releasada a 28/Março/2013 19:53 ------------------------------------------------------------------------------------quest kill_mob begin state start begin-- Dragão Vermelho -- when 2291.kill begin notice_all("pc.get_name() matou o Dragão Vermelho!") notice_all("Que poderoso que ele é.") end-- Azrael -- when 2598.kill begin notice_all("pc.get_name() matou o Azrael!") notice_all("Que poderoso que ele é.") end endend Atenção: [*]Quest não testada! Download: https://mega.co.nz/#!uUEXiRZA!AC0YgFvc2XtHAPkwr4XDh3F4pj92Yc96FHfYg98weds VirusTotal: https://www.virustotal.com/pt/file/c7d13658dbf90086ee6890aaf9f9b17a2d680c95b988922c29a7d1fceb32b65b/analysis/1364502044/ Créditos: [*]Notepad++ - Software de Criação; [*]Ymir - Fornecedor da plataforma; [*]Luis Bizarro - Criação // Divulgação. C, Luis Bizarro

Boas, caros cyber-noberianos :$ Venho-vos apresentar uma quest nova! Explicação: Código: ------------------------------------------------------------------------------------ Anuncio de voto automatico ---- Copyright by Luis Bizarro ---- World Of Chaos ---- Releasada a 28/Março/2013 19:42 ------------------------------------------------------------------------------------quest vote_serv begin state inicio begin when login with get_time() > game.get_event_flag("global_notice") begin notice_all("Vota no servidor pelo site teras recompensas!") game.set_event_flag("vote_serv", get_time()+ 60*60) -- Temporizador -- end endendAtenção: [*]Quest não testada! Download: https://mega.co.nz/#!idslRISD!E4yrkyjPRcpKleR4HxD1b0ILHIVvXq79TdfAIVdCtBg VirusTotal: https://www.virustot...sis/1364500065/ Créditos: [*]Notepad++ - Software de Criação; [*]Ymir - Fornecedor da plataforma; [*]Luis Bizarro - Criação // Divulgação. C, Luis Bizarro

quest egg_drop begin state start begin when 101.kill or 102.kill or 103.kill or 104.kill or 105.kill or 106.kill or 107.kill or 108.kill or 109.kill or 110.kill or 111.kill or 112.kill or 113.kill or 114.kill or 115.kill or 131.kill or 132.kill or 133.kill or 134.kill or 135.kill or 136.kill or 137.kill or 138.kill or 139.kill or 140.kill or 141.kill or 142.kill or 143.kill or 144.kill or 151.kill or 152.kill or 153.kill or 154.kill or 155.kill or 171.kill or 172.kill or 173.kill or 174.kill or 175.kill or 176.kill or 177.kill or 178.kill or 179.kill or 180.kill or 181.kill or 182.kill or 183.kill or 184.kill or 185.kill or 191.kill or 192.kill or 193.kill or 194.kill or 301.kill or 302.kill or 303.kill or 304.kill or 331.kill or 332.kill or 333.kill or 334.kill or 351.kill or 352.kill or 353.kill or 354.kill or 391.kill or 392.kill or 393.kill or 394.kill or 395.kill or 396.kill or 397.kill or 398.kill or 401.kill or 402.kill or 403.kill or 404.kill or 405.kill or 406.kill or 431.kill or 432.kill or 433.kill or 434.kill or 435.kill begin if pc.level >= 1 and pc.level <= 30 then local r=number(1, 50) if r==1 then pc.give_item2("50162", 1) chat("Dropou item do evento!") else end end end when 436.kill or 451.kill or 452.kill or 453.kill or 454.kill or 455.kill or 456.kill or 491.kill or 492.kill or 493.kill or 494.kill or 501.kill or 502.kill or 503.kill or 504.kill or 531.kill or 532.kill or 533.kill or 534.kill or 551.kill or 552.kill or 553.kill or 554.kill or 591.kill or 595.kill or 601.kill or 602.kill or 603.kill or 604.kill or 631.kill or 632.kill or 633.kill or 634.kill or 635.kill or 636.kill or 637.kill or 651.kill or 652.kill or 653.kill or 654.kill or 655.kill or 656.kill or 657.kill or 691.kill or 692.kill or 693.kill or 701.kill or 702.kill or 703.kill or 704.kill or 705.kill or 706.kill or 707.kill or 731.kill or 732.kill or 733.kill or 734.kill or 735.kill or 736.kill or 737.kill or 751.kill or 752.kill or 753.kill or 754.kill or 755.kill or 756.kill or 757.kill or 771.kill or 772.kill or 773.kill or 774.kill or 775.kill or 776.kill or 777.kill or 791.kill or 792.kill or 793.kill or 794.kill or 795.kill or 796.kill or 901.kill or 902.kill or 903.kill or 904.kill or 905.kill or 906.kill or 907.kill or 931.kill or 932.kill or 933.kill or 934.kill or 935.kill or 936.kill or 937.kill or 991.kill or 992.kill or 993.kill begin if pc.level >= 31 and pc.level <= 60 then local r=number(1, 50) if r==1 then pc.give_item2("50162", 1) chat("Dropou item do evento!") else end end end when 1001.kill or 1002.kill or 1003.kill or 1004.kill or 1031.kill or 1032.kill or 1033.kill or 1034.kill or 1035.kill or 1036.kill or 1037.kill or 1038.kill or 1039.kill or 1040.kill or 1041.kill or 1061.kill or 1062.kill or 1063.kill or 1064.kill or 1065.kill or 1066.kill or 1067.kill or 1068.kill or 1069.kill or 1070.kill or 1071.kill or 1091.kill or 1092.kill or 1093.kill or 1094.kill or 1095.kill or 1101.kill or 1102.kill or 1103.kill or 1104.kill or 1105.kill or 1106.kill or 1107.kill or 1131.kill or 1132.kill or 1133.kill or 1134.kill or 1135.kill or 1136.kill or 1137.kill or 1151.kill or 1152.kill or 1153.kill or 1154.kill or 1155.kill or 1156.kill or 1157.kill or 1171.kill or 1172.kill or 1173.kill or 1174.kill or 1175.kill or 1176.kill or 1177.kill or 1191.kill or 1192.kill or 1301.kill or 1302.kill or 1303.kill or 1304.kill or 1305.kill or 1306.kill or 1307.kill or 1331.kill or 1332.kill or 1333.kill or 1334.kill or 1335.kill or 1401.kill or 1402.kill or 1403.kill or 1501.kill or 1502.kill or 1503.kill or 1601.kill or 1602.kill or 1603.kill or 1901.kill or 1902.kill or 1903.kill or 2001.kill or 2002.kill or 2003.kill or 2004.kill or 2005.kill or 2031.kill or 2032.kill or 2033.kill or 2034.kill or 2035.kill or 2036.kill or 2051.kill or 2052.kill or 2053.kill or 2054.kill or 2055.kill or 2061.kill or 2062.kill or 2063.kill or 2064.kill or 2065.kill or 2071.kill or 2072.kill or 2073.kill or 2074.kill or 2075.kill or 2076.kill or 2091.kill or 2092.kill or 2093.kill or 2101.kill or 2102.kill or 2103.kill or 2104.kill or 2105.kill or 2106.kill or 2107.kill or 2108.kill or 2131.kill or 2132.kill or 2133.kill or 2134.kill or 2135.kill or 2151.kill or 2152.kill or 2153.kill or 2154.kill or 2155.kill or 2156.kill or 2157.kill or 2158.kill or 2191.kill or 2192.kill or 2201.kill or 2202.kill or 2203.kill or 2204.kill or 2205.kill or 2206.kill or 2207.kill or 2231.kill or 2232.kill or 2233.kill or 2234.kill or 2235.kill or 2291.kill or 2301.kill or 2302.kill or 2303.kill or 2304.kill or 2305.kill or 2306.kill or 2307.kill or 2311.kill or 2312.kill or 2313.kill or 2314.kill or 2315.kill or 2401.kill or 2402.kill or 2403.kill or 2404.kill or 2411.kill or 2412.kill or 2413.kill or 2414.kill or 2431.kill or 2432.kill or 2433.kill or 2434.kill or 2451.kill or 2452.kill or 2453.kill or 2454.kill or 2491.kill or 2492.kill or 2493.kill or 2508.kill or 2509.kill or 2510.kill or 2511.kill or 2512.kill or 2513.kill or 2514.kill or 2515.kill or 2516.kill or 2517.kill or 2518.kill or 2519.kill or 2520.kill or 2521.kill or 2522.kill or 2523.kill or 2524.kill or 2525.kill or 2526.kill or 2527.kill or 2528.kill or 2529.kill or 2530.kill or 2531.kill or 2532.kill or 2601.kill or 2602.kill or 2603.kill or 2604.kill or 2605.kill or 2651.kill or 2652.kill or 2653.kill or 2654.kill or 2681.kill or 2682.kill or 2683.kill or 2684.kill or 5001.kill or 5002.kill or 5003.kill or 5004.kill or 5101.kill or 5102.kill or 5103.kill or 5104.kill or 5111.kill or 5112.kill or 5113.kill or 5114.kill or 5115.kill or 5116.kill or 5121.kill or 5122.kill or 5123.kill or 5124.kill or 5125.kill or 5126.kill or 5127.kill or 5131.kill or 5132.kill or 5133.kill or 5134.kill or 5141.kill or 5142.kill or 5143.kill or 5144.kill or 5145.kill or 5146.kill or 5151.kill or 5152.kill or 5153.kill or 5154.kill or 5155.kill or 5156.kill or 5157.kill or 5161.kill or 5162.kill or 5163.kill or 7001.kill or 7002.kill or 7003.kill or 7004.kill or 7005.kill or 7006.kill or 7007.kill or 7008.kill or 7009.kill or 7010.kill or 7012.kill or 7013.kill or 7014.kill or 7015.kill or 7016.kill or 7017.kill or 7018.kill or 7019.kill or 7020.kill or 7021.kill or 7022.kill or 7023.kill or 7024.kill or 7025.kill or 7026.kill or 7027.kill or 7028.kill or 8001.kill or 8002.kill or 8003.kill or 8004.kill or 8005.kill or 8006.kill or 8007.kill or 8008.kill or 8009.kill or 8010.kill or 8011.kill or 8012.kill or 8013.kill or 8014.kill or 8015.kill or 8016.kill or 8017.kill or 8018.kill or 8019.kill or 8020.kill or 8021.kill or 8022.kill or 8024.kill or 8025.kill or 8026.kill or 8027.kill or 2602.kill or 2603.kill or 2604.kill or 2605.kill or 2651.kill or 2652.kill or 2653.kill or 2654.kill or 2681.kill or 2682.kill or 2683.kill or 2684.kill or 8041.kill or 8042.kill or 8043.kill or 8044.kill or 8045.kill or 8046.kill or 8047.kill or 8048.kill or 8049.kill or 8050.kill begin if pc.level >= 61 and pc.level <= 105 then local r=number(1, 50) if r==1 then pc.give_item2("50162", 1) chat("Dropou item do evento!") else end end end when 101.kill with pc.is_gm() begin --local r=number(1, 1) --if r==1 then pc.give_item2("50162", 1) chat("Dropou item do evento!") --end end endend Gostou? de http://cyber-gamers.org/public/style_emoticons/default/451960.gif.

A pedido do CoMa2D dexo uma quest que é uma misão de matar 1 famtasma da morte(ceifador), e ganhar 100kk... quest Quest begin state start begin when login or levelup with pc.level >= 80 begin set_state(information) end end state information begin when letter begin send_letter("Misão level") end when info or button begin say("Misão") say("Ola amigo, agora que chegastes a nivel 80 tenho uma misão para voçê! ") say("Terás que matar 1 Fantasmas da Morte!") say("Ao concluires receberas uma grande recompensa!") say_reward("Mata 1 Fantasmas da morte!") say("") pc.setqf("state", 1) q.set_counter("Fantasmas da morte", 1) end when 1093.kill begin local count = pc.getqf("state") - 1 if count >= 1 then pc.setqf("state", count) q.set_counter("Fantasmas da morte", count) end if count == 0 then say_title("Missao") say("Completaste a missão!") say_reward("100kk de gold!") pc.change_money(100000000) clear_letter() set_state(__COMPLETE__) end end end state __COMPLETE__ begin endend Como editar a quest aou seu gosto vamos la &--#62;Ela é aparece quando pega level 80 basta ir na linha 3, e por qualquer número no lugar do 80. &--#62;Na linha 26 e o mob no caso é 1093, vc pod por outro no lugar. &--#62;Na quest puis so 1 para por mais , na linha 22 e 23 no lugar do 1 se poem qts quiser, na linha 28 vai fazer o mesmo que fez nas linhas 22, 23. &--#62;A misão da 100 000 000 gold, para almentar vai aou seu gosto so substituir o qts vc quer. &--#62;Si quiser por mais gols e so modificar a quantidade, se quiser por pra dar algum item, etc, manda PM que ajudo. C. Sinval Créditos da quest: Nestle Edição: Sinval.

quest horse_menu begin state start begin function horse_menu() if horse.is_mine() then say("Menu Do Cavalo") say("") local s = 6 if horse.is_dead() then s = select( "Chamar O Cavalo", "Enviar De Volta, "Fechar") if s == 1 then s = 0 elseif s == 2 then s = 3 elseif s == 3 then return end else s = select( "Alimentar Cavalo", "Montar O Cavalo", "Enviar O Cavalo Para O Estábulo", "Saúde Do Cavalo", "Mudar O Nome Do Cavalo", "Sair Do Menu") end if s == 0 then horse.revive() elseif s == 1 then local food = horse.get_grade() + 50054 - 1 if pc.countitem(food) > 0 then pc.removeitem(food, 1) horse.feed() else say("Necessitas De "..item_name(food).." Para O Alimentares.") say("") end elseif s == 2 then horse.ride() elseif s == 3 then horse.unsummon() elseif s == 4 then say("Vida Do Teu Cavalo: "..horse.get_health_pct().."%") say("Stamina Do Teu Cavalo: "..horse.get_stamina_pct().."%") say("") elseif s == 5 then if pc.countitem("71110") <= 0 then say("Necessitas De"..item_name("71110").." Para Mudar O Nome Dele.") say("") return end local old_horse_name = horse.get_name() ; say_title("Dar Açúcar Ao Cavalo:") say("Uma Misteriosa Substância que o Açúcar tinha") say("Que Aumenta 20 Pontos de Defesa.") say("Quando Montado.") say("") if string.len(old_horse_name) == 0 then say_reward("Escolhe Então O Nome Dele.") else say_reward("O Nome Atual Do Cavalo é: "..old_horse_name..".") end say("") say("Escolhe O Nome Que lhe Queres Dar.:") say("") local horse_name = input() if string.len(horse_name) < 2 then say_title("Não Alterou o Nome do Cavalo:") say("Tens De Escrever Um Nome.") say("") return elseif string.len(horse_name) > 12 then say_title("Cavalo:") say("Nome do cavalo demasiado longo.") say("") return end local ret = horse.set_name(horse_name) say_title("Cavalo:") if ret == 0 then say_reward("Utilize este nome!") say("") elseif ret == 1 then say_reward("Utilize este nome!") say("") elseif ret == 2 then pc.remove_item(71110) say("Parabéns O Novo Nome Foi Adicionado!") say("") end end end end when 20030.click begin horse_menu.horse_menu() end when 20101.click begin horse_menu.horse_menu() end when 20102.click begin horse_menu.horse_menu() end when 20103.click begin horse_menu.horse_menu() end when 20104.click begin horse_menu.horse_menu() end when 20105.click begin horse_menu.horse_menu() end when 20106.click begin horse_menu.horse_menu() end when 20107.click begin horse_menu.horse_menu() end when 20108.click begin horse_menu.horse_menu() end when 20109.click begin horse_menu.horse_menu() end endend Link De Download: http://www.mediafire.com/?us8cnz76p7fw4biVirusTotal:https://www.virustotal.com/pt/file/2c70da8667736ba4d58f3f9cc3b05bcf309bd428beb31ab63ac30de95133e717/analysis/1364335314/ Gostas-te então ajuda-me dando http://cyber-gamers.org/public/style_emoticons/default/451960.gif :P

Olá por pedido de alguns menbros, e como a pascoa ta ae dexo aki a quest da pascoa que eu ja tinha postado, mais tava infuncional, depois do pacificador conseguir corrigir o erro ta funcional, mais os "id dos itens e do npc que vai a quest aou criterio de vcs", mais pra quest npc tinha que ser Sr Coelho, e os itens ovos de pascoa. quest Pascoa beginstate start begin when NPC.chat."Evento Pascoa" begin if pc.is_gm() then if game.get_event_flag("evento") == 0 then say("O evento não está activo.") say("Deseja ativar?") local a = select ("Sim", "Não") if a == 1 then game.set_event_flag("evento", 1) notice_all("O Evento de Pascoa Começou!") end else say("O evento está ativo.") say("Deseja desativar?") local b = select ("Sim", "Não") if b == 1 then game.set_event_flag("evento", 0) notice_all("O Evento de Pascoa Acabou!") end end else if game.get_event_flag("evento") == 0 then say("O Evento está desativado.") else say_title ("Olá, "..pc.get_name().."!") say ("O evento de Pascoa já começou e agora ") say ("isso significa que cada jogador tem a chance, ") say ("para ganhar algo especial.") say ("Os monstros roubaram os Ovos do Sr Coelho,") say ("que podem ser obtidos a partir de qualquer monstro.") say ("Porem voçê deve tomar cuidado, pois a varios monstros malignos por ai, ") say ("mais voçê tera uma surpresa no final. ") say ("Você pode ganhar premios dropando de 5 há 100 Ovos. ") say ("Voçê pode escolher quantas Ovos quer trocar, voçê pode trocar 5-10-25-50-100 quanto mais voçê ") say ("dropar, mais premios melhores voçê vai ganhar. ") wait() say_title ("Voçê pode fazer as seguintes trocas de Ovos: ") say ("") say_reward ("5 = Item 299") say_reward ("10 = item 49") say_reward ("25 = item 59") say_reward ("50 = item 69") say_reward ("100 = item 79") end end end when NPC.chat."Trocar de Ovos" with game.get_event_flag("evento") == 1 and pc.count_item("50095") >= 5 begin say_title (""..pc.get_name()..": ") say ("Voçê tem quantos ovos pra trocar?") local a = select ("5 Ovos ", "10 Ovos ", "25 Ovos ", "50 Ovos ", "100 Ovos ", "Cancelar") if a == 1 then pc.give_item2("299", 1) pc.remove_item("50095", 5) elseif a == 2 then if pc.count_item("50095") >= 10 then pc.give_item2("49", 1) pc.remove_item("50095", 10) else say("Não tens ovos suficientes.") end elseif a == 3 then if pc.count_item("50095") >= 25 then pc.give_item2("59", 1) pc.remove_item("50095", 25) else say("Não tens ovos suficientes") end elseif a == 4 then if pc.count_item("50095") >= 50 then pc.give_item2("69", 1) pc.remove_item("50095", 50) else say("Não tens ovos suficientes") end elseif a == 5 then if pc.count_item("50095") >= 100 then pc.give_item2("79", 1) pc.remove_item("50095", 100) else say("Não tens ovos suficientes") end end endendend Créditos Editar : Sinval Créditos Tirar Erros : pacificador Créditos Criador : Não Saber C. Sinval

Boas comunidade! Venho-vos apresentar uma quest que acabei de fazer (+/- 3 horas atrás). Esta quest faz com que quando rodes um item abra uma janela o que fará com que não possa impossibilite o bot de rodar Código: -------------------------------------------- Anti Bot de Rodar-- World Of Chaos Release-- By Luis Bizarro------------------------------------------quest anti_rodar begin state start begin when 71084.use == true) begin say_title(""Equipa"") say("Lembre-se não use bot de rodar!") say("Lorem ipsum dolor sit amet,") say("consectetur adipiscing elit.") say("Sed fringilla nisl a enim egestas") say("eu suscipit erat blandit.") wait() say_title(""Equipa"") say("Isto é uma simples prevenção contra o uso") say("") say("Cumprimentos,") say("A equipa") end endendDownload: https://mega.co.nz/#!fQsUiLia!GS32C3jAhyWA1tDiTz7wdRmm2K96F9y7uPTUpQZXDao Atualização não testada: -------------------------------------------- Anti Bot de Rodar-- World Of Chaos Release-- By Luis Bizarro------------------------------------------quest anti_rodar begin state start begin when 71084.use == true) begin say_title(""Equipa"") say("Lembre-se não use bot de rodar!") say("Lorem ipsum dolor sit amet,") say("consectetur adipiscing elit.") say("Sed fringilla nisl a enim egestas") say("eu suscipit erat blandit.") wait() say_title(""Equipa"") say("Isto é uma simples prevenção contra o uso") say("") say("Cumprimentos,") say(" A equipa") local s = select ("Sair") if s == 1 then -- Fechar end end end endendCréditos: [*]Luis Bizarro - Criação [*]Notepad++ - Software [*]Ymir - Criação das plataformas Cumprimentos, Luis Bizarro