// This file is part of Christmas Event 2011
// author: Jenalya
// Grombadil gives the task to search for the lost Reinboos after the player talked to the Chief helper
// Home Reinboos: Reimeles, Leimeres
// Lost Reinboos: Meireles, Meileres, Reilemes, Leiremes
// coding for a lost reinboo
// b1b0
// 00 : haven't talked yet
// 01 : talked
// 10 : Good
// 11 : Bad
030-1.gat,103,54,0|script|Grombadil|105,{
if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day))
goto L_NoEvent;
if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day))
goto L_RewardTime;
if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search;
mes "The man is grumbling to himself and seems very worried.";
if (xmas11 & $@xmas11_talkedToChief)
goto L_Help;
goto L_Close;
L_Help:
menu
"Chief Warrick asked me to help out a bit.",-,
"Nevermind.",L_Close;
mes "[Santa's Helper]";
mes "\"He did? Well, I indeed have a problem.";
mes "I'm Grombadil, the equerry of Santa's Reinboos.\"";
next;
mes "\"Those Reinboos, you know, are much more clever than a normal animal and can even talk.";
mes "But they are more like children than an adult.\"";
next;
mes "\"And I fear something happened to some of my little fosterlings.";
mes "It isn't a long time until Christmas and they all should have already arrived here.";
mes "But look!\"";
next;
mes "He waves his hands to point at the area around him.";
mes "[Grombadil]";
mes "\"Only Reimeles and Leimeres are here.";
mes "Meireles, Reilemes, Meileres and Leiremes are missing!";
mes "And I have no idea where they could be!\"";
next;
mes "\"They could be anywhere and I can't leave here. Would you search them for me?\"";
menu
"Don't worry, they're as good as home.",-,
"I'll keep my eyes open.",-,
"I'm on my way!",-;
mes "Grombadil looks relieved.";
mes "[Grombadil]";
mes "\"Oh, one thing before you leave!\"";
next;
mes "\"As I told you, they're a bit like children. And as children they love all kind of candy.";
mes "But it's not good for them, they get their stomache upset from eating sweet stuff.\"";
next;
mes "\"So don't give them candy! You might want to take some apples with you, that's much better for them.";
mes "Red apples. Don't give them candy. Good luck.\"";
set xmas11, xmas11 | $@xmas11_startedReinbooSearch;
goto L_Close;
L_Search:
mes "[Grombadil]";
mes "\"Welcome back! I hope you'll be able to find my fosterlings before it's too late.";
mes "Imagine what would be if they don't arrive in time!\"";
next;
mes "\"And remember, don't give them candy, but red apples. Those are the best ones.";
goto L_Close;
L_NoEvent:
mes "[Grombadil]";
mes "\"Everything is calm and peaceful.\"";
mes "He smiles.";
goto L_Close;
L_RewardTime:
mes "[Grombadil]";
mes "\"Hu, all this stress is finally over. You might want to talk to Santa.\"";
goto L_Close;
L_Close:
close;
}
030-1.gat,96,57,0|script|Reimeles|170,{
if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day))
goto L_NoEvent;
if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day))
goto L_RewardTime;
mes "[Reimeles the Reinboo]";
mes "\"I miss Reilemes, he's my best friend.\"";
close;
L_NoEvent:
mes "[Reimeles the Reinboo]";
mes "\"Hello. Do you want to see Santa? He's not at home.\"";
close;
L_RewardTime:
mes "[Reimeles the Reinboo]";
mes "\"Ah, I'm tired. But it was fun!\"";
close;
}
030-1.gat,100,46,0|script|Leimeres|170,{
if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day))
goto L_NoEvent;
if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day))
goto L_RewardTime;
mes "[Leimeres the Reinboo]";
mes "\"I like the snowflakes. Look, I can catch them with my mouth!\"";
close;
L_NoEvent:
mes "[Leimeres the Reinboo]";
mes "\"It's nice here, isn't it?\"";
close;
L_RewardTime:
mes "[Leimeres the Reinboo]";
mes "\"It was fun to ride with Santa!\"";
close;
}
006-1.gat,126,112,0|script|Meireles the Reinboo|170,{
set @cake_amount, 3;
set @apple_amount, 5;
if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day))
goto L_NoEvent;
if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day))
goto L_RewardTime;
if ((xmas11 & $@xmas11_firstReinboo) && (xmas11 & $@xmas11_firstReinbooDone)) goto L_Bad;
if (!(xmas11 & $@xmas11_firstReinboo) && (xmas11 & $@xmas11_firstReinbooDone)) goto L_Good;
if (xmas11 & $@xmas11_firstReinboo) goto L_Food;
if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search;
mes "The reinboo shys away from you. It seems to be frightened.";
goto L_Close;
L_Search:
mes "The Reinboo comes close to you.";
mes "[Meireles the Reinboo]";
mes "\"Your smell is familiar!\"";
menu
"Grombadil sent me to search you.",-,
"I don't talk with animals!",L_Close;
mes "[Meireles the Reinboo]";
mes "\"Oh! Yes, I shouldn't be here, but home.";
mes "But I got lost.\"";
menu
"What happened?",-;
mes "The Reinboo seems to feel ashamed.";
mes "[Meireles the Reinboo]";
mes "\"I was stupid. I was on the way home, but there were some guy with a mask.";
mes "He gave me tasty cakes! So tasty...\"";
next;
mes "\"He made me go with him, he said he has more cakes. But he tricked me!";
mes "He dashed some powder into my face and ran away.";
mes "The powder burned in my nose and made me forget to the smell of the way home.\"";
next;
mes "\"I tried to find the way, but I'm totally lost.";
mes "This place is very odd.\"";
next;
mes "\"And all this running around made me become hungry.\"";
L_Food:
mes "The Reinboo snuffles on you.";
set xmas11, xmas11 | $@xmas11_firstReinboo;
next;
if (countitem("OrangeCake") >= @cake_amount)
goto L_Cake;
mes "[Meireles the Reinboo]";
mes "\"Can you bring me some Orange Cakes? Please?";
mes "When I had something to eat I can follow your smell back home.\"";
if (countitem("RedApple") < @apple_amount)
goto L_Close;
menu
"I'll try to find some.",L_Close,
"Cakes aren't good for you, remember? But I have some apples.",L_GiveApple;
L_Cake:
mes "[Meireles the Reinboo]";
mes "\"You have some Orange Cakes! Give them to me! Please?\"";
if (countitem("RedApple") >= @apple_amount)
menu
"I have something that is better for you. Apples!",L_GiveApple,
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
menu
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
L_GiveCake:
if (countitem("OrangeCake") < @cake_amount)
goto L_NoItem;
delitem "OrangeCake", @cake_amount;
mes "[Meireles the Reinboo]";
mes "\"Yam!\"";
mes "The Reinboos munches the Orange Cakes.";
set xmas11, xmas11 | $@xmas11_firstReinbooDone;
goto L_Close;
L_GiveApple:
if (countitem("RedApple") < @apple_amount)
goto L_NoItem;
delitem "RedApple", @apple_amount;
mes "[Meireles the Reinboo]";
mes "\"Apples, bah. Ok.\"";
mes "The Reinboos munches the Apples.";
set xmas11, xmas11 | $@xmas11_firstReinbooDone;
set xmas11, xmas11 & ~$@xmas11_firstReinboo;
goto L_Close;
L_NoItem:
mes "[Meireles the Reinboo]";
mes "\"Hu? It disappeared!\"";
goto L_Close;
L_Good:
mes "[Meireles the Reinboo]";
mes "\"I feel better now. I'm about to follow your smell back to Grombadil.\"";
goto L_Close;
L_Bad:
mes "[Meireles the Reinboo]";
mes "\"Uh, I don't feel well. My stomache hurts. I have to rest a little longer.\"";
goto L_Close;
L_NoEvent:
mes "The Reinboo just looks at you.";
goto L_Close;
L_RewardTime:
mes "[Meireles the Reinboo]";
mes "\"Phew, I that was short. I nearly didn't make it back in time.";
mes "But everything went well and now I came back because this place made me curious.\"";
goto L_Close;
L_Close:
set @cake_amount, 0;
set @apple_amount, 0;
close;
}
012-1.gat,66,55,0|script|Meileres the Reinboo|170,{
set @cake_amount, 3;
set @apple_amount, 5;
if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day))
goto L_NoEvent;
if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day))
goto L_RewardTime;
if ((xmas11 & $@xmas11_secondReinboo) && (xmas11 & $@xmas11_secondReinbooDone)) goto L_Bad;
if (!(xmas11 & $@xmas11_secondReinboo) && (xmas11 & $@xmas11_secondReinbooDone)) goto L_Good;
if (xmas11 & $@xmas11_secondReinboo) goto L_Food;
if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search;
mes "The reinboo shys away from you. It seems to be frightened.";
goto L_Close;
L_Search:
mes "The Reinboo snuffles on your clothes.";
mes "[Meileres the Reinboo]";
mes "\"Mh, you smell like home.\"";
menu
"Grombadil sent me to search you.",-,
"Back off from me!",L_Close;
mes "[Meileres the Reinboo]";
mes "\"Grombadil! He must be worried!\"";
menu
"He is. How did you get lost?",-,
"What are you doing here?",-;
mes "The Reinboo seems abashed.";
mes "[Meileres the Reinboo]";
mes "\"There was this guy with the candy. Very tasty candy.";
mes "He promised to give me more candy, so I followed him.\"";
next;
mes "\"But he didn't give me more candy! He dashed some stinging powder into my face!";
mes "It hurt my nose and my eyes. And then he was gone and I don't know where I am.\"";
next;
mes "\"Usually I could find the way back with my remarkable nose.";
mes "But because of that stinging powder I can't remember the smell of the way back.\"";
next;
mes "\"And I'm hungry.\"";
L_Food:
mes "The Reinboo snuffles on you again.";
set xmas11, xmas11 | $@xmas11_secondReinboo;
next;
if (countitem("ChocolateCake") >= @cake_amount)
goto L_Cake;
mes "[Meileres the Reinboo]";
mes "\"Can you bring me some Chocolate Cakes? Please?";
mes "Then I can go home, I can follow your smell to find the way.\"";
if (countitem("RedApple") < @apple_amount)
goto L_Close;
menu
"I will see what I can do.",L_Close,
"Cakes aren't good for you! But I have some apples.",L_GiveApple;
L_Cake:
mes "[Meileres the Reinboo]";
mes "\"You have some Chocolate Cakes! Can I have them? Can I have them?\"";
if (countitem("RedApple") >= @apple_amount)
menu
"I have something that is better for you. Apples!",L_GiveApple,
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
menu
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
L_GiveCake:
if (countitem("ChocolateCake") < @cake_amount)
goto L_NoItem;
delitem "ChocolateCake", @cake_amount;
mes "[Meileres the Reinboo]";
mes "\"Yay!\"";
mes "The Reinboos munches the Chocolate Cakes.";
set xmas11, xmas11 | $@xmas11_secondReinbooDone;
goto L_Close;
L_GiveApple:
if (countitem("RedApple") < @apple_amount)
goto L_NoItem;
delitem "RedApple", @apple_amount;
mes "[Meileres the Reinboo]";
mes "\"Hrm, ok, I'll eat the apples.\"";
mes "The Reinboos munches the Apples.";
set xmas11, xmas11 | $@xmas11_secondReinbooDone;
set xmas11, xmas11 & ~$@xmas11_secondReinboo;
goto L_Close;
L_NoItem:
mes "[Meileres the Reinboo]";
mes "\"Hu? It disappeared!\"";
goto L_Close;
L_Good:
mes "[Meileres the Reinboo]";
mes "\"Hello! I'm about to follow your smell back to Grombadil.\"";
goto L_Close;
L_Bad:
mes "[Meileres the Reinboo]";
mes "\"Uh, my stomache. It hurts. I have to rest a little longer.\"";
goto L_Close;
L_NoEvent:
mes "The Reinboo just looks at you.";
goto L_Close;
L_RewardTime:
mes "[Meileres the Reinboo]";
mes "\"Phew, I that was short. I nearly didn't make it back in time.";
mes "But everything went well and now I came back because this place is interesting.\"";
goto L_Close;
L_Close:
set @cake_amount, 0;
set @apple_amount, 0;
close;
}
018-1.gat,114,41,0|script|Reilemes the Reinboo|170,{
set @cake_amount, 3;
set @apple_amount, 5;
if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day))
goto L_NoEvent;
if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day))
goto L_RewardTime;
if ((xmas11 & $@xmas11_thirdReinboo) && (xmas11 & $@xmas11_thirdReinbooDone)) goto L_Bad;
if (!(xmas11 & $@xmas11_thirdReinboo) && (xmas11 & $@xmas11_thirdReinbooDone)) goto L_Good;
if (xmas11 & $@xmas11_thirdReinboo) goto L_Food;
if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search;
mes "The reinboo shys away from you. It seems to be frightened.";
goto L_Close;
L_Search:
mes "The Reinboo comes closer and snuffles on your clothes.";
mes "[Reilemes the Reinboo]";
mes "\"Did you met Reimeles? He's my best friend. I miss him.\"";
menu
"Yes, Grombadil sent me to search you.",-,
"Hey, stay away from me!",L_Close;
mes "[Reilemes the Reinboo]";
mes "\"Oh, Grombadil! He's very nervous, right? I should have been home long ago.\"";
menu
"He is. How did you get lost?",-,
"Reimeles misses you too, why are you here?",-;
mes "The Reinboo seems embarrassed.";
mes "[Reilemes the Reinboo]";
mes "\"I got distracted. Some man gave me tasty candy!";
mes "He said he had more at his place and told me to come with him.\"";
next;
mes "\"But there wasn't more tasty candy! He dashed some stinging powder into my face!";
mes "My eyes and nose still feel itchy.\"";
next;
mes "\"That's why I can't find the way back. My nose doesn't remember the smell!\"";
next;
mes "\"And I'm hungry.\"";
L_Food:
mes "The Reinboo snuffles on you again.";
set xmas11, xmas11 | $@xmas11_thirdReinboo;
next;
if (countitem("WhiteCake") >= @cake_amount)
goto L_Cake;
mes "[Reilemes the Reinboo]";
mes "\"Can you bring me some White Cakes? I love those!";
mes "Then I can go home, I can follow your smell to find the way.\"";
if (countitem("RedApple") < @apple_amount)
goto L_Close;
menu
"I will see what I can do.",L_Close,
"Cakes aren't good for you! But I have some apples.",L_GiveApple;
L_Cake:
mes "[Reilemes the Reinboo]";
mes "\"You have some White Cakes! I want those! Please, can I have them?\"";
if (countitem("RedApple") >= @apple_amount)
menu
"I have something that is better for you. Apples!",L_GiveApple,
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
menu
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
L_GiveCake:
if (countitem("WhiteCake") < @cake_amount)
goto L_NoItem;
delitem "WhiteCake", @cake_amount;
mes "[Reilemes the Reinboo]";
mes "\"Yay!\"";
mes "The Reinboos munches the White Cakes.";
set xmas11, xmas11 | $@xmas11_thirdReinbooDone;
goto L_Close;
L_GiveApple:
if (countitem("RedApple") < @apple_amount)
goto L_NoItem;
delitem "RedApple", @apple_amount;
mes "[Reilemes the Reinboo]";
mes "\"Hrm, ok, I'll eat the apples.\"";
mes "The Reinboos munches the Apples.";
set xmas11, xmas11 | $@xmas11_thirdReinbooDone;
set xmas11, xmas11 & ~$@xmas11_thirdReinboo;
goto L_Close;
L_NoItem:
mes "[Reilemes the Reinboo]";
mes "\"Hu? It disappeared!\"";
goto L_Close;
L_Good:
mes "[Reilemes the Reinboo]";
mes "\"Hello! I'm about to follow your smell back to Grombadil and Reimeles.\"";
goto L_Close;
L_Bad:
mes "[Reilemes the Reinboo]";
mes "\"Uh, my stomache. It hurts. I have to rest a little longer.\"";
goto L_Close;
L_NoEvent:
mes "The Reinboo just looks at you.";
goto L_Close;
L_RewardTime:
mes "[Reilemes the Reinboo]";
mes "\"I nearly was late! But everything went well.";
mes "Now I'm playing hide and seek with Reimeles.\"";
goto L_Close;
L_Close:
set @cake_amount, 0;
set @apple_amount, 0;
close;
}
017-1.gat,35,49,0|script|Leiremes the Reinboo|170,{
set @cake_amount, 3;
set @apple_amount, 5;
if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day))
goto L_NoEvent;
if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day))
goto L_RewardTime;
if ((xmas11 & $@xmas11_fourthReinboo) && (xmas11 & $@xmas11_fourthReinbooDone)) goto L_Bad;
if (!(xmas11 & $@xmas11_fourthReinboo) && (xmas11 & $@xmas11_fourthReinbooDone)) goto L_Good;
if (xmas11 & $@xmas11_fourthReinboo) goto L_Food;
if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search;
mes "The reinboo shys away from you. It seems to be frightened.";
goto L_Close;
L_Search:
mes "The Reinboo approaches you and snuffles on your clothes.";
mes "[Leiremes the Reinboo]";
mes "\"I like your smell. You smell like home. Have you been at Santa's place?\"";
menu
"I was, I'm searching for you.",-,
"Wah, a talking Reinboo!",L_Close;
mes "[Leiremes the Reinboo]";
mes "\"Searching for me? Oh, I'm late, right? I'm so sorry. I didn't mean to cause trouble.\"";
menu
"How did you get lost?",-,
"Well, now I found you. How did come here?",-;
mes "The Reinboo looks at you sheepishly.";
mes "[Leiremes the Reinboo]";
mes "\"I... I did something stupid. There was a man, he was really friendly to me. He gave me candy!";
mes "I love candy. It's so tasty! The man said he can give me more at his place.\"";
next;
mes "\"So I went with him. But he was evil! He didn't give me candy! He dashed some bad itchy powder in my face.";
mes "It made me forget the smell of the way home and now I'm lost.\"";
next;
mes "\"I was wandering around and searched it. But that only made me tired. And hungry. Oh, I wish I had more candy.\"";
L_Food:
mes "The Reinboo snuffles on you again.";
set xmas11, xmas11 | $@xmas11_fourthReinboo;
next;
if (countitem("AppleCake") >= @cake_amount)
goto L_Cake;
mes "[Leiremes the Reinboo]";
mes "\"Can you bring me some Apple Cakes? I like them so much.";
mes "After that I will feel better and go home. Because I can follow your smell.\"";
if (countitem("RedApple") < @apple_amount)
goto L_Close;
menu
"Ok, hang on.",L_Close,
"Apple Cakes? What about apples instead?",L_GiveApple;
L_Cake:
mes "[Leiremes the Reinboo]";
mes "\"You have some Apple Cakes! Tasty tasty Apple Cakes! Can I have them?\"";
if (countitem("RedApple") >= @apple_amount)
menu
"I have something that is better for you. Apples!",L_GiveApple,
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
menu
"No, I want to keep them.",L_Close,
"Ok, here.",L_GiveCake;
L_GiveCake:
if (countitem("AppleCake") < @cake_amount)
goto L_NoItem;
delitem "AppleCake", @cake_amount;
mes "[Leiremes the Reinboo]";
mes "\"Hooray!\"";
mes "The Reinboos munches the Apple Cakes.";
set xmas11, xmas11 | $@xmas11_fourthReinbooDone;
goto L_Close;
L_GiveApple:
if (countitem("RedApple") < @apple_amount)
goto L_NoItem;
delitem "RedApple", @apple_amount;
mes "[Leiremes the Reinboo]";
mes "\"But - but cakes are much more tasty! Bleah, ok.\"";
mes "The Reinboos munches the Apples.";
set xmas11, xmas11 | $@xmas11_fourthReinbooDone;
set xmas11, xmas11 & ~$@xmas11_fourthReinboo;
goto L_Close;
L_NoItem:
mes "[Leiremes the Reinboo]";
mes "\"Hu? It disappeared!\"";
goto L_Close;
L_Good:
mes "[Leiremes the Reinboo]";
mes "\"I'm not hungry anymore. Just a short break, then I'll go home.\"";
goto L_Close;
L_Bad:
mes "[Leiremes the Reinboo]";
mes "\"Uh uh uh. It hurts. I need to rest a little longer.\"";
goto L_Close;
L_NoEvent:
mes "The Reinboo just looks at you.";
goto L_Close;
L_RewardTime:
mes "[Leiremes the Reinboo]";
mes "\"Ha, it was fun to ride with Santa! I came back here because this place is nice.\"";
goto L_Close;
L_Close:
set @cake_amount, 0;
set @apple_amount, 0;
close;
}
