- Set svn:eol-style=native property for recently added text files.
- Removed trailing spaces/tabs. - Changed duplicate() to use a floating source npc. git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@15430 54d463be-8e91-2dee-dedb-b68131a5f0ec
This commit is contained in:
brianluau
parent
64c9226a4c
commit
30b6766d2c
@ -1,261 +1,262 @@
|
|||||||
//===== rAthena Script =======================================
|
//===== rAthena Script =======================================
|
||||||
//= Rare Diamond Merchant
|
//= Rare Diamond Merchant
|
||||||
//===== By: ==================================================
|
//===== By: ==================================================
|
||||||
//= Z3R0
|
//= Z3R0
|
||||||
//===== Current Version: =====================================
|
//===== Current Version: =====================================
|
||||||
//= 1.5
|
//= 1.5
|
||||||
//===== Compatible With: =====================================
|
//===== Compatible With: =====================================
|
||||||
//= rAthena SVN
|
//= rAthena SVN
|
||||||
//===== Description: =========================================
|
//===== Description: =========================================
|
||||||
//= [Aegis Conversion]
|
//= [Aegis Conversion]
|
||||||
//= Exchanges 17 Carat Diamond
|
//= Exchanges 17 Carat Diamond
|
||||||
//===== Additional Comments: =================================
|
//===== Additional Comments: =================================
|
||||||
//= v1.0 First / Optimized Version
|
//= v1.0 First / Optimized Version
|
||||||
//= v1.1 Adjusted for Missing ; on Line #271 (#15425)
|
//= v1.1 Adjusted for Missing ; on Line #271 (#15425)
|
||||||
//= v1.2 Removed Comments per Request (#15426)
|
//= v1.2 Removed Comments per Request (#15426)
|
||||||
//= v1.3 Changed Emotion # to Const Definition (#15427)
|
//= v1.3 Changed Emotion # to Const Definition (#15427)
|
||||||
//= v1.4 Removed Double Space on Line #148 (#15428)
|
//= v1.4 Removed Double Space on Line #148 (#15428)
|
||||||
//= v1.5 Added This Version History (#15429)
|
//= v1.5 Added This Version History (#15429)
|
||||||
//============================================================
|
//============================================================
|
||||||
|
|
||||||
prontera,165,89,6 script Rare Diamond Merchant#1 58,{
|
- script RareDiamondMerchant 58,{
|
||||||
|
|
||||||
set .@npc$, "[Rare Diamond Merchant]";
|
set .@npc$, "[Rare Diamond Merchant]";
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Ladies and Gentlemen! ! !";
|
mes "Ladies and Gentlemen! ! !";
|
||||||
mes "You've heard rumors but you've never once seen with your own eyes";
|
mes "You've heard rumors but you've never once seen with your own eyes";
|
||||||
mes "the world's rarest diamond!";
|
mes "the world's rarest diamond!";
|
||||||
mes "The ^FF82FF'17 Carat Diamond'^000000 is currently on sale for a cheap price!!";
|
mes "The ^FF82FF'17 Carat Diamond'^000000 is currently on sale for a cheap price!!";
|
||||||
mes "If valuable diamonds interest you then listen up!";
|
mes "If valuable diamonds interest you then listen up!";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "You can give the diamond as a gift to your lover.";
|
mes "You can give the diamond as a gift to your lover.";
|
||||||
mes "The receiver of the ^FF82FF'17 Carat Diamond'^000000 will cherish it";
|
mes "The receiver of the ^FF82FF'17 Carat Diamond'^000000 will cherish it";
|
||||||
mes "and treasure you in their heart.";
|
mes "and treasure you in their heart.";
|
||||||
emotion e_loud;
|
emotion e_loud;
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "What? You don't have a lover?";
|
mes "What? You don't have a lover?";
|
||||||
mes "You can still just hang on to it for yourself.";
|
mes "You can still just hang on to it for yourself.";
|
||||||
mes "The enchanting aura of the ^FF82FF'17 Carat Diamond'^000000 is likely";
|
mes "The enchanting aura of the ^FF82FF'17 Carat Diamond'^000000 is likely";
|
||||||
mes "to bring love into your life.";
|
mes "to bring love into your life.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Known as the captivating diamond of diamonds...";
|
mes "Known as the captivating diamond of diamonds...";
|
||||||
mes "It is the ^FF82FF'17 Carat Diamond'^000000!";
|
mes "It is the ^FF82FF'17 Carat Diamond'^000000!";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
set .@menu$, "^FF82FF'17 Carat Diamond'^000000?";
|
set .@menu$, "^FF82FF'17 Carat Diamond'^000000?";
|
||||||
|
|
||||||
if (countitem(6024)) {
|
if (countitem(6024)) {
|
||||||
set .@menu$, .@menu$ + ":Exchange my 17 Carat Diamond for zeny..";
|
set .@menu$, .@menu$ + ":Exchange my 17 Carat Diamond for zeny..";
|
||||||
}
|
}
|
||||||
|
|
||||||
switch(select(.@menu$)) {
|
switch(select(.@menu$)) {
|
||||||
case 1:
|
case 1:
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Yes!";
|
mes "Yes!";
|
||||||
mes "Hehe, the ^FF82FF'17 Carat Diamond'^000000 you see right now";
|
mes "Hehe, the ^FF82FF'17 Carat Diamond'^000000 you see right now";
|
||||||
mes "is one of the highest quality 17 carat diamonds.";
|
mes "is one of the highest quality 17 carat diamonds.";
|
||||||
mes "Comparing it to any pea-sized, colorless rock you may have";
|
mes "Comparing it to any pea-sized, colorless rock you may have";
|
||||||
mes "dug up from Morroc is unspeakable!";
|
mes "dug up from Morroc is unspeakable!";
|
||||||
emotion e_omg;
|
emotion e_omg;
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Some claim that this is the very same diamond";
|
mes "Some claim that this is the very same diamond";
|
||||||
mes "that was seen by Kachua in Comodo!";
|
mes "that was seen by Kachua in Comodo!";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
if (select("End Conversation:How much is it?") == 1) {
|
if (select("End Conversation:How much is it?") == 1) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "It's rather inexpensive!";
|
mes "It's rather inexpensive!";
|
||||||
mes "If you're interested, talk to me any time!";
|
mes "If you're interested, talk to me any time!";
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Of course! The most important thing is price!";
|
mes "Of course! The most important thing is price!";
|
||||||
mes "As I've said earlier, the ^FF82FF'17 Carat Diamond'^000000 has been";
|
mes "As I've said earlier, the ^FF82FF'17 Carat Diamond'^000000 has been";
|
||||||
mes "appraised as a 17 carat diamond.";
|
mes "appraised as a 17 carat diamond.";
|
||||||
mes "There aren't many like it in the world.";
|
mes "There aren't many like it in the world.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "The price is a mere 500 million zeny!";
|
mes "The price is a mere 500 million zeny!";
|
||||||
mes "There is also a 1,000,000z service fee.";
|
mes "There is also a 1,000,000z service fee.";
|
||||||
mes "Compared to the quality of the diamond";
|
mes "Compared to the quality of the diamond";
|
||||||
mes "this is a small price to pay.";
|
mes "this is a small price to pay.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
if (select("^828282It's too expensive.^000000:I'll buy it.") == 1) {
|
if (select("^828282It's too expensive.^000000:I'll buy it.") == 1) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "To say that a diamond such as the";
|
mes "To say that a diamond such as the";
|
||||||
mes "^FF82FF'17 Carat Diamond'^000000 is too expensive, ";
|
mes "^FF82FF'17 Carat Diamond'^000000 is too expensive, ";
|
||||||
mes "you leave me speechless.";
|
mes "you leave me speechless.";
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "OOOH! I knew from the moment I saw you that you were the rightful";
|
mes "OOOH! I knew from the moment I saw you that you were the rightful";
|
||||||
mes "owner of this wonderful diamond.";
|
mes "owner of this wonderful diamond.";
|
||||||
mes "I'm glad I wasn't wrong!";
|
mes "I'm glad I wasn't wrong!";
|
||||||
mes "I believe this diamond will suit you quite well.";
|
mes "I believe this diamond will suit you quite well.";
|
||||||
mes "All I need from you is to complete this contract.";
|
mes "All I need from you is to complete this contract.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
while(1) {
|
while(1) {
|
||||||
|
|
||||||
if (select("^B9062FI will sign the contract.^000000:^828282Nevermind, I changed my mind.^000000") == 2) {
|
if (select("^B9062FI will sign the contract.^000000:^828282Nevermind, I changed my mind.^000000") == 2) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "I see, that's too bad..";
|
mes "I see, that's too bad..";
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "What is your name?";
|
mes "What is your name?";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes "[" + strcharinfo(0) + "]";
|
mes "[" + strcharinfo(0) + "]";
|
||||||
mes "My name is " + strcharinfo(0) + ".";
|
mes "My name is " + strcharinfo(0) + ".";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Alright then, please sign here.";
|
mes "Alright then, please sign here.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
input .@charname$;
|
input .@charname$;
|
||||||
|
|
||||||
if (.@charname$ == strcharinfo(0)) {
|
if (.@charname$ == strcharinfo(0)) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Okay, good.";
|
mes "Okay, good.";
|
||||||
mes "All that is left now is payment.";
|
mes "All that is left now is payment.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
if (Zeny >= 501000000) {
|
if (Zeny >= 501000000) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes ". . . . . .";
|
mes ". . . . . .";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Calculating the price and service fee..";
|
mes "Calculating the price and service fee..";
|
||||||
mes "501,000,000 zeny.";
|
mes "501,000,000 zeny.";
|
||||||
mes "Amount has been confirmed.";
|
mes "Amount has been confirmed.";
|
||||||
|
|
||||||
emotion e_loud;
|
emotion e_loud;
|
||||||
|
|
||||||
set Zeny, Zeny - 501000000;
|
set Zeny, Zeny - 501000000;
|
||||||
|
|
||||||
getitem 6024, 1;
|
getitem 6024, 1;
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "You may exchange the diamond back for zeny at any time.";
|
mes "You may exchange the diamond back for zeny at any time.";
|
||||||
mes "However, there will be a 1,000,000z service fee.";
|
mes "However, there will be a 1,000,000z service fee.";
|
||||||
mes "Thank you for your business.";
|
mes "Thank you for your business.";
|
||||||
|
|
||||||
emotion e_thx;
|
emotion e_thx;
|
||||||
|
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Hm?";
|
mes "Hm?";
|
||||||
mes "I'm sorry, but you don't have sufficient funds.";
|
mes "I'm sorry, but you don't have sufficient funds.";
|
||||||
mes "Including the service fee, a total of 501,000,000z is required.";
|
mes "Including the service fee, a total of 501,000,000z is required.";
|
||||||
mes "Please check your zeny balance and try again.";
|
mes "Please check your zeny balance and try again.";
|
||||||
|
|
||||||
emotion e_hmm;
|
emotion e_hmm;
|
||||||
|
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Is this really your signature?";
|
mes "Is this really your signature?";
|
||||||
mes "Will sign again to confirm?";
|
mes "Will sign again to confirm?";
|
||||||
next;
|
next;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
case 2:
|
case 2:
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "AAH. You would like to exchange your ^FF82FF'17 Carat Diamond'^000000 for zeny?";
|
mes "AAH. You would like to exchange your ^FF82FF'17 Carat Diamond'^000000 for zeny?";
|
||||||
|
|
||||||
emotion e_gasp;
|
emotion e_gasp;
|
||||||
next;
|
next;
|
||||||
|
|
||||||
if (select("Yes:No") == 2) {
|
if (select("Yes:No") == 2) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Then, what is it you desire?..";
|
mes "Then, what is it you desire?..";
|
||||||
mes ". . . . . ....";
|
mes ". . . . . ....";
|
||||||
|
|
||||||
emotion e_dots;
|
emotion e_dots;
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "I see. After I receive your signature, ";
|
mes "I see. After I receive your signature, ";
|
||||||
mes "You must offer your ^FF82FF'17 Carat Diamond'^000000.";
|
mes "You must offer your ^FF82FF'17 Carat Diamond'^000000.";
|
||||||
mes "Also don't forget there is a 1,000,000z service fee!";
|
mes "Also don't forget there is a 1,000,000z service fee!";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "What is your name?";
|
mes "What is your name?";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes "[" + strcharinfo(0) + "]";
|
mes "[" + strcharinfo(0) + "]";
|
||||||
mes "My name is " + strcharinfo(0) + ".";
|
mes "My name is " + strcharinfo(0) + ".";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Alright then, please sign here.";
|
mes "Alright then, please sign here.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
while (1) {
|
while (1) {
|
||||||
if (select("Sign:Don't Sign") == 2) {
|
if (select("Sign:Don't Sign") == 2) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "The trade cannot be completed without your signature.";
|
mes "The trade cannot be completed without your signature.";
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
|
|
||||||
input .@charname$;
|
input .@charname$;
|
||||||
|
|
||||||
if (.@charname$ == strcharinfo(0)) {
|
if (.@charname$ == strcharinfo(0)) {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Your signature has been received.";
|
mes "Your signature has been received.";
|
||||||
mes "I will now take your ^FF82FF'17 Carat Diamond'^000000..";
|
mes "I will now take your ^FF82FF'17 Carat Diamond'^000000..";
|
||||||
mes "You will receive ^0000FF499,000,000z^000000 afterwards.";
|
mes "You will receive ^0000FF499,000,000z^000000 afterwards.";
|
||||||
next;
|
next;
|
||||||
|
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Thank you for your business.";
|
mes "Thank you for your business.";
|
||||||
mes "Whenever you need a ^FF82FF'17 Carat Diamond'^000000,";
|
mes "Whenever you need a ^FF82FF'17 Carat Diamond'^000000,";
|
||||||
mes "come back anytime with 500 million zeny.";
|
mes "come back anytime with 500 million zeny.";
|
||||||
|
|
||||||
emotion e_thx;
|
emotion e_thx;
|
||||||
|
|
||||||
delitem 6024, 1;
|
delitem 6024, 1;
|
||||||
|
|
||||||
set Zeny, Zeny + 499000000;
|
set Zeny, Zeny + 499000000;
|
||||||
close;
|
close;
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
mes .@npc$;
|
mes .@npc$;
|
||||||
mes "Is this really your signature?";
|
mes "Is this really your signature?";
|
||||||
mes "Will sign again to confirm?";
|
mes "Will sign again to confirm?";
|
||||||
next;
|
next;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
geffen,106,63,6 duplicate(Rare Diamond Merchant#1) Rare Diamond Merchant#2 58
|
prontera,165,89,6 duplicate(RareDiamondMerchant) Rare Diamond Merchant#1 58
|
||||||
morocc,146,100,6 duplicate(Rare Diamond Merchant#1) Rare Diamond Merchant#3 58
|
geffen,106,63,6 duplicate(RareDiamondMerchant) Rare Diamond Merchant#2 58
|
||||||
alberta,129,60,6 duplicate(Rare Diamond Merchant#1) Rare Diamond Merchant#4 58
|
morocc,146,100,6 duplicate(RareDiamondMerchant) Rare Diamond Merchant#3 58
|
||||||
lighthalzen,163,65,6 duplicate(Rare Diamond Merchant#1) Rare Diamond Merchant#5 58
|
alberta,129,60,6 duplicate(RareDiamondMerchant) Rare Diamond Merchant#4 58
|
||||||
rachel,106,142,6 duplicate(Rare Diamond Merchant#1) Rare Diamond Merchant#6 58
|
lighthalzen,163,65,6 duplicate(RareDiamondMerchant) Rare Diamond Merchant#5 58
|
||||||
payon,180,130,6 duplicate(Rare Diamond Merchant#1) Rare Diamond Merchant#7 58
|
rachel,106,142,6 duplicate(RareDiamondMerchant) Rare Diamond Merchant#6 58
|
||||||
|
payon,180,130,6 duplicate(RareDiamondMerchant) Rare Diamond Merchant#7 58
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user