66a2a39764
git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@12257 54d463be-8e91-2dee-dedb-b68131a5f0ec
118 lines
3.3 KiB
Plaintext
118 lines
3.3 KiB
Plaintext
//===== eAthena Script =======================================
|
|
//= Gemstone trader
|
|
//===== By: ==================================================
|
|
//= L0ne_W0lf
|
|
//===== Current Version: =====================================
|
|
//= 1.2
|
|
//===== Compatible With: =====================================
|
|
//= eAhena SVN
|
|
//===== Description: =========================================
|
|
//= [Aegis Conversion]
|
|
//= Trade various colors of gemstones for other color gemstones.
|
|
//===== Additional Comments: =================================
|
|
//= 1.0 Rescripted to Aegis 10.3 standards. [L0ne_W0lf]
|
|
//= Any notes pertaining to the prior trader may be found
|
|
//= in the cities/payon.txt
|
|
//= 1.1 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
|
|
//= 1.2 Updated input with min/max values. [L0ne_W0lf]
|
|
//= Added a checkweight.
|
|
//============================================================
|
|
|
|
payon,173,238,5 script Jade#pay 754,{
|
|
if (checkweight(1201,1) == 0) {
|
|
mes "^3355FFWait a second! Right now, you're carrying too many items with you. Please come back after putting some of your things into Kafra Storage.^000000";
|
|
close;
|
|
}
|
|
mes "[Jade]";
|
|
mes "Bring me two";
|
|
mes "Gemstones of the";
|
|
mes "same color, and I will";
|
|
mes "change them to Gemstones";
|
|
mes "of a different color.";
|
|
next;
|
|
switch(select("Blue Gemstones into Red ones!:Red Gemstones into Yellow ones!:Yellow Gemstones into Blue ones!")) {
|
|
case 1: callsub S_TradeGems,717,716;
|
|
case 2: callsub S_TradeGems,716,715;
|
|
case 3: callsub S_TradeGems,715,717;
|
|
}
|
|
|
|
S_TradeGems:
|
|
if (countitem(getarg(0)) < 2) {
|
|
mes "[Jade]";
|
|
mes "Hah...!";
|
|
mes "You're kidding me, right?";
|
|
mes "I can't provide you with this";
|
|
mes "service if you don't";
|
|
mes "give me at least";
|
|
mes "2 "+getitemname(getarg(0))+"s!";
|
|
close;
|
|
}
|
|
else {
|
|
set .@gems,countitem(getarg(0))/2;
|
|
mes "[Jade]";
|
|
mes "I believe I can create";
|
|
mes "a total of " + .@gems + " " + getitemname(getarg(1)) + "s";
|
|
mes "using the "+getitemname(getarg(0))+"s";
|
|
mes "that you currently have.";
|
|
mes "What do you want to do?";
|
|
next;
|
|
switch(select("Give me as many as you can.:I want to set the amount.:I quit.")) {
|
|
case 1:
|
|
delitem getarg(0),.@gems * 2;
|
|
getitem getarg(1),.@gems;
|
|
mes "[Jade]";
|
|
mes "There you go.";
|
|
mes "Feel free to come";
|
|
mes "back any time.";
|
|
mes "Hm, what's that look for?";
|
|
mes "Is there something on my face?";
|
|
close;
|
|
case 2:
|
|
mes "[Jade]";
|
|
mes "So how many";
|
|
mes "do you want?";
|
|
mes "The maximum number";
|
|
mes "that you can enter is 100.";
|
|
next;
|
|
while(1) {
|
|
input .@input,0,101;
|
|
if (.@input == 0) {
|
|
mes "[Jade]";
|
|
mes "None at all?";
|
|
mes "I guess you";
|
|
mes "changed your mind...";
|
|
close;
|
|
}
|
|
else if (.@input > 100) {
|
|
mes "[Jade]";
|
|
mes "Errm...";
|
|
mes "I asked you to enter";
|
|
mes "an amount no greater";
|
|
mes "than 100, remember...?";
|
|
next;
|
|
}
|
|
else {
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (.@gems > .@input) {
|
|
delitem getarg(0),.@input * 2;
|
|
getitem getarg(1),.@input;
|
|
mes "[Jade]";
|
|
mes "There you go.";
|
|
mes "Feel free to come";
|
|
mes "back any time.";
|
|
mes "Hm, what's that look for?";
|
|
mes "Is there something on my face?";
|
|
}
|
|
close;
|
|
case 3:
|
|
mes "[Jade]";
|
|
mes "Sure, no problem.";
|
|
mes "Come back any time.";
|
|
close;
|
|
}
|
|
}
|
|
}
|