// Part of Blue Sage quests
// author: Jenalya
// see bluesageConfig for detailed quest description
// Henriikka is one of the helpers working on sorting the bookpages, sends the player to Ensio
// can be questioned as part of the investigation subquest, but doesn't give hints
048-2.gat,94,86,0|script|Henriikka|363
{
set @investigate, ((QUEST_BlueSage & $@Q_BlueSageInvestigate_MASK) >> $@Q_BlueSageInvestigate_SHIFT);
set @bookpages, ((QUEST_BlueSage & $@Q_BlueSageBookPages_MASK) >> $@Q_BlueSageBookPages_SHIFT);
if (@bookpages == 31) goto L_Thank;
if (@bookpages > 0) goto L_Progress;
mes "You see a helper looking through some papers that have a strange smell.";
mes "[Henriikka]";
mes "\"Oh, hey. Welcome to the library, or what's left of it.\"";
mes "She sighs.";
menu
"What are you doing?",L_Next,
"You seem to be busy. See you.",L_Close;
L_Next:
mes "[Henriikka]";
mes "\"We're trying to repair the books by collecting the ripped out bookpages and sorting them and copying them for new books. It's a lot to do, and after being eaten by a slime they stink!";
mes "And a lot of pages are missing, since most of the slimes escaped. I suppose we'll have to go out and hunt them once we're done here.\"";
menu
"Maybe I can help with that?",L_Collect,
"Good luck.",L_Close;
L_Collect:
if (BaseLevel < $@Q_BlueSageMinimumLevel)
goto L_Careful;
mes "[Henriikka]";
mes "\"Oh, that'd be awesome! If you find some pages, you can bring them to Ensio.\"";
goto L_Investigate;
L_Careful:
mes "[Henriikka]";
mes "\"Oh, that's very kind, but those slimes are dangerous! Better become a bit stronger first.\"";
goto L_Close;
L_Progress:
mes "[Henriikka]";
mes "\"If you get any bookpages from the slimes, bring them to Ensio. Thanks for your help!\"";
goto L_Investigate;
L_Thank:
mes "[Henriikka]";
mes "\"I'm so glad we didn't have to go out to hunt the slimes! Thank you!\"";
goto L_Investigate;
L_Investigate:
if ((@investigate == 3) || (@investigate == 4)) goto L_Ask_Visitor;
if ((@investigate == 5) || (@investigate == 8)) goto L_Ask_Helper;
if ((@investigate == 6) || (@investigate == 7) || (@investigate == 9) || (@investigate == 10)) goto L_Ask_Both;
goto L_Close;
L_Ask_Visitor:
menu
"Can you tell me anything about the visitor with the mask?",L_Visitor,
"I need to leave.",L_Close;
L_Ask_Helper:
menu
"What's your opinion of Peetu and how he does his work?",L_Helper,
"See you later.",L_Close;
L_Ask_Both:
menu
"Can you tell me anything about the visitor with the mask?",L_Visitor,
"What's your opinion of Peetu and how he does his work?",L_Helper,
"Bye.",L_Close;
L_Visitor:
mes "[Henriikka]";
mes "\"With a mask? I don't really remember... We have so many visitors. Though I suppose someone wearing a mask would be noticeable... But I'm so worn out from the past few days that I'm just glad I can even recall my own name! Sorry.\"";
goto L_Close;
L_Helper:
mes "[Henriikka]";
mes "\"Oh, I never really thought about that. He was the one who failed the sealing spell, right? But I heard it's a quite difficult spell, so I suppose this could've happened to anyone. I don't know. Why are you asking such difficult questions?\"";
next;
mes "\"I need to go on with sorting the bookpages now.\"";
goto L_Close;
L_Close:
set @investigate, 0;
set @bookpages, 0;
close;
}
