// Jack
005.gat,105,79,0    script  Jack Miseravel  x,{
    if (quest_hlw2011_jack == 1) goto L_Retorno_Doces_Escondidos;
    if (quest_hlw2011_jack == 2) goto L_Inicio_Segunda_Parte;
    if (quest_hlw2011_jack > 2 && quest_hlw2011_jack < 5) goto L_Retorno_Segunda_Parte;
    if (quest_hlw2011_jack == 5) goto L_Quest_Completa;

    mes "Ao redor do casarão, uma figura sinistra vaga com uma lanterna em forma de abóbora. É um homem, ele usa vestes antigas e parece muito pálido.";
    next;
    mes "A curiosidade é tanta que você decide puxar conversa para saber mais desse homem tão incomum.";
    next;
    menu
        "Olá senhor, que faz aqui nesse lugar tão assustador?", -;

    mes "O homem o estuda por um momento antes de responder.";
    next;
    mes "[Jack Miserável]";
    mes "\"Assustador? Por acaso este lugar é mais assustador do que eu?\"";
    next;
    menu
        "O senhor, assustador?", -;
    mes "O homem abre um sorriso maligno, mostrando dentes afiadíssimos e, num piscar de olhos, ele some de sua frente e aparece atrás de você, e depois volta ao seu lugar de origem.";
    next;
    mes "Algo incomum, mas é Halloween afinal de contas, o incomum se torna comum. Você decide manter a calma e esconder o quanto assustado/a está.";
    next;
    mes "O homem ergue sua lanterna assustadora e aponta para iluminar seu rosto, ele olha com atenção. Então seu rosto assustador se suaviza e ele lhe faz uma reverência.";
    next;
    mes "[Jack Miserável]";
    mes "\"De fato, não obtive o resultado esperado. Sou Jack Miserável. Sou um espirito preso neste mundo, por causa de um acordo mal pensado ¬¬ \"";
    next;
    menu
        "Um acordo mal pensado? Como assim?", -,
        "Espero que possa me contar outra hora, estou com pressa agora.", L_Fechar;
    mes "[Jack Miserável]";
    mes "\"Sim, eu era um Homem miserável, vivia bebendo, não ligava pra minha família. Então meu dia chegou e a morte veio me buscar.\"";
    next;
    mes "Você sente um calafrio O.O";
    next;
    mes "\"Eu estava em um bar e tentei enganá-la. pedi um ultimo gole e então disse estar sem dinheiro para pagar e sugeri que ela se transformasse em moeda. Ela o fez, então eu peguei a garrafa mais próxima e coloquei a moeda. Ela ficou presa. Ficou irada. Mas presa \o/\"";
    next;
    mes "\"Então tive uma ideia brilhante, lhe propus que só voltasse para buscar minha alma depois de 100 anos, então eu a seguiria de bom grado quando nos encontrassemos. Ela, sem alternativa, aceitou. E eu a soltei. Então ela partiu e eu segui de volta para casa. Estava muito bêbado, então perdi o equilíbrio e cai num precipício ¬¬ Foi assim que eu morri.\"";
    next;
    menu
        "=O Mas e o acordo?", -;
    mes "[Jack Miserável]";
    mes "\"Ele dizia para ela buscar minha alma em 100 anos, não falava nada do meu corpo ¬¬. Até que se passe os 100 anos ela não quer saber de mim, então terei de vagar por estas terras. Mas já estou cansado, ninguém nunca me vê, ninguém nunca fala comigo.\"";
    next;
    mes "\"A não ser em dias como este, quando todas as criaturas monstruosas podem ser vistas por humanos. Mas eles sempre se assustam e fogem.  Por sorte eu achei essa abóbora esculpida que fiz ainda em vida e usei uma vela para fazer uma lanterna. Eu ajudo os poucos humanos que não tem medo de mim a saírem da floresta, iluminando seu caminho.\"";
    next;
    mes "\"Mas hoje estou cansado de ajudar. Talvez você possa me ajudar dessa vez.\"";
    menu
        "Eu? O.o", -;
    mes "[Jack Miserável]";
    mes "\"Sim. Poderia me ajudar a recolher doces, para que eu possa me distrair enquanto espero a morte durantes esses 40 anos que faltam?*-*\"";
    next;
    menu
        "Vou ajudá-lo.", -,
        "Ajudarei talvez no ano que vem.", L_Fechar;
    mes "[Jack Miserável]";
    mes "\"Mas não quero qualquer doce. Tem uns especiais feitos por bruxas, são pirulitos mágicos, só consigo comer eles, por causa da minha atual situação existencial ^^ e também tem umas balinhas magicas, uma delícia.\"";
    next;
    menu
        "Parece fácil. Vou ajudá-lo.", -,
        "Parece muito trabalhoso. Não vou ajudar.", L_Fechar;
    set quest_hlw2011_jack, 1;
    mes "[Jack Miserável]";
    mes "\"Legal, então me traga 15 balas e 15 pirulitos. =)\"";
    next;
    menu
        "Tudo isso?", -;
    mes "[Jack Miserável]";
    mes "\"Você disse que me ajudaria. Será que devo assombrá-lo pelos próximos 40 anos?\"";
    next;
    menu
        "Tudo bem tudo bem, adoro ajudar XD, onde encontro esses doces?", -;
    mes "Jack sorri.";
    mes "[Jack Miserável]";
    mes "\"Não sei bem, um espirito brincalhão andou roubando os doces das bruxas. Ele me disse que escondeu em casas humanas para que elas não os encontre. Você deve procurá-los de casa em casa. Mas tome cuidado, ouvi dizer que as bruxas também colocaram alguns monstros para reaver seus doces. Cuidado para não confundir as minhas gostosuras com as travessuras das bruxas e seus monstros. Agora vá e traga. Estou 'Morrendo' de fome. ;D\"";
    goto L_Fechar;

L_Retorno_Doces_Escondidos:
    // Checagem > goto L_Retorno_Naoachou_Doces;
    // Checagem > goto L_Retorno_Achou_Doces;
    goto L_Fechar;

L_Retorno_Naoachou_Doces:
    mes "[Jack Miserável]";
    mes "\"Vejo que você ainda não conseguiu todos os doces. Espero que não demore muito a encontrá-los. ;_;\"";
    goto L_Fechar;

L_Retorno_Achou_Doces:
    // Deleta itens
    mes "Você mal se aproxima de jack e ele já avança em direção aos doces, comendo tudo de uma vez.";
    next;
    mes "[Jack Miserável]";
    mes "\"Você conseguiu todos!  *-*  Foi difícil?\"";
    next;
    menu
        "Foi sim. Estavam bem escondidos.", -;
    mes "[Jack Miserável]";
    mes "\"Vejo que escolhi a pessoa certa para me ajudar. Olhe só, esculpi essa máscara enquanto esperava, fique com ela como prova da minha gratidão.  Até a próxima, amigo.\"";
    // Ganha item
    set quest_hlw2011_jack, 2;
    goto L_Fechar;

L_Inicio_Segunda_Parte:
    mes "[Jack Miserável]";
    mes "\"Olá, vejo que voltou. Sentiu minha falta né *-*\"";
    next;
    menu
        " ¬¬ Estava sem o que fazer e vim ver se precisa de ajuda com alguma coisa.", -;
    mes "[Jack Miserável]";
    mes "\"Sei... Na verdade, já que perguntou, tenho aqui a receita para aqueles doces encantados. A Múmia me disse que faria alguns se eu conseguísse os ingredientes. Me ajuda a pegar os ingredientes?\"";
    next;
    menu
        "Claro que ajudo.", -,
        "Acabei de lembrar que tenho um compromisso.", L_Fechar;
    set quest_hlw2011_jack, 3;
    mes "[Jack Miserável]";
    mes "\"Aqui a receita:\"";
    next;
    mes "5 Limos Gosmentos + 1 Maçã Caramelada fazem 1 pirulito verde medonho";
    mes "3 Jarras de Sangue + 4 Maças Mordidas fazem 1 pirulito vermelho sangue";
    mes "4 jujuba de crânio + 10 Blueberries fazem 1 pirulito Azul Booberry";
    next;
    mes "\"Não se esqueça de levar os ingredientes para a múmia e, quando estiver com os pirulitos, traga-os para mim.\"";

L_Retorno_Segunda_Parte:
    set @verde, countitem(1231);
    set @vermelho, countitem(1232);
    set @azul, countitem(1230);
    set @quantos_pirulitos, @verde + @vermelho + @azul;
    if (@verde <= 0 && @vermelho <= 0 && @azul <= 0) goto L_Segunda_Parte_NaoPirulito;
    if (quest_hlw2011_jack == 3) goto L_Segunda_Parte_Pirulito;
    if (quest_hlw2011_jack == 4) goto L_Segunda_Parte_MaisPirulitos;
    goto L_Fechar;

L_Segunda_Parte_Pirulito:
    menu
        "Aqui estão seus pirulitos.", -;
    if (@verde) delitem 1231, @verde;
    if (@vermelho) delitem 1232, @vermelho;
    if (@azul) delitem 1230, @azul;
    // Não sei se isso está equilibrado. Pode mudar se achar necessário.
    set @base, Baselevel * 50;
    set BaseExp, BaseExp + @base * @quantos_pirulitos;
    set quest_hlw2011_jack, 4;
    set quest_hlw2011_contagem_pirulitos, quest_hlw2011_contagem_pirulitos + @quantos_pirulitos;
    mes "Jack pega todos os pirulitos que você trouxe e já coloca tudo na boca de uma só vez!";
    if (quest_hlw2011_contagem_pirulitos >= 50) goto L_Segunda_Parte_Satisfeito;

    mes "[Jack Miserável]";
    mes "\"Delicioso. Mas são tão poucos. Será que você pode pedir para a múmia fazer mais alguns?\"";
    next;
    menu
        "Mais? ¬¬", -;
    mes "[Jack Miserável]";
    mes "\"Isso mesmo, terei de esperar o ano inteiro por isso, esqueceu? Pegue mais. Vá vá...\"";
    next;
    menu
        "Ok... Quando tiver mais eu trago para você.", -;
    goto L_Fechar;

L_Segunda_Parte_NaoPirulito:
    mes "[Jack Miserável]";
    mes "\"Por favor, quando tiver algum pirulito traga para mim imediatamente. Estou com muita fome.\"";
    goto L_Fechar;

L_Segunda_Parte_MaisPirulitos:
    menu
        "Aqui está... Mais pirulitos.", -;
    if (@verde) delitem 1231, @verde;
    if (@vermelho) delitem 1232, @vermelho;
    if (@azul) delitem 1230, @azul;
    // Não sei se isso está equilibrado. Pode mudar se achar necessário.
    set @base, Baselevel * 50;
    set BaseExp, BaseExp + @base * @quantos_pirulitos;
    set quest_hlw2011_contagem_pirulitos, quest_hlw2011_contagem_pirulitos + @quantos_pirulitos;
    mes "Jack pega todos os pirulitos que você trouxe e já coloca tudo na boca de uma só vez!";
    if (quest_hlw2011_contagem_pirulitos >= 50) goto L_Segunda_Parte_Satisfeito;
    mes "Jack pega todos os pirulitos que você trouxe e, mais uma vez, engole tudo ao mesmo tempo!";
    next;
    menu
        "Satisfeito?", -;
    mes "[Jack Miserável]";
    mes "\"Não, são poucos ainda. Vá pegar mais.\"";
    next;
    menu
        "Olha a exploração ¬¬", -;
    mes "[Jack Miserável]";
    mes "\"Mas eu só consigo encontrar esses doces 1 vez ao ano. É muito tempo... Tenho que comer o máximo possível!\"";
    goto L_Fechar;

L_Segunda_Parte_Satisfeito:
    mes "[Jack Miserável]";
    mes "\"Agora sim. Já comi doces o suficiente para passar o resto do ano cheio. Ano que vem não esqueça de vir me ajudar a juntar mais doces no Halloween =)\"";
    next;
    menu
        "x.x", -;
    mes "[Jack Miserável]";
    mes "\"Olha, achei essas luvas enquanto procurava doces. Elas não tem serventia para um fantasma, fique com elas como sinal de agradecimento por mais essa ajuda.\"";
    set quest_hlw2011_jack, 5;
    // Pega o item

L_Quest_Completa:
    mes "[Jack Miserável]";
    mes "\"Obrigado pela ajuda. =) \"";

L_Fechar:
    set @verde, 0;
    set @vermelho, 0;
    set @azul, 0;
    set @quantos_pirulitos, 0;
    close;
}

// Mumia

005.gat,107,79,0    script  Mumia   x,{

    if (quest_hlw2011_jack == 3) goto L_Fazer_Doces;
    if (quest_hlw2011_jack == 4) goto L_Fazer_Doces_Repete;
    mes "[Múmia]";
    mes "\"Olá.\"";
    goto L_Fechar;

L_Fazer_Doces:
    mes "[Múmia]";
    mes "\"Olá " + strcharinfo(0) + ", O jack me disse que você me passaria alguns ingredientes para fazer pirulitos mágicos. Você já quer que eu faça os pirulitos?\"";
    next;
    menu
        "Sim.", L_Menu_Pirulitos,
        "Por enquanto não.", L_Fechar;

L_Fazer_Doces_Repete:
    mes "[Múmia]";
    mes "\"Olá " + strcharinfo(0) + ", vejo que Jack não ficou satisfeito com os doces que você deu para ele. Quer fazer mais?\"";
    menu
        "Sim.", L_Menu_Pirulitos,
        "Por enquanto não.", L_Fechar;

L_Menu_Pirulitos:
    mes "[Múmia]";
    mes "\"Quais gostaria?\"";
    menu
        "Pirulito verde medonho", L_Verde,
        "Pirulito vermelho sangue", L_Vermelho,
        "Pirulito azul Booberry", L_Azul;

L_Verde:
    mes "\"E quantos gostaria que eu fizesse?\"";
    input @quantos_pirulitos;
    if (countitem(836) < 5 * @quantos_pirulitos || countitem(1229) < @quantos_pirulitos)
        mes "\"Para fazer " + @quantos_pirulitos + " unidade(s) desse tipo de pirulito eu preciso de " + 5 * @quantos_pirulitos + " Limos Gosmentos e " + @quantos_pirulitos + " Maça(s) caramelada(s). Vejo que você tem apenas " + countitem(836) + " Limos Gosmentos e " + countitem(1229) + " Maça(s) caramelada(s).\"";
    // Deleta itens
    // Ganha itens
    // Ganha EXP
    set @quantos_pirulitos, 0;
    mes "[Múmia]";
    mes "\"Aqui está. Gostaria que eu fizesse mais pirulitos?\"";
    menu
        "Sim, por favor.", -,
        "Talvez depois.", L_Fechar;
    goto L_Menu_Pirulitos;

L_Vermelho:
    mes "\"E quantos gostaria que eu fizesse?\"";
    input @quantos_pirulitos;
    if (countitem(1993) < 3 * @quantos_pirulitos || countitem(787) < 4 * @quantos_pirulitos)
        mes "\"Para fazer " + @quantos_pirulitos + " unidade(s) desse tipo de pirulito eu preciso de " + 3 * @quantos_pirulitos + " Jarras de Sangue e " + 4 * @quantos_pirulitos + " Maças Mordidas. Vejo que você tem apenas " + countitem(1993) + " Jarras de Sangue e " + countitem(787) + " Maças Mordidas.\"";
    // Deleta itens
    // Ganha itens
    // Ganha EXP
    set @quantos_pirulitos, 0;
    mes "[Múmia]";
    mes "\"Aqui está. Gostaria que eu fizesse mais pirulitos?\"";
    menu
        "Sim, por favor.", -,
        "Talvez depois.", L_Fechar;
    goto L_Menu_Pirulitos;

L_Azul:
    mes "\"E quantos gostaria que eu fizesse?\"";
    input @quantos_pirulitos;
    if (countitem(1998) < 4 * @quantos_pirulitos || countitem(1248) < 10 * @quantos_pirulitos)
        mes "\"Para fazer " + @quantos_pirulitos + " unidade(s) desse tipo de pirulito eu preciso de " + 4 * @quantos_pirulitos + " Jujubas de Crânio e " + 10 * @quantos_pirulitos + " Blueberries. Vejo que você tem apenas " + countitem(1998) + " Jujubas de Crânio e " + countitem(1248) + " Blueberries.\"";
    // Deleta itens
    // Ganha itens
    // Ganha EXP
    set @quantos_pirulitos, 0;
    mes "[Múmia]";
    mes "\"Aqui está. Gostaria que eu fizesse mais pirulitos?\"";
    menu
        "Sim, por favor.", -,
        "Talvez depois.", L_Fechar;
    goto L_Menu_Pirulitos;

L_Fechar:
    set @quantos_pirulitos, 0;
    close;