comodo_gambling.txt 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611
  1. //===== eAthena Script =======================================
  2. //= Comodo Gambling
  3. //===== By: ==================================================
  4. //= Reddozen, Cypress, Zefris
  5. //===== Current Version: =====================================
  6. //= 1.0
  7. //===== Compatible With: =====================================
  8. //= eAthena SVN 6769+ (temporary npc variables)
  9. //===== Description: =========================================
  10. //= Random items from 3carat diamonds in Comodo
  11. //===== Additional Comments: =================================
  12. //= 0.1- so far just a basic setup, and working on the function
  13. //= 0.2- fixed some spelling errors and set zeny,zeny - (@amount * 55000)[Cypress]
  14. //= 0.3- Revised the gambling NPC using the official Aegis script [MasterOfMuppets]
  15. //= for information. Thanks to Zefris for doing it for me.
  16. //= 0.4- Fixed an exploit. thanks to reddozen [MasterOfMuppets]
  17. //= 0.5- Moved item check to the proper place [Lupus]
  18. //= 1.0- Synced the script with aegis and reformatted it for readability [ultramage]
  19. //= Corrected the npc giving you Cotton Shirt instead of Adventurer's Suit[1]
  20. //= Added comments to items so people know what the NPC is about
  21. //= Added missing emotions and cutins
  22. //============================================================
  23. comodo.gat,219,160,3 script Kachua 91,{
  24. cutin "katsua01.bmp",2;
  25. mes "[Kachua]";
  26. mes "Diamonds...!";
  27. mes "I simply can't get my mind off";
  28. mes "them! Ever since that man";
  29. mes "showed me that diamond,";
  30. mes "it's been all I think about!";
  31. next;
  32. if (select("Would you like to have mine?", "Ah, what a shame...") == 2) {
  33. mes "[Kachua]";
  34. mes "Yes, I know...";
  35. mes "Even among everything";
  36. mes "in my collections, nothing";
  37. mes "compares to diamonds...";
  38. close2;
  39. cutin "katsua01.bmp",255;
  40. end;
  41. }
  42. if (countitem(732) == 0) {
  43. cutin "katsua01.bmp",255;
  44. cutin "katsua03.bmp",2;
  45. mes "[Kachua]";
  46. mes "*piff*";
  47. mes "You don't have any diamonds!";
  48. mes "Don't even try to fool me!";
  49. close2;
  50. cutin "katsua03.bmp",255;
  51. end;
  52. }
  53. mes "[Kachua]";
  54. mes "Are you sure you don't mind";
  55. mes "giving this to me? Thank you";
  56. mes "so much! I don't have much in";
  57. mes "the way of money, but i can give";
  58. mes "you something from one of my";
  59. mes "collections~";
  60. next;
  61. if (Weight >= MaxWeight/2) {
  62. cutin "katsua01.bmp",255;
  63. cutin "katsua03.bmp",2;
  64. mes "[Kachua]";
  65. mes "Errr...";
  66. mes "You brought too many things.";
  67. mes "You can't receive this item now.";
  68. mes "You better reorganize your inventory and try again.";
  69. close2;
  70. cutin "katsua03.bmp",255;
  71. end;
  72. }
  73. if (countitem(732) == 0) { // anti-hack
  74. logmes "Hack: Tried to bypass item check.";
  75. cutin "katsua01.bmp",255;
  76. close;
  77. }
  78. delitem 732,1;
  79. mes "[Kachua]";
  80. mes "So what would";
  81. mes "you like to have?";
  82. next;
  83. switch (select("Weapon", "Armor", "Garment", "Helmet", "Shoes", "Shield")) {
  84. case 1: // Weapons
  85. set @gamble1,rand(1,1000);
  86. if ((@gamble1 > 920) && (@gamble1 < 931)) {
  87. set @gamble2,rand(1,51);
  88. if (@gamble2 == 1) set @item,1128; // Haedonggum[2]
  89. else if (@gamble2 == 2) set @item,1120; // Tsurugi[2]
  90. else if (@gamble2 == 3) set @item,1127; // Saber[3]
  91. else if (@gamble2 == 4) set @item,1158; // Two-Handed Sword[2]
  92. else if (@gamble2 == 5) set @item,1155; // Bastard Sword[3]
  93. else if (@gamble2 == 6) set @item,1220; // Gladius[3]
  94. else if (@gamble2 == 7) set @item,1222; // Damascus[1]
  95. else if (@gamble2 == 8) set @item,1253; // Katar[2]
  96. else if (@gamble2 == 9) set @item,1529; // Iron Driver
  97. else if (@gamble2 == 10) set @item,1251; // Jur[3]
  98. else if (@gamble2 == 11) set @item,1361; // Two-Handed Axe[2]
  99. else if (@gamble2 == 12) set @item,1258; // Katar of Raging Blaze
  100. else if (@gamble2 == 13) set @item,1257; // Katar of Quaking
  101. else if (@gamble2 == 14) set @item,1256; // Katar of Frozen Icicle
  102. else if (@gamble2 == 15) set @item,1259; // Katar of Piercing Wind
  103. else if (@gamble2 == 16) set @item,1260; // Sharpened Legbone of Ghoul
  104. else if (@gamble2 == 17) set @item,1716; // Gakkung Bow[2]
  105. else if (@gamble2 == 18) set @item,1715; // Arbalest[2]
  106. else if (@gamble2 == 19) set @item,1711; // Crossbow[3]
  107. else if (@gamble2 == 20) set @item,1702; // Bow[4]
  108. else if (@gamble2 == 21) set @item,1520; // Chain[3]
  109. else if (@gamble2 == 22) set @item,1610; // Arc Wand[1]
  110. else if (@gamble2 == 23) set @item,1615; // Evil Bone Wand
  111. else if (@gamble2 == 24) set @item,1602; // Rod[4]
  112. else if (@gamble2 == 25) set @item,1461; // Trident[3]
  113. else if (@gamble2 == 26) set @item,1402; // Javelin[4]
  114. else if (@gamble2 == 27) set @item,1953; // Line[3]
  115. else if (@gamble2 == 28) set @item,1957; // Rante Whip[1]
  116. else if (@gamble2 == 29) set @item,1552; // Tablet[1]
  117. else if (@gamble2 == 30) set @item,1551; // Bible[2]
  118. else if (@gamble2 == 31) set @item,1553; // Book of Billows
  119. else if (@gamble2 == 32) set @item,1554; // Book of Mother Earth
  120. else if (@gamble2 == 33) set @item,1555; // Book of the Blazing Sun
  121. else if (@gamble2 == 34) set @item,1556; // Book of Gust of Wind
  122. else if (@gamble2 == 35) set @item,1951; // Rope[4]
  123. else if (@gamble2 == 36) set @item,1959; // Tail Whip[2]
  124. else if (@gamble2 == 37) set @item,1961; // Whip[2]
  125. else if (@gamble2 == 38) set @item,1955; // Wire Whip[3]
  126. else if (@gamble2 == 39) set @item,1810; // Claw[2]
  127. else if (@gamble2 == 40) set @item,1910; // Harp[2]
  128. else if (@gamble2 == 41) set @item,1906; // Lute[3]
  129. else if (@gamble2 == 42) set @item,1902; // Violin[4]
  130. else if (@gamble2 == 43) set @item,1904; // Mandolin[3]
  131. else if (@gamble2 == 44) set @item,1912; // Gumoongoh[2]
  132. else if (@gamble2 == 45) set @item,1908; // Guitar[1]
  133. else if (@gamble2 == 46) set @item,1808; // Fist[1]
  134. else if (@gamble2 == 47) set @item,1802; // Waghnak[4]
  135. else if (@gamble2 == 48) set @item,1812; // Finger[2]
  136. else if (@gamble2 == 49) set @item,1806; // Studded Knuckles[3]
  137. else if (@gamble2 == 50) set @item,1804; // Knuckle Duster[3]
  138. else if (@gamble2 == 51) set @item,1550; // Book[3]
  139. }
  140. else if ((@gamble1 > 0) && (@gamble1 < 201)) set @item,1201; // Knife[3]
  141. else if ((@gamble1 > 200) && (@gamble1 < 301)) set @item,1101; // Sword[3]
  142. else if ((@gamble1 > 300) && (@gamble1 < 401)) set @item,1601; // Rod[3]
  143. else if ((@gamble1 > 400) && (@gamble1 < 501)) set @item,1116; // Katana[3]
  144. else if ((@gamble1 > 500) && (@gamble1 < 601)) set @item,1250; // Jur[2]
  145. else if ((@gamble1 > 600) && (@gamble1 < 701)) set @item,1301; // Axe[3]
  146. else if ((@gamble1 > 700) && (@gamble1 < 801)) set @item,1701; // Bow[3]
  147. else if ((@gamble1 > 800) && (@gamble1 < 851)) set @item,1504; // Mace[3]
  148. else if ((@gamble1 > 850) && (@gamble1 < 901)) set @item,1604; // Wand[2]
  149. else if ((@gamble1 > 900) && (@gamble1 < 911)) set @item,1108; // Blade[4]
  150. else if ((@gamble1 > 910) && (@gamble1 < 921)) set @item,1163; // Claymore
  151. else if ((@gamble1 > 930) && (@gamble1 < 961)) set @item,1522; // Stunner
  152. else if ((@gamble1 > 960) && (@gamble1 < 971)) set @item,1608; // Staff[3]
  153. else if ((@gamble1 > 970) && (@gamble1 < 981)) set @item,1408; // Pike[4]
  154. else if ((@gamble1 > 980) && (@gamble1 < 991)) set @item,1452; // Guisarme[3]
  155. else if ((@gamble1 > 990) && (@gamble1 < 1001)) set @item,1208; // Main Gauche[4]
  156. break;
  157. case 2: // Armors
  158. set @gamble1,rand(1,500);
  159. if ((@gamble1 > 299) && (@gamble1 < 302)) {
  160. set @gamble2,rand(1,30);
  161. if ((@gamble2 > 0) && (@gamble2 < 3)) set @item,2315; // Chain Mail[1]
  162. else if ((@gamble2 > 2) && (@gamble2 < 5)) set @item,2336; // Thief Clothes[1]
  163. else if ((@gamble2 > 4) && (@gamble2 < 7)) set @item,2318; // Lord's Clothes[1]
  164. else if ((@gamble2 > 6) && (@gamble2 < 9)) set @item,2326; // Saint's Robe[1]
  165. else if ((@gamble2 > 8) && (@gamble2 < 11)) set @item,2327; // Holy Robe
  166. else if ((@gamble2 > 10) && (@gamble2 < 13)) set @item,2317; // Full Plate[1]
  167. else if ((@gamble2 > 12) && (@gamble2 < 15)) set @item,2331; // Tights[1]
  168. else if ((@gamble2 > 14) && (@gamble2 < 17)) set @item,2342; // Legion Plate Armor[1]
  169. else if ((@gamble2 > 16) && (@gamble2 < 19)) set @item,2311; // Mink Coat[1]
  170. else if ((@gamble2 > 18) && (@gamble2 < 21)) set @item,2320; // Formal Suit[1]
  171. else if ((@gamble2 > 20) && (@gamble2 < 23)) set @item,2319; // Glittering Jacket[1]
  172. else if ((@gamble2 > 22) && (@gamble2 < 25)) set @item,2344; // Lucius's Fierce Armor of Volcano
  173. else if ((@gamble2 > 24) && (@gamble2 < 27)) set @item,2346; // Saphien's Armor of Ocean
  174. else if ((@gamble2 > 26) && (@gamble2 < 29)) set @item,2348; // Aebeccee's Raging Typhoon Armor
  175. else if ((@gamble2 > 28) && (@gamble2 < 31)) set @item,2350; // Claytos Cracking Earth Armor
  176. }
  177. else if ((@gamble1 > 0) && (@gamble1 < 51)) set @item,2301; // Cotton Shirt
  178. else if ((@gamble1 > 50) && (@gamble1 < 101)) set @item,2302; // Cotton Shirt[1]
  179. else if ((@gamble1 > 100) && (@gamble1 < 151)) set @item,2303; // Jacket
  180. else if ((@gamble1 > 150) && (@gamble1 < 201)) set @item,2304; // Jacket[1]
  181. else if ((@gamble1 > 200) && (@gamble1 < 251)) set @item,2305; // Adventurer's Suit
  182. else if ((@gamble1 > 250) && (@gamble1 < 300)) set @item,2306; // Adventurer's Suit[1]
  183. else if ((@gamble1 > 301) && (@gamble1 < 351)) set @item,2307; // Mantle
  184. else if ((@gamble1 > 350) && (@gamble1 < 401)) set @item,2309; // Coat
  185. else if ((@gamble1 > 400) && (@gamble1 < 402)) set @item,2322; // Silk Robe[1]
  186. else if ((@gamble1 > 401) && (@gamble1 < 403)) set @item,2310; // Coat[1]
  187. else if ((@gamble1 > 402) && (@gamble1 < 411)) set @item,2306; // Adventurer's Suit[1]
  188. else if ((@gamble1 > 410) && (@gamble1 < 416)) set @item,2308; // Mantle[1]
  189. else if ((@gamble1 > 415) && (@gamble1 < 421)) set @item,2313; // Padded Armor[1]
  190. else if ((@gamble1 > 420) && (@gamble1 < 426)) set @item,2337; // Ninja Suit
  191. else if ((@gamble1 > 425) && (@gamble1 < 431)) set @item,2316; // Full Plate
  192. else if ((@gamble1 > 430) && (@gamble1 < 436)) set @item,2325; // Saint's Robe
  193. else if ((@gamble1 > 435) && (@gamble1 < 441)) set @item,2341; // Legion Plate Armor
  194. else if ((@gamble1 > 440) && (@gamble1 < 446)) set @item,2330; // Tights
  195. else if ((@gamble1 > 445) && (@gamble1 < 451)) set @item,2314; // Chain Mail
  196. else if ((@gamble1 > 450) && (@gamble1 < 456)) set @item,2335; // Thief Clothes
  197. else if ((@gamble1 > 455) && (@gamble1 < 461)) set @item,2324; // Scapulare[1]
  198. else if ((@gamble1 > 460) && (@gamble1 < 466)) set @item,2329; // Wooden Mail[1]
  199. else if ((@gamble1 > 465) && (@gamble1 < 471)) set @item,2340; // Novice Breastplate[1]
  200. else if ((@gamble1 > 470) && (@gamble1 < 476)) set @item,2312; // Padded Armor
  201. else if ((@gamble1 > 475) && (@gamble1 < 481)) set @item,2339; // Pantie
  202. else if ((@gamble1 > 480) && (@gamble1 < 486)) set @item,2328; // Wooden Mail
  203. else if ((@gamble1 > 485) && (@gamble1 < 491)) set @item,2321; // Silk Robe
  204. else if ((@gamble1 > 490) && (@gamble1 < 501)) set @item,2323; // Scapulare
  205. break;
  206. case 3: // Garments
  207. set @gamble1,rand(1,500);
  208. if ((@gamble1 > 200) && (@gamble1 < 204))
  209. {
  210. set @gamble2,rand(1,11);
  211. if ((@gamble2 > 0) && (@gamble2 < 3)) set @item,2506; // Manteau[1]
  212. else if ((@gamble2 > 2) && (@gamble2 < 5)) set @item,2504; // Muffler[1]
  213. else if ((@gamble2 > 4) && (@gamble2 < 8)) set @item,2508; // Ragamuffin Manteau
  214. else if ((@gamble2 > 7) && (@gamble2 < 11)) set @item,2507; // Ancient Cape
  215. else if (@gamble2 == 11) set @item,2523; // Undershirt[1]
  216. }
  217. else if ((@gamble1 > 0) && (@gamble1 < 101)) set @item,2503; // Muffler
  218. else if ((@gamble1 > 100) && (@gamble1 < 201)) set @item,2505; // Manteau
  219. else if ((@gamble1 > 203) && (@gamble1 < 451)) set @item,2501; // Hood
  220. else if ((@gamble1 > 450) && (@gamble1 < 501)) set @item,2502; // Hood[1]
  221. break;
  222. case 4: // Headgears
  223. set @gamble1,rand(1,1000);
  224. if ((@gamble1 > 299) && (@gamble1 < 304))
  225. {
  226. set @gamble2,rand(1,76);
  227. if ((@gamble2 > 0) && (@gamble2 < 3)) set @item,5109; // Red Bonnet
  228. else if ((@gamble2 > 2) && (@gamble2 < 5)) set @item,2285; // Apple of Archer
  229. else if ((@gamble2 > 4) && (@gamble2 < 7)) set @item,2255; // Evil Wing
  230. else if ((@gamble2 > 6) && (@gamble2 < 9)) set @item,5045; // Magician Hat
  231. else if ((@gamble2 > 8) && (@gamble2 < 11)) set @item,2233; // Circlet[1]
  232. else if ((@gamble2 > 10) && (@gamble2 < 13)) set @item,2231; // Gemmed Sallet[1]
  233. else if ((@gamble2 > 12) && (@gamble2 < 15)) set @item,2217; // Biretta[1]
  234. else if ((@gamble2 > 14) && (@gamble2 < 17)) set @item,2206; // Wedding Veil
  235. else if ((@gamble2 > 16) && (@gamble2 < 19)) set @item,2246; // Golden Gear
  236. else if ((@gamble2 > 18) && (@gamble2 < 21)) set @item,2261; // Army Cap
  237. else if ((@gamble2 > 20) && (@gamble2 < 23)) set @item,2287; // Pirate Bandana
  238. else if ((@gamble2 > 22) && (@gamble2 < 25)) set @item,5012; // Ph.D Hat
  239. else if ((@gamble2 > 24) && (@gamble2 < 27)) set @item,2244; // Big Ribbon
  240. else if ((@gamble2 > 26) && (@gamble2 < 29)) set @item,5057; // Black Cat Ears
  241. else if ((@gamble2 > 28) && (@gamble2 < 31)) set @item,2248; // Western Grace
  242. else if ((@gamble2 > 30) && (@gamble2 < 33)) set @item,2223; // Turban[1]
  243. else if ((@gamble2 > 32) && (@gamble2 < 35)) set @item,2247; // Romantic Gent
  244. else if ((@gamble2 > 34) && (@gamble2 < 37)) set @item,2245; // Sweet Gent
  245. else if ((@gamble2 > 36) && (@gamble2 < 39)) set @item,5003; // Joker Jester
  246. else if ((@gamble2 > 38) && (@gamble2 < 41)) set @item,2225; // Goggles[1]
  247. else if ((@gamble2 > 40) && (@gamble2 < 43)) set @item,5017; // Bone Helm
  248. else if ((@gamble2 > 42) && (@gamble2 < 45)) set @item,5030; // Panda Hat
  249. else if ((@gamble2 > 44) && (@gamble2 < 47)) set @item,5035; // Poring Hat
  250. else if ((@gamble2 > 46) && (@gamble2 < 49)) set @item,2250; // Cute Ribbon
  251. else if ((@gamble2 > 48) && (@gamble2 < 51)) set @item,2277; // Nurse Cap
  252. else if ((@gamble2 > 50) && (@gamble2 < 53)) set @item,5011; // Aerial
  253. else if ((@gamble2 > 52) && (@gamble2 < 55)) set @item,2290; // Funeral Hat
  254. else if ((@gamble2 > 54) && (@gamble2 < 57)) set @item,5010; // Indian Fillet
  255. else if ((@gamble2 > 56) && (@gamble2 < 60)) set @item,2259; // Mini Propeller
  256. else if ((@gamble2 > 59) && (@gamble2 < 62)) set @item,5008; // Puppy Love
  257. else if ((@gamble2 > 61) && (@gamble2 < 63)) set @item,2249; // Coronet
  258. else if ((@gamble2 > 62) && (@gamble2 < 65)) set @item,2229; // Helm[1]
  259. else if (@gamble2 == 65) set @item,2258; // Spiky Band
  260. else if (@gamble2 == 66) set @item,2274; // Ghost Bandana
  261. else if (@gamble2 == 67) set @item,5019; // Corsair
  262. else if (@gamble2 == 68) set @item,2254; // Angel Wing
  263. else if (@gamble2 == 69) set @item,5007; // Grand Circlet
  264. else if (@gamble2 == 70) set @item,5066; // Succubus Horn
  265. else if (@gamble2 == 71) set @item,2235; // Crown
  266. else if (@gamble2 == 72) set @item,2234; // Tiara
  267. else if (@gamble2 == 73) set @item,2256; // Majestic Goat
  268. else if (@gamble2 == 74) set @item,5093; // Coif[1]
  269. else if (@gamble2 == 75) set @item,5072; // Incubus Horn
  270. else if (@gamble2 == 76) set @item,2231; // Gemmed Sallet[1]
  271. }
  272. else if ((@gamble1 > 0) && (@gamble1 < 101)) set @item,2226; // Cap
  273. else if ((@gamble1 > 100) && (@gamble1 < 201)) set @item,2211; // Bandana
  274. else if ((@gamble1 > 200) && (@gamble1 < 300)) set @item,2209; // Ribbon[1]
  275. else if ((@gamble1 > 303) && (@gamble1 < 401)) set @item,2220; // Hat
  276. else if ((@gamble1 > 400) && (@gamble1 < 501)) set @item,2232; // Circlet
  277. else if ((@gamble1 > 500) && (@gamble1 < 601)) set @item,2216; // Biretta
  278. else if ((@gamble1 > 600) && (@gamble1 < 701)) set @item,2230; // Gemmed Sallet
  279. else if ((@gamble1 > 700) && (@gamble1 < 801)) set @item,2224; // Goggles
  280. else if ((@gamble1 > 800) && (@gamble1 < 901)) set @item,2222; // Turban
  281. else if ((@gamble1 > 900) && (@gamble1 < 906)) set @item,2228; // Helm
  282. else if ((@gamble1 > 905) && (@gamble1 < 911)) set @item,2252; // Wizard Hat
  283. else if ((@gamble1 > 910) && (@gamble1 < 916)) set @item,2227; // Cap[1]
  284. else if ((@gamble1 > 915) && (@gamble1 < 921)) set @item,2221; // Hat[1]
  285. else if ((@gamble1 > 920) && (@gamble1 < 926)) set @item,2299; // Orc Helm
  286. else if ((@gamble1 > 925) && (@gamble1 < 931)) set @item,2236; // Santa Hat
  287. else if ((@gamble1 > 930) && (@gamble1 < 936)) set @item,2275; // Red Bandana
  288. else if ((@gamble1 > 935) && (@gamble1 < 941)) set @item,5015; // Egg Shell
  289. else if ((@gamble1 > 940) && (@gamble1 < 946)) set @item,5061; // Flower Hairpin
  290. else if ((@gamble1 > 945) && (@gamble1 < 951)) set @item,5092; // Coif
  291. else if ((@gamble1 > 950) && (@gamble1 < 1001)) set @item,2226; // Cap
  292. break;
  293. case 5: // Footgear
  294. set @gamble1,rand(1,500);
  295. if ((@gamble1 > 299) && (@gamble1 < 303))
  296. {
  297. set @gamble2,rand(1,10);
  298. if ((@gamble2 > 0) && (@gamble2 < 3)) set @item,2406; // Boots[1]
  299. else if ((@gamble2 > 2) && (@gamble2 < 5)) set @item,2412; // Greaves[1]
  300. else if ((@gamble2 > 4) && (@gamble2 < 8)) set @item,2404; // Shoes[1]
  301. else if ((@gamble2 > 7) && (@gamble2 < 11)) set @item,2407; // Crystal Pumps
  302. }
  303. else if ((@gamble1 > 0) && (@gamble1 < 201)) set @item,2401; // Sandals
  304. else if ((@gamble1 > 200) && (@gamble1 < 300)) set @item,2408; // Shackles
  305. else if ((@gamble1 > 302) && (@gamble1 < 351)) set @item,2411; // Greaves
  306. else if ((@gamble1 > 350) && (@gamble1 < 401)) set @item,2403; // Shoes
  307. else if ((@gamble1 > 400) && (@gamble1 < 451)) set @item,2405; // Boots
  308. else if ((@gamble1 > 450) && (@gamble1 < 476)) set @item,2409; // High Heels
  309. else if ((@gamble1 > 475) && (@gamble1 < 501)) set @item,2402; // Sandals[1]
  310. break;
  311. case 6: // Shields
  312. set @gamble1,rand(1,500);
  313. if ((@gamble1 > 200) && (@gamble1 < 205))
  314. {
  315. set @gamble2,rand(1,10);
  316. if ((@gamble2 > 0) && (@gamble2 < 3)) set @item,2104; // Buckler[1]
  317. else if ((@gamble2 > 2) && (@gamble2 < 5)) set @item,2106; // Shield[1]
  318. else if ((@gamble2 > 4) && (@gamble2 < 7)) set @item,2102; // Guard[1]
  319. else if ((@gamble2 > 6) && (@gamble2 < 9)) set @item,2111; // Sacred Mission
  320. else if ((@gamble2 > 8) && (@gamble2 < 11)) set @item,2109; // Memory Book
  321. }
  322. else if ((@gamble1 > 0) && (@gamble1 < 201)) set @item,2101; // Guard
  323. else if ((@gamble1 > 204) && (@gamble1 < 301)) set @item,2103; // Buckler
  324. else if ((@gamble1 > 300) && (@gamble1 < 401)) set @item,2107; // Mirror Shield
  325. else if ((@gamble1 > 401) && (@gamble1 < 481)) set @item,2105; // Shield
  326. else if ((@gamble1 > 480) && (@gamble1 < 501)) set @item,2108; // Mirror Shield
  327. break;
  328. default: // Cancel button / hack
  329. cutin "katsua01.bmp",255;
  330. close;
  331. break;
  332. }
  333. getitem @item,1;
  334. cutin "katsua01.bmp",255;
  335. cutin "katsua02.bmp",2;
  336. mes "[Kachua]";
  337. mes "Ah~ that Diamond is so beautiful.";
  338. mes "I wish I could repay you better.";
  339. close2;
  340. cutin "katsua02.bmp",255;
  341. end;
  342. }
  343. mjolnir_02.gat,85,364,3 script Blacksmith Miner 726,{
  344. mes "[Dwayne]";
  345. mes "Wahahahaha~";
  346. mes "I've dug up a fortune!";
  347. next;
  348. mes "[Dwayne]";
  349. mes "Diamonds! Hundreds and";
  350. mes "thousands of Diamonds,";
  351. mes "all of them mine!";
  352. mes "I'm rich!";
  353. emotion e_heh;
  354. next;
  355. if (select("I want to buy some.", "Congratulations.") == 2) {
  356. mes "[Dwayne]";
  357. mes "Haha, thank you~";
  358. mes "If by any chance";
  359. mes "you need a diamond,";
  360. mes "please drop by.";
  361. mes "I'll sell them to";
  362. mes "you at a cheap price.";
  363. close;
  364. }
  365. mes "[Dwayne]";
  366. mes "Ah, you have an";
  367. mes "eye for valuables!";
  368. mes "Sure, sure why not!";
  369. mes "I'll give you a discount, too!";
  370. mes "55,000 Zeny for a diamond,";
  371. mes "how does that sound?";
  372. next;
  373. mes "[Dwayne]";
  374. mes "How many";
  375. mes "diamonds do you need?";
  376. mes "If you change your mind";
  377. mes "please enter '0' to cancel";
  378. next;
  379. while(1) {
  380. input .@amount;
  381. if (.@amount <= 0) {
  382. mes "[Dwayne]";
  383. mes "Alright, you've";
  384. mes "canceled the trade.";
  385. mes "Take care!";
  386. close;
  387. } else if (.@amount > 500) {
  388. mes "[Dwayne]";
  389. mes "The maximum number you can enter is 500.";
  390. mes "Please enter no more than 500.";
  391. next;
  392. } else {
  393. break;
  394. }
  395. }
  396. set .@price, .@amount * 55000;
  397. if (Zeny < .@price) {
  398. mes "[Dwayne]";
  399. mes "Hahahaha~";
  400. mes "You can't fool me!";
  401. mes "You don't have enough";
  402. mes "Zeny for that many!";
  403. close;
  404. }
  405. if (!checkweight(732, .@amount)) {
  406. mes "[Dwayne]";
  407. mes "Errr... You brought too many things.";
  408. mes "You can't receive this item at this time.";
  409. mes "You better reorganise your inventory and try again.";
  410. close;
  411. }
  412. set Zeny, Zeny - .@price;
  413. getitem 732, .@amount;
  414. mes "[Dwayne]";
  415. mes "Thank you for";
  416. mes "buying my diamonds!";
  417. mes "You're welcome to";
  418. mes "come back anytime.";
  419. close;
  420. }
  421. comodo.gat,204,148,7 script Devellin 90,{
  422. mes "[Devellin]";
  423. mes "It seems some traveller showed";
  424. mes "a huge diamond to Kachua a while";
  425. mes "ago. Ever since then, all she's";
  426. mes "been talking about is diamonds and";
  427. mes "how much she wants them.";
  428. next;
  429. mes "[Devellin]";
  430. mes "She's been getting pretty obsessive";
  431. mes "about it, which scares me. It seems";
  432. mes "she's more than willing to";
  433. mes "sacrifice anything she owns for a";
  434. mes "diamond.";
  435. next;
  436. mes "[Devellin]";
  437. mes "She's the type of person who'll do";
  438. mes "anything to get what she wants. I'm";
  439. mes "worried that she might give away";
  440. mes "something far more valuable than a";
  441. mes "diamond in exchange...";
  442. close;
  443. }
  444. comodo.gat,210,154,4 script Suspicious Guy 118,{
  445. if (BaseClass == Job_Thief) {
  446. mes "[Cain]";
  447. mes "Heeeey...";
  448. mes "It seems we share the same line of";
  449. mes "work, you and me, Heh heh, lemme";
  450. mes "give you a hot tip.";
  451. next;
  452. mes "[Cain]";
  453. mes "I've been charging other people for";
  454. mes "this information, but since, shall";
  455. mes "we say, we work in the same";
  456. mes "professional field, I don't have";
  457. mes "the heart to take your zeny.";
  458. next;
  459. mes "[Cain]";
  460. mes "You see that lady over there?";
  461. mes "She's just totally in love with" ;
  462. mes "diamonds. And from what my sources";
  463. mes "tell me, she's loaded. Tons and";
  464. mes "tons of valuables.";
  465. next;
  466. mes "[Cain]";
  467. mes "I'm talking' rare items.";
  468. mes "I took the liberty of sneaking a";
  469. mes "peek at what she owns, and saw";
  470. mes "she's got a helmet with goat horns";
  471. mes "and even a crown! She's so rich";
  472. mes "it's ridiculous!";
  473. next;
  474. mes "[Cain]";
  475. mes "The buzz that's been going around";
  476. mes "is that she's got a cache of rare";
  477. mes "equipment and weapons too! So";
  478. mes "whaddya say? Wanna be partners in";
  479. mes "crime and rob her house?";
  480. next;
  481. if (select("No, thanks.", "Sweet, I'm in.") == 1) {
  482. mes "[Cain]";
  483. mes "Wha... ?";
  484. mes "C'mon I thought pilfering was";
  485. mes "something you do! Aw well, I'm";
  486. mes "gonna do it, but stay hushed on";
  487. mes "this, got it?";
  488. close;
  489. }
  490. mes "[Cain]";
  491. mes "Ha ha ha!";
  492. mes "... Dork!";
  493. mes "I'm just jivin'";
  494. mes "so fuggedabout it!";
  495. next;
  496. mes "[Cain]";
  497. mes "Ah right. Supposedly, there's a";
  498. mes "mountain where tons of diamonds are";
  499. mes "burried. A pal o'mine says there's";
  500. mes "a mine near the mountain too, so I";
  501. mes "guess if you went to the mine,";
  502. mes "you'd find Diamonds.";
  503. next;
  504. mes "[Cain]";
  505. mes "I guess it can't hurt to gather";
  506. mes "some Diamonds there and try to";
  507. mes "exchange them for whatever the old";
  508. mes "lady's got. Take care, pal~";
  509. close;
  510. } else {
  511. mes "[Cain]";
  512. mes "Hey...";
  513. mes "I got a hot tip for you.";
  514. mes "It'll cost you 500 zeny";
  515. mes "and trust me, it's worth it.";
  516. mes "So whaddya say... ?";
  517. next;
  518. if (select("Alright.", "No, thanks.") == 2) {
  519. mes "[Cain]";
  520. mes "Hey hey!";
  521. mes "What are you, a cheapskate? You";
  522. mes "understand that everything has its";
  523. mes "price and this information is so";
  524. mes "worth it. C'mon, you can't pass";
  525. mes "this up, can you?";
  526. close;
  527. }
  528. if(Zeny < 500) {
  529. mes "[Cain]";
  530. mes "What the hell?!";
  531. mes "Don't you even have any money? Didn't I";
  532. mes "say 500 zeny? Hey man, Info like";
  533. mes "this doesn't come cheap!";
  534. close;
  535. }
  536. set Zeny, Zeny - 500;
  537. mes "[Cain]";
  538. mes "You see that lady over there?";
  539. mes "She's just totally in love with" ;
  540. mes "diamonds. And from what my sources";
  541. mes "tell me, she's loaded. Tons and";
  542. mes "tons of valuables.";
  543. next;
  544. mes "[Cain]";
  545. mes "I'm talking' rare items.";
  546. mes "I took the liberty of sneaking a";
  547. mes "peek at what she owns, and saw";
  548. mes "she's got a helmet with goat horns";
  549. mes "and even a crown! She's so rich";
  550. mes "it's ridiculous!";
  551. next;
  552. mes "[Cain]";
  553. mes "There's a chance that rare";
  554. mes "equipment and weapons might be";
  555. mes "yours! She'll give anything for a";
  556. mes "3carat diamond. So if you have any";
  557. mes "of those, you might as well see";
  558. mes "her.";
  559. next;
  560. mes "[Cain]";
  561. mes "Ah right. Supposedly, there's a";
  562. mes "mountain where tons of diamonds";
  563. mes "are burried. A pal o'mine says";
  564. mes "there's a mine near the mountain";
  565. mes "too, so I guess if you went to the";
  566. mes "mine, you'd find Diamonds.";
  567. next;
  568. mes "[Cain]";
  569. mes "I guess it can't hurt to gather";
  570. mes "some Diamonds there and try to";
  571. mes "exchange them for whatever the old";
  572. mes "lady's got. Take care, pal~";
  573. close;
  574. }
  575. }