//
012-1.gat,36,99,0|shop|#FlowerShop|127,RedRose:*80,PinkRose:*80,YellowRose:*80,WhiteRose:*80,OrangeRose:*80,DarkRedRose:*80,RedTulip:*80,PinkTulip:*80,YellowTulip:*80,WhiteTulip:*80,OrangeTulip:*80
012-1.gat,36,99,0|script|Blossom|163
{
mes "[Blossom]";
mes "\"Hello, would you like to buy some flowers?\"";
menu
"Sure.", L_Shop,
"Not right now.", L_Close,
"Can I trade this Rose Hat for a differently colored one?", L_RoseHat;
L_Shop:
close2;
shop "#FlowerShop";
L_RoseHat:
set @base_id, 897;
mes "[Blossom]";
mes "\"Certainly, which color do you have?\"";
menu
"A red one.", L_MenuItems,
"A white one.", L_MenuItems,
"A pink one.", L_MenuItems,
"A yellow one.", L_MenuItems,
"An orange one.", L_MenuItems,
"A blue one.", L_MenuItems;
L_MenuItems:
set @have_id, @base_id + @menu - 1;
mes "[Blossom]";
mes "\"And which color would you like?\"";
menu
"A red one.", L_MenuItems1,
"A white one.", L_MenuItems1,
"A pink one.", L_MenuItems1,
"A yellow one.", L_MenuItems1,
"An orange one.", L_MenuItems1,
"A blue one.", L_MenuItems1;
L_MenuItems1:
set @receive_id, @base_id + @menu - 1;
if (@have_id == @receive_id)
goto L_SameColor;
if (countitem(@have_id) < 1)
goto L_NoItem;
delitem @have_id, 1;
getitem @receive_id, 1;
mes "[Blossom]";
mes "\"Here it is.\"";
goto L_Close;
L_NoItem:
mes "[Blossom]";
mes "\"Oh, you don't have a Rose Hat in that color.";
mes "Did you mean a different color?\"";
menu
"Yes, I meant a different color.", L_RoseHat,
"No, I changed my mind.", L_Close;
L_SameColor:
mes "[Blossom]";
mes "\"Oh, you already have a hat in that color.";
mes "Did you want something else?\"";
menu
"Yes, let me pick a different color.", L_RoseHat,
"No, I changed my mind.", L_Close;
L_Close:
set @base_id, 0;
set @have_id, 0;
set @receive_id, 0;
close;
}