031-1,81,24,0 script Debug#Angela NPC195,{
mes "Current state: " + QL_CINDY;
mes "---";
mes "Available states:";
mes "0 - can not do the quest.";
mes "5 - does not have the quest.";
mes "6 - got the quest.";
mes "1 - can go rescue cindy.";
mes "2 - rescued cindy.";
mes "3 - got reward from cindy.";
mes "4 - got reward from angela.";
menu
"set state", L_Set,
"close", L_close;
L_Set:
input @state;
if(@state < 0 || @state > 6) set @state, 0;
QL_CINDY = @state;
goto L_close;
L_close:
close;
OnInit:
if (!debug) disablenpc strnpcinfo(0);
end;
}
031-1,79,24,0 script Angela NPC195,15,15,{
if (QL_CINDY == 3) goto L_Please_Visit_Again;
if (QL_CINDY > 1 && QL_CINDY < 5) goto L_Please_Visit;
if (QL_CINDY == 1) goto L_Please_Help;
mes "[Angela]";
mes "\"Please, I need help! My little daughter!\"";
next;
mes "\"It's terrible, oh my dear child!\"";
next;
if (countitem("ConcentrationPotion") > 0 && BaseLevel >= .minlevel && QL_CINDY == 6)
goto L_Menu_Potion;
menu
"\"Please calm down and tell me what happened.\"", L_Whining,
"Leave", L_close;
OnTouch:
if(BaseLevel >= .minlevel && QL_CINDY < 1)
QL_CINDY = 5;
end;
L_Whining:
mes "[Angela]";
mes "\"My poor little daughter, please! Oh no, oh no...\"";
next;
mes "\"We need to do something! My poor little Cindy! My cute little girl!\"";
next;
mes "\"It's so terrible, how could that happen? Please, I need help, it's so terrible.\"";
next;
mes "\"Those awful filthy monsters - terrible!\"";
next;
mes "\"Oh Cindy, my little Cindy - oh no...\"";
next;
mes "\"Please help, we need to do something!\"";
next;
mes "\"It's so terrible, my poor cute little Cindy...\"";
next;
mes "\"Oh, when I think what might happen to her right now!\"";
next;
mes "She is crying and sobbing.";
next;
mes "It seems she is too upset to tell you anything helpful. If she would just calm down and concentrate a bit...";
if(BaseLevel >= .minlevel) goto L_GetQuest;
goto L_close;
L_GetQuest:
next;
QL_CINDY = 6;
mes "Perhaps you could give her something to help concentrate ?";
goto L_close;
L_Menu_Potion:
menu
"\"Please calm down and tell me what happened.\"", L_Whining,
"Give her a concentration potion.", L_Calm_Down,
"Leave", L_close;
L_Calm_Down:
if (countitem("ConcentrationPotion") == 0)
goto L_No_Potion;
delitem "ConcentrationPotion", 1;
mes "She drinks the concentration potions and calms down.";
mes "[Angela]";
mes "\"Thank you, this was helpful.\"";
next;
mes "\"My daughter Cindy and I were on our way to Santa, to bring him some presents. Many people here in Nivalis are helping Santa with his business.\"";
next;
mes "\"When we passed the entrance of this cave, a pack of Yetis came out of there. It's disturbing, because usually they are very shy.\"";
next;
mes "\"We tried to run away, but there were too many of them. They took my poor little Cindy and all the presents with them.\"";
next;
mes "\"Oh my poor little girl. I'm so worried - what might they do with her? Oh no!\"";
next;
mes "\"You look like an adventurer! Please, can you go in that cave and rescue my little Cindy? I beg you for help!\"";
QL_CINDY = 1;
goto L_close;
L_No_Potion:
mes "You don't have a concentration potion.";
goto L_close;
L_Please_Help:
mes "[Angela]";
mes "\"Please go in that cave and rescue my daughter!\"";
goto L_close;
L_Please_Visit:
mes "[Angela]";
mes "\"Thank you so much for rescuing my beloved Cindy. Please come to visit us in our house at the beach.\"";
next;
mes "\"My husband is an adventurer like you, and I want to give you something he got on his travels to show my gratitude.\"";
goto L_close;
L_Please_Visit_Again:
mes "[Angela]";
mes "\"Hello! You are welcome to visit us in our house at the beach everytime. Cindy loves to see you!\"";
next;
mes "\"If you have found any present boxes the Yetis took away, please bring them to our house. Usually, the Yetis are very shy... their behavior is a bit odd.\"";
goto L_close;
L_close:
close;
OnInit:
.minlevel = 70;
end;
}
