//Gemstones: Diamond (white) , Ruby (red), Emerald (green), Sapphire (blue), Topaz (yellow), Amethyst (purple)
//The power of the gems is important to future balance of these rings. Are they related to stats, tiers of power, schools of magic?
021-2.gat,43,62,0|script|Inya|106,{
mes "[Inya]";
mes "\"I am Inya, a jeweler of fine rings. If you have a Simple Ring and a gem, I can make a nice ring for you for 1,000,000 gold pieces.\"";
next;
mes "\"Also, if you have a ring with gems on it, I can remove the gems and return the Simple Ring to you for 500,000 gold pieces.\"";
next;
mes "\"So, how can I help you?\"";
menu
"I have a wedding ring, will that do?", L_Inya_Wedding_Ring,
"I'd like to remove a gem (500000 GP).", L_Inya_Remove_RingGem,
"I'd like to add a gem (1000000 GP).", L_Inya_Add_RingGem,
"Not interested.", L_Inya_NotInterested;
close;
L_Inya_Wedding_Ring:
mes "[Inya]";
mes "\"No, sorry. I do not alter wedding rings at this time.\"";
close;
L_Inya_Remove_RingGem:
mes "[Inya]";
mes "\"What kind of gem would you like to have removed?\"";
menu
"Diamond.", L_Inya_Remove_Diamond,
"Ruby.", L_Inya_Remove_Ruby,
"Emerald.", L_Inya_Remove_Emerald,
"Sapphire.", L_Inya_Remove_Sapphire,
"Topaz.", L_Inya_Remove_Topaz,
"Amethyst.", L_Inya_Remove_Amethyst,
"I've changed my mind.", L_Inya_NotInterested;
close;
L_Inya_Add_RingGem:
mes "[Inya]";
mes "\"What kind of gem would you like to add?\"";
menu
"Diamond.", L_Inya_Add_Diamond,
"Ruby.", L_Inya_Add_Ruby,
"Emerald.", L_Inya_Add_Emerald,
"Sapphire.", L_Inya_Add_Sapphire,
"Topaz.", L_Inya_Add_Topaz,
"Amethyst.", L_Inya_Add_Amethyst,
"I've changed my mind.", L_Inya_NotInterested;
close;
L_Inya_Remove_Diamond:
if ( (zeny < 500000)
| (countitem ("RingGemWhite") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 500000;
delitem "RingGemWhite", 1;
getitem "RingSimple", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Remove_Ruby:
if ( (zeny < 500000)
| (countitem ("RingGemRed") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 500000;
delitem "RingGemRed", 1;
getitem "RingSimple", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Remove_Emerald:
if ( (zeny < 500000)
| (countitem ("RingGemGreen") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 500000;
delitem "RingGemGreen", 1;
getitem "RingSimple", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Remove_Sapphire:
if ( (zeny < 500000)
| (countitem ("RingGemBlue") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 500000;
delitem "RingGemBlue", 1;
getitem "RingSimple", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Remove_Topaz:
if ( (zeny < 500000)
| (countitem ("RingGemYellow") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 500000;
delitem "RingGemYellow", 1;
getitem "RingSimple", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Remove_Amethyst:
if ( (zeny < 500000)
| (countitem ("RingGemPurple") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 500000;
delitem "RingGemPurple", 1;
getitem "RingSimple", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Add_Diamond:
if ( (zeny < 1000000)
| (countitem ("RingSimple") < 1)
| (countitem ("GemRawWhite") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 1000000;
delitem "RingSimple", 1;
delitem "GemRawWhite", 1;
getitem "RingGemWhite", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Add_Ruby:
if ( (zeny < 1000000)
| (countitem ("RingSimple") < 1)
| (countitem ("GemRawRed") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 1000000;
delitem "RingSimple", 1;
delitem "GemRawRed", 1;
getitem "RingGemRed", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Add_Emerald:
if ( (zeny < 1000000)
| (countitem ("RingSimple") < 1)
| (countitem ("GemRawGreen") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 1000000;
delitem "RingSimple", 1;
delitem "GemRawGreen", 1;
getitem "RingGemGreen", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Add_Sapphire:
if ( (zeny < 1000000)
| (countitem ("RingSimple") < 1)
| (countitem ("GemRawBlue") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 1000000;
delitem "RingSimple", 1;
delitem "GemRawBlue", 1;
getitem "RingGemBlue", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Add_Topaz:
if ( (zeny < 1000000)
| (countitem ("RingSimple") < 1)
| (countitem ("GemRawYellow") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 1000000;
delitem "RingSimple", 1;
delitem "GemRawYellow", 1;
getitem "RingGemYellow", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_Add_Amethyst:
if ( (zeny < 1000000)
| (countitem ("RingSimple") < 1)
| (countitem ("GemRawPurple") < 1) )
goto L_Inya_Not_Enough;
set zeny, zeny - 1000000;
delitem "RingSimple", 1;
delitem "GemRawPurple", 1;
getitem "RingGemPurple", 1;
mes "[Inya]";
mes "\"Here you go.\"";
close;
L_Inya_NotInterested:
mes "[Inya]";
mes "\"Come back later and I will try to be of assistance.\"";
close;
L_Inya_Not_Enough:
mes "[Inya]";
mes "\"I am sorry, you simply do not seem to have the necessary items for me to help you. Please come back when you do, and I would be more than happy to help you out.\"";
close;
}