antiblock
Elveron

p0w3r0ff

Root Administrador
  • Content Count

    4,622
  • Joined

  • Last visited

  • Days Won

    325

Posts posted by p0w3r0ff


  1. Imagem colocada

    Nesta quest voçe tera encontrar e entregar 25 peças de vidro ao uriel (item pode ser trocado por um sua escolha)
    Nao se esqueça se traduzir partilhe com comunidade..
    Recompensa:
    110.000.000 exp , 1000 hp 15 (para sempre)

    quest esperia@ beginstate start begin  when login or levelup with pc.get_level() >= 80 begin   send_letter("Vai da Uriel")  end   when button or info begin   say_title("Lettera:")   say("")   say("Ehi , vai da Uriel ha qualcosa per te.")   say("Vorra' sicuramente affidarti un compito.")   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().." ho un compito per te.")   say("Si tratta di trovarmi 25 pezzi di Cristallo.")   say("Li puoi trovare nella Grotta dell'Esilio")   say("al primo piano.")   set_state("lettera_to_cristal")  endendstate lettera_to_cristal begin  when letter begin   send_letter("Trova i Cristalli")  end   when button or info begin   local c = pc.getqf("cristalli")    say_title("Lettera:")    say("")    say("Uriel ti ha affidato un compito.")    say("Devi trovare 25 pezzi di Cristallo")    say("nella Grotta dell'Esilio.")    say("Incamminati verso quelle terre e")    say("esegui il compito.")    say("")    say("")    say_reward("Devi trovare ancora "..c.." Cristalli.")    set_state("drop_cristalli")   end  endstate 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  endendstate torna_da_uriel begin  when letter begin   send_letter("Torna da Uriel")  end   when button or info begin   say_title("Lettera:")   say("")   say("Ottimo hai trovato gli oggetti")   say("che ti aveva chiesto Uriel.")   say("Torna da lui per consegnarglieli.")   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().." sei tornato")    say("e vedo che hai con te gli oggetti")    say("che ti avevo chiesto di trovarmi.")    say("Ottimo , consegnameli e riceverai una ricompensa.")   local consegna = select("Ecco a te i Cristalli","Sono miei")   if consegna == 2 then    say("A te quei Cristalli sono inutili")    say("poi fai come vuoi.")   return   else    say("Scelta giusta...")    say("Vado a prendere la tua ricompensa")    say("intanto consegnami i Cristalli")    pc.remove_item("30203","10")    say("")    say("")    say_reward("Ricompensa:")    say_reward("")    say_reward("110.000.000 di Punti Exp")    say_reward("+1000 HP (permanenti)")    say_reward("+15 Bonus Mezzuomini (permanenti)")    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  endendend  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__")  endendstate __COMPLETE__ begin  endend -- fine quest
    Creditos: inforge

  2. Imagem colocada

    Nesta Quest voçe vai ter de matar 10 inimigos de cada reino de level + 80 voçe vai ter 4 horas para completar missao.
    Se missao for completada com sucesso jogadore recebera Exp,Yang e um item sua escolha.
    Se alguem traduzir esta quest faça favor de partilhar com comunidade .
    Cunprimentos


    quest invasion begin state start begin
    when login or levelup with pc.level >= 80 begin
    set_state("inizio")
    end
    end
    state inizio begin
    when letter begin
    send_letter("Ferma l'invasione!")
    end
    when button or info begin
    say_title("Ferma invasione")
    say("Il nostro villaggio sta subendo diversi attacchi dai regni nemici, SIAMO IN PERICOLO!")
    say("Vai nei regni nemici e uccidi 10 combattenti di livello superiore all' 80!")
    say("10 per ogni regno avversario. Hai 4 ore di tempo per compiere la missione ")
    say("dopo di che' sara troppo tardi per noi....")
    say("")
    timer("timer2" , 14400)
    If pc.get_empire == 1 then
    set_state("time_kill_shinsoo")
    elseif pc.get_empire == 2 then
    set_state("time_kill_chunjo")
    elseif pc.get_empire == 3 then
    set_state("time_kill_jinno")
    end
    end
    end
    state time_kill_shinsoo begin
    when letter begin
    send_letter("Ferma l'invasione!")
    end
    when button or info begin
    say_title("Ferma l'invasione prima che arrivino!")
    say("Hai ancora " .. timer60 .. " Minuti")
    say("Hai ucciso " .. pc.getqf("killa_chunjo") .. " su 10 del Regno Chunjo")
    say("Hai ucciso " .. pc.getqf("killa_jinno") .. " su 10 del Regno Jinno")
    end
    when kill with npc.is_pc() and pc.level >= 80 and pc.get_empire() == 2 begin
    pc.setqf("killa_chunjo",pc.getqf("killa_chunjo")+1)
    if pc.getqf("killa_chunjo") == 10 and pc.getqf("killa_jinno") == 10 and timer("timer2")==false then
    chat("Invasione Fermata in Tempo!")
    chat("Vai dal Comandante ti darà una ricompensa!")
    set_state("come_guardian")
    end
    end
    when kill with npc.is_pc() and pc.level >= 80 and pc.get_empire() == 3 begin
    pc.setqf("killa_jinno",pc.getqf("killa_jinno")+1)
    if pc.getqf("killa_chunjo") == 10 and pc.getqf("killa_jinno") == 10 and timer("timer2")==false then
    chat("Invasione Fermata in Tempo!")
    chat("Vai dal Comandante ti darà una ricompensa!")
    set_state("come_guardian")
    end
    end
    when timer2.timer() begin
    chat("Tempo scaduto!")
    chat("Missione Fallita!")
    set_state("quest_failed")
    end
    end
    state time_kill_chunjo begin
    when letter begin
    send_letter("Ferma l'invasione!")
    end
    when button or info begin
    say_title("Ferma l'invasione prima che arrivino!")
    say("Hai ancora " .. timer60 .. " Minuti")
    say("Hai ucciso " .. pc.getqf("killa_shinsoo") .. " su 10 del Regno Shinsoo")
    say("Hai ucciso " .. pc.getqf("killa_jinno") .. " su 10 del Regno Jinno")
    end
    when kill with npc.is_pc() and pc.level >= 80 and pc.get_empire() == 1 begin
    pc.setqf("killa_shinsoo",pc.getqf("killa_shinsoo")+1)
    if pc.getqf("killa_shinsoo") == 10 and pc.getqf("killa_jinno") == 10 and timer("timer2")==false then
    chat("Invasione Fermata in Tempo!")
    chat("Vai dal Comandante ti darà una ricompensa!")
    set_state("come_guardian")
    end
    end
    when kill with npc.is_pc() and pc.level >= 80 and pc.get_empire() == 3 begin
    pc.setqf("killa_jinno",pc.getqf("killa_jinno")+1)
    if pc.getqf("killa_shinsoo") == 10 and pc.getqf("killa_jinno") == 10 and timer("timer2")==false then
    chat("Invasione Fermata in Tempo!")
    chat("Vai dal Comandante ti darà una ricompensa!")
    set_state("come_guardian")
    end
    end
    when timer2.timer() begin
    chat("Tempo scaduto!")
    chat("Missione Fallita!")
    set_state("quest_failed")
    end
    end
    state time_kill_jinno begin
    when letter begin
    send_letter("Ferma l'invasione!")
    end
    when button or info begin
    say_title("Ferma l'invasione prima che arrivino!")
    say("Hai ancora " .. timer60 .. " Minuti")
    say("Hai ucciso " .. pc.getqf("killa_chunjo") .. " su 10 del Regno Chunjo")
    say("Hai ucciso " .. pc.getqf("killa_shinsoo") .. " su 10 del Regno Shinsoo")
    end
    when kill with npc.is_pc() and pc.level >= 80 and pc.get_empire() == 2 begin
    pc.setqf("killa_chunjo",pc.getqf("killa_chunjo")+1)
    if pc.getqf("killa_chunjo") == 10 and pc.getqf("killa_shinsoo") == 10 and timer("timer2")==false then
    chat("Invasione Fermata in Tempo!")
    chat("Vai dal Comandante ti darà una ricompensa!")
    set_state("come_guardian")
    end
    end
    when kill with npc.is_pc() and pc.level >= 80 and pc.get_empire() == 1 begin
    pc.setqf("killa_shinsoo",pc.getqf("killa_shinsoo")+1)
    if pc.getqf("killa_chunjo") == 10 and pc.getqf("killa_shinsoo") == 10 and timer("timer2")==false then
    chat("Invasione Fermata in Tempo!")
    chat("Vai dal Comandante ti darà una ricompensa!")
    set_state("come_guardian")
    end
    end
    when timer2.timer() begin
    chat("Tempo scaduto!")
    chat("Missione Fallita!")
    set_state("quest_failed")
    end
    end
    state come_guardian begin
    when letter begin
    send_letter("Invasione Fermata! Vai dal Comandante!")
    local v = find_npc_by_vnum ( 20355 )
    if v != 0 then
    target.vid ( "TARGET" , v, "Comandante" )
    end
    end
    when button or info begin
    say_title("Invasione Fermata! Il Comandante ti aspetta!")
    say("Hai fermato l'invasione nemica, vai dal comandante")
    say(" ti darà una cospicua ricompensa!")
    say("")
    end
    when 20355.chat."Comandante" or TARGET.target.click begin
    target.delete ( "TARGET" )
    say_title("Invasione Fermata!")
    say("Ottimo lavoro! " .. pc.get_name() .. " tu sei il Nostro Eroe!")
    say("Questo è per te :")
    say_reward("Exp: ")
    say_reward("Yang: ")
    say_reward("ITEM")
    pc.give_item2("")
    pc.changegold()
    pc.give_exp()
    pc.delqf("killa_shinsoo")
    pc.delqf("killa_chunjo")
    pc.delqf("killa_jinno")
    set_state("completo")
    end
    end
    state completo begin
    end
    state quest_failed begin
    pc.delqf("killa_shinsoo")
    pc.delqf("killa_chunjo")
    pc.delqf("killa_jinno")
    end
    end

    Creditos: inforge

  3. Imagem colocada

    Imagem colocada

    Mod-tools - 100%

    Banzai Batalha - 100% [com controles]

    Animais de estimação - 100%

    Wired - 70%

    Mercado - 100%

    Mobis de Natal 2010 - 100%

    Mobis 2011 - 100%

    Freeze - 100% (Mobis estão faltando voçe pode adicioná-los)

    Halloween 2010 - 100%

    Roller - 100% [bater Anti]

    Salas Públicas - 100%

    Mensagem do dia - 100%

    Mensagem de Boas Vindas - 100% (Editable na config)

    Correções ;-)

    . O pacote inclui:

    Emulador com GUI

    Config (File Server Configuration)

    MySQL Connector (Conector para MySQL para executar o emulador)

    R63 banco de dados 100% traduzido.

    Página R63 com o anfitrião DCR-cliente .

    50MB de ram com 863 pessoas online emulador foi testado no Habbo LethalGaming.


  4. Imagem colocada

    Imagem colocada

    UberEmu

    Aqui estão as características:

    Estável

    Menor uso da memória (RAM Graças LittleJ)

    Nova Pathfinder

    Banco de dados corrigido e catálogo (Graças a Aaron para o catálogo)

    Otimizado para o R63 Pacote de Swf

    Direitos autor: Roy Meth0d de Jong martinmine Marteen Zam Yesser LittleJ Itachi PEjump2 matty13 Shorty

    PS: NãO USE o banco de dados do arquivo! Use isso: UberDB.rar


  5. Imagem colocada

    Imagem colocada

    Imagem colocada

    Autor: Marvel
    Custo: Gratuito
    Versao Mybb: 1.6.x

    O tema é uma simples imitação, Que normalmente e utilizado no fórum oficial do Metin2, não viola qualquer patente ou direitos de autor e pode ser usado com segurança.

     

    Citar

     


    instruções:
    - Carregar as imagens da pasta "metin2" / imagens via acesso FTP
    - Importar o tema para a Administração Panel> Templates e Temas> Import>
    - Defina o tema padrão

    Creditos: Marvel Design Criado por Marvel Design

    Citar
    Citar

    Versao Mybb: http://www.mybb.com/


  6. Imagem colocada

    Uma pesquisa feita no Reino Unido mostrou que a palavra Facebook está presente em 33% dos pedidos de divórcio feitos durante o mês de dezembro de 2011. Esse número era de 20% dois anos antes, em dezembro de 2009. O estudo foi feito pelo site Divorce Online.
    As razões mais comuns para a citação da rede social é o uso de publicações on-line como evidências relacionadas ao comportamento do companheiro de quem se quer separar. Além disso, o Facebook é usado como meio para que casais separados comentem sobre os ex.
    O motivo mais usado para citar o Facebook é a postagem de “mensagens inapropriadas para membros do sexo oposto”, diz a pesquisa. Em seguida estão “companheiros separados postando comentários desagradáveis sobre o ex” e “amigos do Facebook relatando comportamentos do companheiro”.
    O Divorce Online afirma que o Twitter apareceu em apenas 20 pedidos, também usado para justificar comportamentos.
    “As redes sociais se tornaram uma ferramenta primária de comunicação e está substituindo o SMS e o e-mail na minha opinião”, disse Mark Keenan, do site que realizou a pesquisa. “Se alguém quer ter um caso fora do casamento é o lugar mais fácil pra fazer isso.”

    Fonte: g1.globo.com

  7. Imagem colocada

    Adf.ly é um encurtador de url, tal como o bit.ly ou goo.gl, porém o adf.ly é muito mais que isso, ele também é um sistema de ganhos e uma ferramenta de propaganda na internet.

    Para melhor compreender o adf.ly, você precisa entender que há duas faces, de um lado da moeda temos os usuários que encurtam urls com o adf.ly, do outro lado temos os anunciantes que pagam para ter seus websites exibidos durante o tempo de espera. E agora voçe vai poder ter seu propio encurtador de url e talvez quem sabe ganhar um bom dinheiro com ele.

    Demonstração de trabalho (redesenhado): http://x.sapioit.info/

    Cumprimentos

    Install notices

    1 - Go to -> admin -> open -> makepayouts.php admin -> tests -> open -> fp.php root -> js -> open -> fp.js.php inc -> open -> const.inc.php <- edit line from 16 to 19

    This script works if it is allowed in your webspace CURL function.

    I have checked the script for you by, and for me this script works fabulously.


  8. Imagem colocada

    Este plugin WP funciona diretamente de seu blog WP e silenciosamente monitora os visitantes do seu site. Graças a alguma programação muito inteligente, criamos um plugin que pode detectar Silenciosamente Qual dos visitantes do seu site está logado ao Facebook e quais não são.

    E esta é a parte realmente inteligente ... ..

    O plugin só vai funcionar nos visitantes que estão registrados no Facebook Durante a visita ao seu site. Quando detecta um dos seus visitantes que estão registrados na conta Facebook.
    O plugin tem-se projetado para não seqüestrar Todos os links Dentro de anúncios do AdSense ou vídeos YouTube. Isso significa que ele é 100% seguro para uso em sites de Anúncios do AdSense.

    Lembre-se, estamos tentando manter isso como invisível possível. Um "Like" em uma pessoa é suficiente para atingir nossos objetivos aqui.


    http-~~-//www.megaupload.com/?d=4BLN7J0H
    http-~~-//www.multiupload.com/EH5PX5RJUF


  9. A missão pede para você matar 10 Guerreiros Setaou em 1 hora ao nível 75 + mas claro voçe pode modificar quest para um moob sua escolha.

    Se alguem traduzir quest faça favor de partilhar com comunidade.

    Recompensa:

    EXP: 200.000.000

    Yang: 20.000.000

    -------------------------------------
    ------   Setaou Vol.1 (Easy 2 Learn)
    ----   Scripted by /TfFReckLess
    --   The Favorites Few - Clan Game
    -------------------------------------
    quest setaou begin
    state start begin
    	function a()
    		say_title("~ReckLess~")
    	end
    
    	when letter with pc.get_level() >= 75 begin
    		send_letter("I setaou attaccano!")
    	end
    
    	when info or button begin
    		setaou.a()
    		say(pc.get_name() .. ", così si chiama vero?")
    		say("Eheh..")
    		say("Io mi chiamo ReckLess e provengo da")
    		say("una terra che nessuno conosce!")
    		wait()
    		setaou.a()
    		say("Mi han informato che dei setaou")
    		say("han in piano di compiere un attacco")
    		say("al nostro villaggio..")
    		say("Chiedo a lei grande guerriero di aiutarci!")
    		say("")
    		local chose = select ("Aiuta","Non ho tempo")
    		if chose == 2 then
    			setaou.a()
    			say("C-cosa?..")
    		return
    		else
    			setaou.a()
    			say("Grazie mille della sua disponibilita'!")
    			say("Ti ricordo che però lei ha un tempo limite")
    			say("perchè poi se no verremo attaccati e sterminati..")
    			wait()
    			setaou.a()
    			pc.setqf("time", get_time()+60*60)
    			say("Noi tutti preghiamo per lei!")
    			say("")
    			say_reward("Uccidi 10 Guerriero Setaou in 1 ora.")
    			q.set_clock("Tempo stimato per l'attacco: ", pc.getqf("time")-get_time())
    			say_reward(string.format("Guerrieri Setaou rimanenti: %d", pc.getqf("state")))
    			set_state("run")
    		end
    	end
    end
    
    state run begin
    	when login or levelup or kill with pc.getqf("time") < get_time() begin
    		setaou.a()
    		say("Il villaggio è stato attaccato e distrutto.")
    		say_reward("Missione fallita.")
    		set_state("__COMPLETE__")
    	end
    
    	when 2401.kill with pc.getqf("time") >= get_time() begin
    		local count = pc.getqf("state") + 1
    		if count <= 10 then
    			pc.setqf("state", count)
    			q.set_counter("rest", 10 - count)
    			if count == 10 then
    				setaou.a()
    				say("Grazie mille, hai ucciso tutti i setaou!")
    				say("")
    				say_reward("EXP ricevuta: 200.000.000")
    				say_reward("Yang ricevuti: 20.000.000")
    				pc.give_exp2(200000000)
    				pc.change_money(20000000)
    				set_state("__COMPLETE__")
    			end
    		end
    	end
    end
    
    state __COMPLETE__ begin
    end
    end  

    Creditos: inforge criado por ReckLess


  10. Imagem colocada

    Um vídeo publicado por um portal da internet questiona a versão oficial sobre como o Exército dos Estados Unidos matou 11 iraquianos, entre os quais um fotógrafo e um motorista que trabalhavam para a «Reuters» em 2007.

    As imagens, divulgadas pelo site wikileaks.org, mostram, a partir da visão do piloto de um helicóptero Apache, os disparos contra um grupo de homens armados e outros desarmados nas ruas de um bairro da Nova Bagdad.