summaryrefslogtreecommitdiff
path: root/npc/other/comodo_gambling.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/other/comodo_gambling.txt')
-rw-r--r--npc/other/comodo_gambling.txt1240
1 files changed, 620 insertions, 620 deletions
diff --git a/npc/other/comodo_gambling.txt b/npc/other/comodo_gambling.txt
index 9412810e1..29f0a0db8 100644
--- a/npc/other/comodo_gambling.txt
+++ b/npc/other/comodo_gambling.txt
@@ -1,620 +1,620 @@
-//===== eAthena Script =======================================
-//= Comodo Gambling
-//===== By: ==================================================
-//= Reddozen, Cypress, Zefris
-//===== Current Version: =====================================
-//= 0.5
-//===== Compatible With: =====================================
-//= Any eAthena Version
-//===== Description: =========================================
-//= Random items from 3crt diamonds in Comodo
-//===== Additional Comments: =================================
-//= 0.1- so far just a basic setup, and working on the function
-//= 0.2- fixed some spelling errors and set zeny,zeny - (@amount * 55000)[Cypress]
-//= 0.3- Revised the gambling NPC using the official Aegis script [MasterOfMuppets]
-//= for information. Thanks to Zefris for doing it for me.
-//= 0.4- Fixed an exploit. thanks to reddozen [MasterOfMuppets]
-//= 0.5- Moved item check to the proper place [Lupus]
-//============================================================
-
-mjolnir_02.gat,85,364,3 script Blacksmith Miner 726,{
-
- mes "[Dwayne]";
- mes "Wahahahaha~";
- mes "I've dug up a fortune!";
- next;
-
- mes "[Dwayne]";
- mes "Diamonds! Hundreds and";
- mes "thousands of Diamonds,";
- mes "all of them mine!";
- mes "I'm rich!";
- next;
-
- menu "I want to buy some.",L1,"Congratulations.",-;
-
- mes "[Dwayne]";
- mes "Haha, thank you~";
- mes "If by any chance";
- mes "you need a diamond,";
- mes "please drop by.";
- mes "I'll sell them to";
- mes "you at a cheap price.";
- close;
-
- L1:
- mes "[Dwayne]";
- mes "Ah, you have an";
- mes "eye for valuables!";
- mes "Sure, sure why not!";
- mes "I'll give you a discount, too!";
- mes "55,000 Zeny for a diamond,";
- mes "how does that sound?";
- next;
-
- mes "[Dwayne]";
- mes "How many";
- mes "diamonds do you need?";
- mes "If you change your mind";
- mes "please enter '0' to cancel";
- next;
-
- set @amount, 0;
- input @amount;
- if(@amount<1){
- mes "[Dwayne]";
- mes "Alright, you've";
- mes "canceled the trade.";
- mes "Take care!";
- close;
- }
- if((@amount*55000>zeny) || (@amount>500)){
- mes "[Dwayne]";
- mes "Hahahaha~";
- mes "You can't fool me!";
- mes "You dont have enough";
- mes "Zeny for that many!";
- close;
- }
- set zeny,zeny - (@amount * 55000);
- getitem 732, @amount;
- mes "[Dwayne]";
- mes "Thank you for";
- mes "buying my diamonds!";
- mes "You're welcome to";
- mes "come back anytime.";
- close;
-
-}
-
-
-comodo.gat,219,160,3 script Kachua 91,{
-
- mes "[Kachua]";
- mes "Diamonds...!";
- mes "I simply can't get my mind off";
- mes "them! Ever since that man showed me";
- mes "that diamond, it's been all I think";
- mes "about!";
- next;
- menu "Would you like to have mine?",L_1,"Ah, what a shame...",-;
-
- mes "[Kachua]";
- mes "Yes, I know...";
- mes "Even among everything";
- mes "in my collections, nothing";
- mes "compares to diamonds...";
- close;
-
- L_1:
- mes "[Kachua]";
- mes "Are you sure you don't mind";
- mes "giving this to me? Thank you";
- mes "so much! I don't have much in";
- mes "the way of money, but i can give";
- mes "you something from one of my";
- mes "collections~";
- next;
-
- mes "[Kachua]";
- mes "So what would";
- mes "you like to have?";
- next;
-
- set @item,512;
- switch( select( "Weapon", "Armor", "Garment", "Helmet", "Shoes", "Shield" ) )
- {
- case 1: // Weapons
- set @gamble,rand(1,1000);
- if ((@gamble > 920) && (@gamble < 931))
- {
- set @gamble2,rand(1,51);
- if (@gamble2 == 1)
- set @item,1128;
- else if (@gamble2 == 2)
- set @item,1120;
- else if (@gamble2 == 3)
- set @item,1127;
- else if (@gamble2 == 4)
- set @item,1158;
- else if (@gamble2 == 5)
- set @item,1155;
- else if (@gamble2 == 6)
- set @item,1220;
- else if (@gamble2 == 7)
- set @item,1222;
- else if (@gamble2 == 8)
- set @item,1253;
- else if (@gamble2 == 9)
- set @item,1529;
- else if (@gamble2 == 10)
- set @item,1251;
- else if (@gamble2 == 11)
- set @item,1361;
- else if (@gamble2 == 12)
- set @item,1258;
- else if (@gamble2 == 13)
- set @item,1257;
- else if (@gamble2 == 14)
- set @item,1256;
- else if (@gamble2 == 15)
- set @item,1259;
- else if (@gamble2 == 16)
- set @item,1260;
- else if (@gamble2 == 17)
- set @item,1716;
- else if (@gamble2 == 18)
- set @item,1715;
- else if (@gamble2 == 19)
- set @item,1711;
- else if (@gamble2 == 20)
- set @item,1702;
- else if (@gamble2 == 21)
- set @item,1520;
- else if (@gamble2 == 22)
- set @item,1610;
- else if (@gamble2 == 23)
- set @item,1615;
- else if (@gamble2 == 24)
- set @item,1602;
- else if (@gamble2 == 25)
- set @item,1461;
- else if (@gamble2 == 26)
- set @item,1402;
- else if (@gamble2 == 27)
- set @item,1953;
- else if (@gamble2 == 28)
- set @item,1957;
- else if (@gamble2 == 29)
- set @item,1552;
- else if (@gamble2 == 30)
- set @item,1551;
- else if (@gamble2 == 31)
- set @item,1553;
- else if (@gamble2 == 32)
- set @item,1554;
- else if (@gamble2 == 33)
- set @item,1555;
- else if (@gamble2 == 34)
- set @item,1556;
- else if (@gamble2 == 35)
- set @item,1951;
- else if (@gamble2 == 36)
- set @item,1959;
- else if (@gamble2 == 37)
- set @item,1961;
- else if (@gamble2 == 38)
- set @item,1955;
- else if (@gamble2 == 39)
- set @item,1810;
- else if (@gamble2 == 40)
- set @item,1910;
- else if (@gamble2 == 41)
- set @item,1906;
- else if (@gamble2 == 42)
- set @item,1902;
- else if (@gamble2 == 43)
- set @item,1904;
- else if (@gamble2 == 44)
- set @item,1912;
- else if (@gamble2 == 45)
- set @item,1908;
- else if (@gamble2 == 46)
- set @item,1808;
- else if (@gamble2 == 47)
- set @item,1802;
- else if (@gamble2 == 48)
- set @item,1812;
- else if (@gamble2 == 49)
- set @item,1806;
- else if (@gamble2 == 50)
- set @item,1804;
- else if (@gamble2 == 51)
- set @item,1550;
- }
- else if ((@gamble > 0) && (@gamble < 201))
- set @item,1201;
- else if ((@gamble > 200) && (@gamble < 301))
- set @item,1101;
- else if ((@gamble > 300) && (@gamble < 401))
- set @item,1601;
- else if ((@gamble > 400) && (@gamble < 501))
- set @item,1116;
- else if ((@gamble > 500) && (@gamble < 601))
- set @item,1250;
- else if ((@gamble > 600) && (@gamble < 701))
- set @item,1301;
- else if ((@gamble > 700) && (@gamble < 801))
- set @item,1701;
- else if ((@gamble > 800) && (@gamble < 851))
- set @item,1504;
- else if ((@gamble > 850) && (@gamble < 901))
- set @item,1604;
- else if ((@gamble > 900) && (@gamble < 911))
- set @item,1108;
- else if ((@gamble > 910) && (@gamble < 921))
- set @item,1163;
- else if ((@gamble > 930) && (@gamble < 961))
- set @item,1522;
- else if ((@gamble > 960) && (@gamble < 971))
- set @item,1608;
- else if ((@gamble > 970) && (@gamble < 981))
- set @item,1408;
- else if ((@gamble > 980) && (@gamble < 991))
- set @item,1452;
- else if ((@gamble > 990) && (@gamble < 1001))
- set @item,1208;
- break;
-
- case 2: // Armors
- set @gamble,rand(1,500);
- if ((@gamble > 299) && (@gamble < 302))
- {
- set @gamble2,rand(1,30);
- if ((@gamble2 > 0) && (@gamble2 < 3))
- set @item,2315;
- else if ((@gamble2 > 2) && (@gamble2 < 5))
- set @item,2336;
- else if ((@gamble2 > 4) && (@gamble2 < 7))
- set @item,2318;
- else if ((@gamble2 > 6) && (@gamble2 < 9))
- set @item,2326;
- else if ((@gamble2 > 8) && (@gamble2 < 11))
- set @item,2327;
- else if ((@gamble2 > 10) && (@gamble2 < 13))
- set @item,2317;
- else if ((@gamble2 > 12) && (@gamble2 < 15))
- set @item,2331;
- else if ((@gamble2 > 14) && (@gamble2 < 17))
- set @item,2342;
- else if ((@gamble2 > 16) && (@gamble2 < 19))
- set @item,2311;
- else if ((@gamble2 > 18) && (@gamble2 < 21))
- set @item,2320;
- else if ((@gamble2 > 20) && (@gamble2 < 23))
- set @item,2319;
- else if ((@gamble2 > 22) && (@gamble2 < 25))
- set @item,2344;
- else if ((@gamble2 > 24) && (@gamble2 < 27))
- set @item,2346;
- else if ((@gamble2 > 26) && (@gamble2 < 29))
- set @item,2348;
- else if ((@gamble2 > 28) && (@gamble2 < 31))
- set @item,2350;
- }
- else if ((@gamble > 0) && (@gamble < 51))
- set @item,2301;
- else if ((@gamble > 50) && (@gamble < 101))
- set @item,2302;
- else if ((@gamble > 100) && (@gamble < 151))
- set @item,2303;
- else if ((@gamble > 150) && (@gamble < 201))
- set @item,2304;
- else if ((@gamble > 200) && (@gamble < 251))
- set @item,2305;
- else if ((@gamble > 250) && (@gamble < 300))
- set @item,2301;
- else if ((@gamble > 301) && (@gamble < 351))
- set @item,2307;
- else if ((@gamble > 350) && (@gamble < 401))
- set @item,2309;
- else if ((@gamble > 400) && (@gamble < 402))
- set @item,2322;
- else if ((@gamble > 401) && (@gamble < 403))
- set @item,2310;
- else if ((@gamble > 402) && (@gamble < 411))
- set @item,2306;
- else if ((@gamble > 410) && (@gamble < 416))
- set @item,2308;
- else if ((@gamble > 415) && (@gamble < 421))
- set @item,2313;
- else if ((@gamble > 420) && (@gamble < 426))
- set @item,2337;
- else if ((@gamble > 425) && (@gamble < 431))
- set @item,2316;
- else if ((@gamble > 430) && (@gamble < 436))
- set @item,2325;
- else if ((@gamble > 435) && (@gamble < 441))
- set @item,2341;
- else if ((@gamble > 440) && (@gamble < 446))
- set @item,2330;
- else if ((@gamble > 445) && (@gamble < 451))
- set @item,2314;
- else if ((@gamble > 450) && (@gamble < 456))
- set @item,2335;
- else if ((@gamble > 455) && (@gamble < 461))
- set @item,2324;
- else if ((@gamble > 460) && (@gamble < 466))
- set @item,2329;
- else if ((@gamble > 465) && (@gamble < 471))
- set @item,2340;
- else if ((@gamble > 470) && (@gamble < 476))
- set @item,2312;
- else if ((@gamble > 475) && (@gamble < 481))
- set @item,2339;
- else if ((@gamble > 480) && (@gamble < 486))
- set @item,2328;
- else if ((@gamble > 485) && (@gamble < 491))
- set @item,2321;
- else if ((@gamble > 490) && (@gamble < 501))
- set @item,2323;
- break;
-
- case 3: // Garments
- set @gamble,rand(1,500);
- if ((@gamble > 200) && (@gamble < 204))
- {
- set @gamble2,rand(1,11);
- if ((@gamble2 > 0) && (@gamble2 < 3))
- set @item,2506;
- else if ((@gamble2 > 2) && (@gamble2 < 5))
- set @item,2504;
- else if ((@gamble2 > 4) && (@gamble2 < 8))
- set @item,2508;
- else if ((@gamble2 > 7) && (@gamble2 < 11))
- set @item,2507;
- else if (@gamble2 == 11)
- set @item,2523;
- }
- else if ((@gamble > 0) && (@gamble < 101))
- set @item,2503;
- else if ((@gamble > 100) && (@gamble < 201))
- set @item,2505;
- else if ((@gamble > 203) && (@gamble < 451))
- set @item,2501;
- else if ((@gamble > 450) && (@gamble < 501))
- set @item,2502;
- break;
-
- case 4: //headgears
- set @gamble,rand(1,1000);
- if ((@gamble > 299) && (@gamble < 304))
- {
- set @gamble2,rand(1,76);
- if ((@gamble2 > 0) && (@gamble2 < 3))
- set @item,5109;
- else if ((@gamble2 > 2) && (@gamble2 < 5))
- set @item,2285;
- else if ((@gamble2 > 4) && (@gamble2 < 7))
- set @item,2255;
- else if ((@gamble2 > 6) && (@gamble2 < 9))
- set @item,5045;
- else if ((@gamble2 > 8) && (@gamble2 < 11))
- set @item,2233;
- else if ((@gamble2 > 10) && (@gamble2 < 13))
- set @item,2231;
- else if ((@gamble2 > 12) && (@gamble2 < 15))
- set @item,2217;
- else if ((@gamble2 > 14) && (@gamble2 < 17))
- set @item,2206;
- else if ((@gamble2 > 16) && (@gamble2 < 19))
- set @item,2246;
- else if ((@gamble2 > 18) && (@gamble2 < 21))
- set @item,2261;
- else if ((@gamble2 > 20) && (@gamble2 < 23))
- set @item,2287;
- else if ((@gamble2 > 22) && (@gamble2 < 25))
- set @item,5012;
- else if ((@gamble2 > 24) && (@gamble2 < 27))
- set @item,2244;
- else if ((@gamble2 > 26) && (@gamble2 < 29))
- set @item,5057;
- else if ((@gamble2 > 28) && (@gamble2 < 31))
- set @item,2248;
- else if ((@gamble2 > 30) && (@gamble2 < 33))
- set @item,2223;
- else if ((@gamble2 > 32) && (@gamble2 < 35))
- set @item,2247;
- else if ((@gamble2 > 34) && (@gamble2 < 37))
- set @item,2245;
- else if ((@gamble2 > 36) && (@gamble2 < 39))
- set @item,5003;
- else if ((@gamble2 > 38) && (@gamble2 < 41))
- set @item,2225;
- else if ((@gamble2 > 40) && (@gamble2 < 43))
- set @item,5017;
- else if ((@gamble2 > 42) && (@gamble2 < 45))
- set @item,5030;
- else if ((@gamble2 > 44) && (@gamble2 < 47))
- set @item,5035;
- else if ((@gamble2 > 46) && (@gamble2 < 49))
- set @item,2250;
- else if ((@gamble2 > 48) && (@gamble2 < 51))
- set @item,2277;
- else if ((@gamble2 > 50) && (@gamble2 < 53))
- set @item,5011;
- else if ((@gamble2 > 52) && (@gamble2 < 55))
- set @item,2290;
- else if ((@gamble2 > 54) && (@gamble2 < 57))
- set @item,5010;
- else if ((@gamble2 > 56) && (@gamble2 < 60))
- set @item,2259;
- else if ((@gamble2 > 59) && (@gamble2 < 62))
- set @item,5008;
- else if ((@gamble2 > 61) && (@gamble2 < 63))
- set @item,2249;
- else if ((@gamble2 > 62) && (@gamble2 < 65))
- set @item,2229;
- else if (@gamble2 == 65)
- set @item,2258;
- else if (@gamble2 == 66)
- set @item,2274;
- else if (@gamble2 == 67)
- set @item,5019;
- else if (@gamble2 == 68)
- set @item,2254;
- else if (@gamble2 == 69)
- set @item,5007;
- else if (@gamble2 == 70)
- set @item,5066;
- else if (@gamble2 == 71)
- set @item,2235;
- else if (@gamble2 == 72)
- set @item,2234;
- else if (@gamble2 == 73)
- set @item,2256;
- else if (@gamble2 == 74)
- set @item,5093;
- else if (@gamble2 == 75)
- set @item,5072;
- else if (@gamble2 == 76)
- set @item,2231;
- }
- else if ((@gamble > 0) && (@gamble < 101))
- set @item,2226;
- else if ((@gamble > 100) && (@gamble < 201))
- set @item,2211;
- else if ((@gamble > 200) && (@gamble < 300))
- set @item,2209;
- else if ((@gamble > 303) && (@gamble < 401))
- set @item,2220;
- else if ((@gamble > 400) && (@gamble < 501))
- set @item,2232;
- else if ((@gamble > 500) && (@gamble < 601))
- set @item,2216;
- else if ((@gamble > 600) && (@gamble < 701))
- set @item,2230;
- else if ((@gamble > 700) && (@gamble < 801))
- set @item,2224;
- else if ((@gamble > 800) && (@gamble < 901))
- set @item,2222;
- else if ((@gamble > 900) && (@gamble < 906))
- set @item,2228;
- else if ((@gamble > 905) && (@gamble < 911))
- set @item,2252;
- else if ((@gamble > 910) && (@gamble < 916))
- set @item,2227;
- else if ((@gamble > 915) && (@gamble < 921))
- set @item,2221;
- else if ((@gamble > 920) && (@gamble < 926))
- set @item,2299;
- else if ((@gamble > 925) && (@gamble < 931))
- set @item,2236;
- else if ((@gamble > 930) && (@gamble < 936))
- set @item,2275;
- else if ((@gamble > 935) && (@gamble < 941))
- set @item,5015;
- else if ((@gamble > 940) && (@gamble < 946))
- set @item,5061;
- else if ((@gamble > 945) && (@gamble < 951))
- set @item,5092;
- else if ((@gamble > 950) && (@gamble < 1001))
- set @item,2226;
- break;
-
- case 5: //footgear
- set @gamble,rand(1,500);
- if ((@gamble > 299) && (@gamble < 303))
- {
- set @gamble2,rand(1,10);
- if ((@gamble2 > 0) && (@gamble2 < 3))
- set @item,2406;
- else if ((@gamble2 > 2) && (@gamble2 < 5))
- set @item,2412;
- else if ((@gamble2 > 4) && (@gamble2 < 8))
- set @item,2404;
- else if ((@gamble2 > 7) && (@gamble2 < 11))
- set @item,2407;
- }
- else if ((@gamble > 0) && (@gamble < 201))
- set @item,2401;
- else if ((@gamble > 200) && (@gamble < 300))
- set @item,2408;
- else if ((@gamble > 302) && (@gamble < 351))
- set @item,2411;
- else if ((@gamble > 350) && (@gamble < 401))
- set @item,2403;
- else if ((@gamble > 400) && (@gamble < 451))
- set @item,2405;
- else if ((@gamble > 450) && (@gamble < 476))
- set @item,2409;
- else if ((@gamble > 475) && (@gamble < 501))
- set @item,2402;
- break;
-
- case 6: //Shields
- set @gamble,rand(1,500);
- if ((@gamble > 200) && (@gamble < 205))
- {
- set @gamble2,rand(1,10);
- if ((@gamble2 > 0) && (@gamble2 < 3))
- set @item,2104;
- else if ((@gamble2 > 2) && (@gamble2 < 5))
- set @item,2106;
- else if ((@gamble2 > 4) && (@gamble2 < 7))
- set @item,2102;
- else if ((@gamble2 > 6) && (@gamble2 < 9))
- set @item,2111;
- else if ((@gamble2 > 8) && (@gamble2 < 11))
- set @item,2109;
- }
- else if ((@gamble > 0) && (@gamble < 201))
- set @item,2101;
- else if ((@gamble > 204) && (@gamble < 301))
- set @item,2103;
- else if ((@gamble > 300) && (@gamble < 401))
- set @item,2107;
- else if ((@gamble > 401) && (@gamble < 481))
- set @item,2105;
- else if ((@gamble > 480) && (@gamble < 501))
- set @item,2108;
- break;
- }
- if(countitem(732) < 1){
- mes "[Kachua]";
- mes "*piff*";
- mes "You don't have any";
- mes "diamonds! Don't even";
- mes "try to fool me!";
- close;
- }
- delitem 732,1;
- getitem @item,1;
- close;
-}
-
-comodo.gat,204,148,7 script Devellin 90,{
-
- mes "[Devellin]";
- mes "It seems some traveller showed";
- mes "a huge diamond to Kachua a while";
- mes "ago. Ever since then, all she's";
- mes "been talking about is diamonds and";
- mes "how much she wants them.";
- next;
- mes "[Devellin]";
- mes "She's been getting pretty obsessive";
- mes "about it, which scares me. It seems";
- mes "she's more than willing to";
- mes "sacrifice anything she owns for a";
- mes "diamond.";
- next;
- mes "[Devellin]";
- mes "She's the type of person who'll do";
- mes "anything to get what she wants. I'm";
- mes "worried that she might give away";
- mes "something far more valuable than a";
- mes "diamond in exchange...";
- close;
-
-}
+//===== eAthena Script =======================================
+//= Comodo Gambling
+//===== By: ==================================================
+//= Reddozen, Cypress, Zefris
+//===== Current Version: =====================================
+//= 0.5
+//===== Compatible With: =====================================
+//= Any eAthena Version
+//===== Description: =========================================
+//= Random items from 3crt diamonds in Comodo
+//===== Additional Comments: =================================
+//= 0.1- so far just a basic setup, and working on the function
+//= 0.2- fixed some spelling errors and set zeny,zeny - (@amount * 55000)[Cypress]
+//= 0.3- Revised the gambling NPC using the official Aegis script [MasterOfMuppets]
+//= for information. Thanks to Zefris for doing it for me.
+//= 0.4- Fixed an exploit. thanks to reddozen [MasterOfMuppets]
+//= 0.5- Moved item check to the proper place [Lupus]
+//============================================================
+
+mjolnir_02.gat,85,364,3 script Blacksmith Miner 726,{
+
+ mes "[Dwayne]";
+ mes "Wahahahaha~";
+ mes "I've dug up a fortune!";
+ next;
+
+ mes "[Dwayne]";
+ mes "Diamonds! Hundreds and";
+ mes "thousands of Diamonds,";
+ mes "all of them mine!";
+ mes "I'm rich!";
+ next;
+
+ menu "I want to buy some.",L1,"Congratulations.",-;
+
+ mes "[Dwayne]";
+ mes "Haha, thank you~";
+ mes "If by any chance";
+ mes "you need a diamond,";
+ mes "please drop by.";
+ mes "I'll sell them to";
+ mes "you at a cheap price.";
+ close;
+
+ L1:
+ mes "[Dwayne]";
+ mes "Ah, you have an";
+ mes "eye for valuables!";
+ mes "Sure, sure why not!";
+ mes "I'll give you a discount, too!";
+ mes "55,000 Zeny for a diamond,";
+ mes "how does that sound?";
+ next;
+
+ mes "[Dwayne]";
+ mes "How many";
+ mes "diamonds do you need?";
+ mes "If you change your mind";
+ mes "please enter '0' to cancel";
+ next;
+
+ set @amount, 0;
+ input @amount;
+ if(@amount<1){
+ mes "[Dwayne]";
+ mes "Alright, you've";
+ mes "canceled the trade.";
+ mes "Take care!";
+ close;
+ }
+ if((@amount*55000>zeny) || (@amount>500)){
+ mes "[Dwayne]";
+ mes "Hahahaha~";
+ mes "You can't fool me!";
+ mes "You dont have enough";
+ mes "Zeny for that many!";
+ close;
+ }
+ set zeny,zeny - (@amount * 55000);
+ getitem 732, @amount;
+ mes "[Dwayne]";
+ mes "Thank you for";
+ mes "buying my diamonds!";
+ mes "You're welcome to";
+ mes "come back anytime.";
+ close;
+
+}
+
+
+comodo.gat,219,160,3 script Kachua 91,{
+
+ mes "[Kachua]";
+ mes "Diamonds...!";
+ mes "I simply can't get my mind off";
+ mes "them! Ever since that man showed me";
+ mes "that diamond, it's been all I think";
+ mes "about!";
+ next;
+ menu "Would you like to have mine?",L_1,"Ah, what a shame...",-;
+
+ mes "[Kachua]";
+ mes "Yes, I know...";
+ mes "Even among everything";
+ mes "in my collections, nothing";
+ mes "compares to diamonds...";
+ close;
+
+ L_1:
+ mes "[Kachua]";
+ mes "Are you sure you don't mind";
+ mes "giving this to me? Thank you";
+ mes "so much! I don't have much in";
+ mes "the way of money, but i can give";
+ mes "you something from one of my";
+ mes "collections~";
+ next;
+
+ mes "[Kachua]";
+ mes "So what would";
+ mes "you like to have?";
+ next;
+
+ set @item,512;
+ switch( select( "Weapon", "Armor", "Garment", "Helmet", "Shoes", "Shield" ) )
+ {
+ case 1: // Weapons
+ set @gamble,rand(1,1000);
+ if ((@gamble > 920) && (@gamble < 931))
+ {
+ set @gamble2,rand(1,51);
+ if (@gamble2 == 1)
+ set @item,1128;
+ else if (@gamble2 == 2)
+ set @item,1120;
+ else if (@gamble2 == 3)
+ set @item,1127;
+ else if (@gamble2 == 4)
+ set @item,1158;
+ else if (@gamble2 == 5)
+ set @item,1155;
+ else if (@gamble2 == 6)
+ set @item,1220;
+ else if (@gamble2 == 7)
+ set @item,1222;
+ else if (@gamble2 == 8)
+ set @item,1253;
+ else if (@gamble2 == 9)
+ set @item,1529;
+ else if (@gamble2 == 10)
+ set @item,1251;
+ else if (@gamble2 == 11)
+ set @item,1361;
+ else if (@gamble2 == 12)
+ set @item,1258;
+ else if (@gamble2 == 13)
+ set @item,1257;
+ else if (@gamble2 == 14)
+ set @item,1256;
+ else if (@gamble2 == 15)
+ set @item,1259;
+ else if (@gamble2 == 16)
+ set @item,1260;
+ else if (@gamble2 == 17)
+ set @item,1716;
+ else if (@gamble2 == 18)
+ set @item,1715;
+ else if (@gamble2 == 19)
+ set @item,1711;
+ else if (@gamble2 == 20)
+ set @item,1702;
+ else if (@gamble2 == 21)
+ set @item,1520;
+ else if (@gamble2 == 22)
+ set @item,1610;
+ else if (@gamble2 == 23)
+ set @item,1615;
+ else if (@gamble2 == 24)
+ set @item,1602;
+ else if (@gamble2 == 25)
+ set @item,1461;
+ else if (@gamble2 == 26)
+ set @item,1402;
+ else if (@gamble2 == 27)
+ set @item,1953;
+ else if (@gamble2 == 28)
+ set @item,1957;
+ else if (@gamble2 == 29)
+ set @item,1552;
+ else if (@gamble2 == 30)
+ set @item,1551;
+ else if (@gamble2 == 31)
+ set @item,1553;
+ else if (@gamble2 == 32)
+ set @item,1554;
+ else if (@gamble2 == 33)
+ set @item,1555;
+ else if (@gamble2 == 34)
+ set @item,1556;
+ else if (@gamble2 == 35)
+ set @item,1951;
+ else if (@gamble2 == 36)
+ set @item,1959;
+ else if (@gamble2 == 37)
+ set @item,1961;
+ else if (@gamble2 == 38)
+ set @item,1955;
+ else if (@gamble2 == 39)
+ set @item,1810;
+ else if (@gamble2 == 40)
+ set @item,1910;
+ else if (@gamble2 == 41)
+ set @item,1906;
+ else if (@gamble2 == 42)
+ set @item,1902;
+ else if (@gamble2 == 43)
+ set @item,1904;
+ else if (@gamble2 == 44)
+ set @item,1912;
+ else if (@gamble2 == 45)
+ set @item,1908;
+ else if (@gamble2 == 46)
+ set @item,1808;
+ else if (@gamble2 == 47)
+ set @item,1802;
+ else if (@gamble2 == 48)
+ set @item,1812;
+ else if (@gamble2 == 49)
+ set @item,1806;
+ else if (@gamble2 == 50)
+ set @item,1804;
+ else if (@gamble2 == 51)
+ set @item,1550;
+ }
+ else if ((@gamble > 0) && (@gamble < 201))
+ set @item,1201;
+ else if ((@gamble > 200) && (@gamble < 301))
+ set @item,1101;
+ else if ((@gamble > 300) && (@gamble < 401))
+ set @item,1601;
+ else if ((@gamble > 400) && (@gamble < 501))
+ set @item,1116;
+ else if ((@gamble > 500) && (@gamble < 601))
+ set @item,1250;
+ else if ((@gamble > 600) && (@gamble < 701))
+ set @item,1301;
+ else if ((@gamble > 700) && (@gamble < 801))
+ set @item,1701;
+ else if ((@gamble > 800) && (@gamble < 851))
+ set @item,1504;
+ else if ((@gamble > 850) && (@gamble < 901))
+ set @item,1604;
+ else if ((@gamble > 900) && (@gamble < 911))
+ set @item,1108;
+ else if ((@gamble > 910) && (@gamble < 921))
+ set @item,1163;
+ else if ((@gamble > 930) && (@gamble < 961))
+ set @item,1522;
+ else if ((@gamble > 960) && (@gamble < 971))
+ set @item,1608;
+ else if ((@gamble > 970) && (@gamble < 981))
+ set @item,1408;
+ else if ((@gamble > 980) && (@gamble < 991))
+ set @item,1452;
+ else if ((@gamble > 990) && (@gamble < 1001))
+ set @item,1208;
+ break;
+
+ case 2: // Armors
+ set @gamble,rand(1,500);
+ if ((@gamble > 299) && (@gamble < 302))
+ {
+ set @gamble2,rand(1,30);
+ if ((@gamble2 > 0) && (@gamble2 < 3))
+ set @item,2315;
+ else if ((@gamble2 > 2) && (@gamble2 < 5))
+ set @item,2336;
+ else if ((@gamble2 > 4) && (@gamble2 < 7))
+ set @item,2318;
+ else if ((@gamble2 > 6) && (@gamble2 < 9))
+ set @item,2326;
+ else if ((@gamble2 > 8) && (@gamble2 < 11))
+ set @item,2327;
+ else if ((@gamble2 > 10) && (@gamble2 < 13))
+ set @item,2317;
+ else if ((@gamble2 > 12) && (@gamble2 < 15))
+ set @item,2331;
+ else if ((@gamble2 > 14) && (@gamble2 < 17))
+ set @item,2342;
+ else if ((@gamble2 > 16) && (@gamble2 < 19))
+ set @item,2311;
+ else if ((@gamble2 > 18) && (@gamble2 < 21))
+ set @item,2320;
+ else if ((@gamble2 > 20) && (@gamble2 < 23))
+ set @item,2319;
+ else if ((@gamble2 > 22) && (@gamble2 < 25))
+ set @item,2344;
+ else if ((@gamble2 > 24) && (@gamble2 < 27))
+ set @item,2346;
+ else if ((@gamble2 > 26) && (@gamble2 < 29))
+ set @item,2348;
+ else if ((@gamble2 > 28) && (@gamble2 < 31))
+ set @item,2350;
+ }
+ else if ((@gamble > 0) && (@gamble < 51))
+ set @item,2301;
+ else if ((@gamble > 50) && (@gamble < 101))
+ set @item,2302;
+ else if ((@gamble > 100) && (@gamble < 151))
+ set @item,2303;
+ else if ((@gamble > 150) && (@gamble < 201))
+ set @item,2304;
+ else if ((@gamble > 200) && (@gamble < 251))
+ set @item,2305;
+ else if ((@gamble > 250) && (@gamble < 300))
+ set @item,2301;
+ else if ((@gamble > 301) && (@gamble < 351))
+ set @item,2307;
+ else if ((@gamble > 350) && (@gamble < 401))
+ set @item,2309;
+ else if ((@gamble > 400) && (@gamble < 402))
+ set @item,2322;
+ else if ((@gamble > 401) && (@gamble < 403))
+ set @item,2310;
+ else if ((@gamble > 402) && (@gamble < 411))
+ set @item,2306;
+ else if ((@gamble > 410) && (@gamble < 416))
+ set @item,2308;
+ else if ((@gamble > 415) && (@gamble < 421))
+ set @item,2313;
+ else if ((@gamble > 420) && (@gamble < 426))
+ set @item,2337;
+ else if ((@gamble > 425) && (@gamble < 431))
+ set @item,2316;
+ else if ((@gamble > 430) && (@gamble < 436))
+ set @item,2325;
+ else if ((@gamble > 435) && (@gamble < 441))
+ set @item,2341;
+ else if ((@gamble > 440) && (@gamble < 446))
+ set @item,2330;
+ else if ((@gamble > 445) && (@gamble < 451))
+ set @item,2314;
+ else if ((@gamble > 450) && (@gamble < 456))
+ set @item,2335;
+ else if ((@gamble > 455) && (@gamble < 461))
+ set @item,2324;
+ else if ((@gamble > 460) && (@gamble < 466))
+ set @item,2329;
+ else if ((@gamble > 465) && (@gamble < 471))
+ set @item,2340;
+ else if ((@gamble > 470) && (@gamble < 476))
+ set @item,2312;
+ else if ((@gamble > 475) && (@gamble < 481))
+ set @item,2339;
+ else if ((@gamble > 480) && (@gamble < 486))
+ set @item,2328;
+ else if ((@gamble > 485) && (@gamble < 491))
+ set @item,2321;
+ else if ((@gamble > 490) && (@gamble < 501))
+ set @item,2323;
+ break;
+
+ case 3: // Garments
+ set @gamble,rand(1,500);
+ if ((@gamble > 200) && (@gamble < 204))
+ {
+ set @gamble2,rand(1,11);
+ if ((@gamble2 > 0) && (@gamble2 < 3))
+ set @item,2506;
+ else if ((@gamble2 > 2) && (@gamble2 < 5))
+ set @item,2504;
+ else if ((@gamble2 > 4) && (@gamble2 < 8))
+ set @item,2508;
+ else if ((@gamble2 > 7) && (@gamble2 < 11))
+ set @item,2507;
+ else if (@gamble2 == 11)
+ set @item,2523;
+ }
+ else if ((@gamble > 0) && (@gamble < 101))
+ set @item,2503;
+ else if ((@gamble > 100) && (@gamble < 201))
+ set @item,2505;
+ else if ((@gamble > 203) && (@gamble < 451))
+ set @item,2501;
+ else if ((@gamble > 450) && (@gamble < 501))
+ set @item,2502;
+ break;
+
+ case 4: //headgears
+ set @gamble,rand(1,1000);
+ if ((@gamble > 299) && (@gamble < 304))
+ {
+ set @gamble2,rand(1,76);
+ if ((@gamble2 > 0) && (@gamble2 < 3))
+ set @item,5109;
+ else if ((@gamble2 > 2) && (@gamble2 < 5))
+ set @item,2285;
+ else if ((@gamble2 > 4) && (@gamble2 < 7))
+ set @item,2255;
+ else if ((@gamble2 > 6) && (@gamble2 < 9))
+ set @item,5045;
+ else if ((@gamble2 > 8) && (@gamble2 < 11))
+ set @item,2233;
+ else if ((@gamble2 > 10) && (@gamble2 < 13))
+ set @item,2231;
+ else if ((@gamble2 > 12) && (@gamble2 < 15))
+ set @item,2217;
+ else if ((@gamble2 > 14) && (@gamble2 < 17))
+ set @item,2206;
+ else if ((@gamble2 > 16) && (@gamble2 < 19))
+ set @item,2246;
+ else if ((@gamble2 > 18) && (@gamble2 < 21))
+ set @item,2261;
+ else if ((@gamble2 > 20) && (@gamble2 < 23))
+ set @item,2287;
+ else if ((@gamble2 > 22) && (@gamble2 < 25))
+ set @item,5012;
+ else if ((@gamble2 > 24) && (@gamble2 < 27))
+ set @item,2244;
+ else if ((@gamble2 > 26) && (@gamble2 < 29))
+ set @item,5057;
+ else if ((@gamble2 > 28) && (@gamble2 < 31))
+ set @item,2248;
+ else if ((@gamble2 > 30) && (@gamble2 < 33))
+ set @item,2223;
+ else if ((@gamble2 > 32) && (@gamble2 < 35))
+ set @item,2247;
+ else if ((@gamble2 > 34) && (@gamble2 < 37))
+ set @item,2245;
+ else if ((@gamble2 > 36) && (@gamble2 < 39))
+ set @item,5003;
+ else if ((@gamble2 > 38) && (@gamble2 < 41))
+ set @item,2225;
+ else if ((@gamble2 > 40) && (@gamble2 < 43))
+ set @item,5017;
+ else if ((@gamble2 > 42) && (@gamble2 < 45))
+ set @item,5030;
+ else if ((@gamble2 > 44) && (@gamble2 < 47))
+ set @item,5035;
+ else if ((@gamble2 > 46) && (@gamble2 < 49))
+ set @item,2250;
+ else if ((@gamble2 > 48) && (@gamble2 < 51))
+ set @item,2277;
+ else if ((@gamble2 > 50) && (@gamble2 < 53))
+ set @item,5011;
+ else if ((@gamble2 > 52) && (@gamble2 < 55))
+ set @item,2290;
+ else if ((@gamble2 > 54) && (@gamble2 < 57))
+ set @item,5010;
+ else if ((@gamble2 > 56) && (@gamble2 < 60))
+ set @item,2259;
+ else if ((@gamble2 > 59) && (@gamble2 < 62))
+ set @item,5008;
+ else if ((@gamble2 > 61) && (@gamble2 < 63))
+ set @item,2249;
+ else if ((@gamble2 > 62) && (@gamble2 < 65))
+ set @item,2229;
+ else if (@gamble2 == 65)
+ set @item,2258;
+ else if (@gamble2 == 66)
+ set @item,2274;
+ else if (@gamble2 == 67)
+ set @item,5019;
+ else if (@gamble2 == 68)
+ set @item,2254;
+ else if (@gamble2 == 69)
+ set @item,5007;
+ else if (@gamble2 == 70)
+ set @item,5066;
+ else if (@gamble2 == 71)
+ set @item,2235;
+ else if (@gamble2 == 72)
+ set @item,2234;
+ else if (@gamble2 == 73)
+ set @item,2256;
+ else if (@gamble2 == 74)
+ set @item,5093;
+ else if (@gamble2 == 75)
+ set @item,5072;
+ else if (@gamble2 == 76)
+ set @item,2231;
+ }
+ else if ((@gamble > 0) && (@gamble < 101))
+ set @item,2226;
+ else if ((@gamble > 100) && (@gamble < 201))
+ set @item,2211;
+ else if ((@gamble > 200) && (@gamble < 300))
+ set @item,2209;
+ else if ((@gamble > 303) && (@gamble < 401))
+ set @item,2220;
+ else if ((@gamble > 400) && (@gamble < 501))
+ set @item,2232;
+ else if ((@gamble > 500) && (@gamble < 601))
+ set @item,2216;
+ else if ((@gamble > 600) && (@gamble < 701))
+ set @item,2230;
+ else if ((@gamble > 700) && (@gamble < 801))
+ set @item,2224;
+ else if ((@gamble > 800) && (@gamble < 901))
+ set @item,2222;
+ else if ((@gamble > 900) && (@gamble < 906))
+ set @item,2228;
+ else if ((@gamble > 905) && (@gamble < 911))
+ set @item,2252;
+ else if ((@gamble > 910) && (@gamble < 916))
+ set @item,2227;
+ else if ((@gamble > 915) && (@gamble < 921))
+ set @item,2221;
+ else if ((@gamble > 920) && (@gamble < 926))
+ set @item,2299;
+ else if ((@gamble > 925) && (@gamble < 931))
+ set @item,2236;
+ else if ((@gamble > 930) && (@gamble < 936))
+ set @item,2275;
+ else if ((@gamble > 935) && (@gamble < 941))
+ set @item,5015;
+ else if ((@gamble > 940) && (@gamble < 946))
+ set @item,5061;
+ else if ((@gamble > 945) && (@gamble < 951))
+ set @item,5092;
+ else if ((@gamble > 950) && (@gamble < 1001))
+ set @item,2226;
+ break;
+
+ case 5: //footgear
+ set @gamble,rand(1,500);
+ if ((@gamble > 299) && (@gamble < 303))
+ {
+ set @gamble2,rand(1,10);
+ if ((@gamble2 > 0) && (@gamble2 < 3))
+ set @item,2406;
+ else if ((@gamble2 > 2) && (@gamble2 < 5))
+ set @item,2412;
+ else if ((@gamble2 > 4) && (@gamble2 < 8))
+ set @item,2404;
+ else if ((@gamble2 > 7) && (@gamble2 < 11))
+ set @item,2407;
+ }
+ else if ((@gamble > 0) && (@gamble < 201))
+ set @item,2401;
+ else if ((@gamble > 200) && (@gamble < 300))
+ set @item,2408;
+ else if ((@gamble > 302) && (@gamble < 351))
+ set @item,2411;
+ else if ((@gamble > 350) && (@gamble < 401))
+ set @item,2403;
+ else if ((@gamble > 400) && (@gamble < 451))
+ set @item,2405;
+ else if ((@gamble > 450) && (@gamble < 476))
+ set @item,2409;
+ else if ((@gamble > 475) && (@gamble < 501))
+ set @item,2402;
+ break;
+
+ case 6: //Shields
+ set @gamble,rand(1,500);
+ if ((@gamble > 200) && (@gamble < 205))
+ {
+ set @gamble2,rand(1,10);
+ if ((@gamble2 > 0) && (@gamble2 < 3))
+ set @item,2104;
+ else if ((@gamble2 > 2) && (@gamble2 < 5))
+ set @item,2106;
+ else if ((@gamble2 > 4) && (@gamble2 < 7))
+ set @item,2102;
+ else if ((@gamble2 > 6) && (@gamble2 < 9))
+ set @item,2111;
+ else if ((@gamble2 > 8) && (@gamble2 < 11))
+ set @item,2109;
+ }
+ else if ((@gamble > 0) && (@gamble < 201))
+ set @item,2101;
+ else if ((@gamble > 204) && (@gamble < 301))
+ set @item,2103;
+ else if ((@gamble > 300) && (@gamble < 401))
+ set @item,2107;
+ else if ((@gamble > 401) && (@gamble < 481))
+ set @item,2105;
+ else if ((@gamble > 480) && (@gamble < 501))
+ set @item,2108;
+ break;
+ }
+ if(countitem(732) < 1){
+ mes "[Kachua]";
+ mes "*piff*";
+ mes "You don't have any";
+ mes "diamonds! Don't even";
+ mes "try to fool me!";
+ close;
+ }
+ delitem 732,1;
+ getitem @item,1;
+ close;
+}
+
+comodo.gat,204,148,7 script Devellin 90,{
+
+ mes "[Devellin]";
+ mes "It seems some traveller showed";
+ mes "a huge diamond to Kachua a while";
+ mes "ago. Ever since then, all she's";
+ mes "been talking about is diamonds and";
+ mes "how much she wants them.";
+ next;
+ mes "[Devellin]";
+ mes "She's been getting pretty obsessive";
+ mes "about it, which scares me. It seems";
+ mes "she's more than willing to";
+ mes "sacrifice anything she owns for a";
+ mes "diamond.";
+ next;
+ mes "[Devellin]";
+ mes "She's the type of person who'll do";
+ mes "anything to get what she wants. I'm";
+ mes "worried that she might give away";
+ mes "something far more valuable than a";
+ mes "diamond in exchange...";
+ close;
+
+}