//

001-1.gat,137,78,0	script	Sarah	106,{
	if (TMW_Quest >= 8) goto L_Done;
	if (TMW_Quest == 7) goto L_Progress;
	if (TMW_Quest == 6) goto L_Start;

	mes "[Sarah]";
	mes "\"Boy am I hungry\"";
	close;

L_Start:

	set @TEMP, rand(2);
	if(@TEMP == 0) goto L_Opening0;
	if(@TEMP == 1) goto L_Opening1;

L_Opening0:
	mes "[Sarah]";
	mes "\"[Cherry Cake] is the best!\"";
	next;
	goto L_Ask;

L_Opening1:
	mes "[Sarah]";
	mes "\"[Cherry Cake]...I love it \"";
	next;
	goto L_Ask;

L_Ask:
	mes "\"Can you bring me a piece of [Cherry Cake]?\"";
	menu
		"Yes", L_Req0,
		"No", L_No;

L_Req0:
	mes "[Sarah]";
	mes "\"I want one piece of [Cherry Cake]! If you get one, I'll give you a hat !\"";
	next;
	goto L_Set;

L_Set:
	set TMW_Quest,7;
	mes "[Sarah]";
	mes "\"Please bring me it!\"";
	close;

L_Progress:
	if (countitem("CherryCake") < 1) goto L_NotEnough;
	mes "[Sarah]";
	mes "\"Hummm!\"";
	next;
	mes "You brought me my [Cherry Cake]!  Here is the hat, as promised.\"";
	emotion 9;
	getinventorylist;
	if ((@inventorylist_count - (countitem("CherryCake") == 1)) > 99) goto L_TooMany;
	delitem "CherryCake", 1;
	getitem "serfhat", 1;
	set TMW_Quest, 8;
	close;

L_NotEnough:
	mes "[Sarah]";
	mes "\"I'm starving, please bring me a [Cherry Cake].\"";
	close;

L_Done:
	mes "[Sarah]";
	mes "\"It was so tasty, I can't eat anything more... Thank you!\"";
	emotion 9;
	close;

L_No:
	close;

L_TooMany:
	next;
	mes "[Sarah]";
	mes "\"You don't have room for my reward. I'll wait until you do.\"";
	close;
}