buying_shops.txt 8.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252
  1. //===== rAthena Script =======================================
  2. //= Buying Shop Scripts
  3. //===== By: ==================================================
  4. //= Kisuka
  5. //===== Current Version: =====================================
  6. //= 1.1b
  7. //===== Compatible With: =====================================
  8. //= rAthena Project
  9. //===== Description: =========================================
  10. //= Buying Shop licenses.
  11. //===== Additional Comments: =================================
  12. //= 1.0 First version. [Kisuka]
  13. //= 1.1 Added Catalog Magician. [Euphy]
  14. //= 1.1a Moved Catalog Magician to Renewal path. [Euphy]
  15. //= 1.1b Added missing weight checks. [Euphy]
  16. //============================================================
  17. // Black Marketeer (Buy Licenses - Non-Merchant Classes) :: qskill_buy_store
  18. //============================================================
  19. que_job01,68,84,1 script Black Marketeer#Buying 881,{
  20. if (checkweight(1201,1) == 0 || MaxWeight - Weight < 2400) {
  21. mes "[Mr. Jass]";
  22. mes "You're too greedy, even compared to someone like me!";
  23. mes "Why don't you go lighten your bag first?";
  24. close;
  25. }
  26. if (getskilllv("ALL_BUYING_STORE") == 1) {
  27. mes "[Mr. Jass]";
  28. mes "Hey, you already made a contract with Hugh.";
  29. mes "I don't have any business with you.";
  30. close;
  31. }
  32. mes "[Mr. Jass]";
  33. mes "You must need something badly to come to find me.";
  34. mes "What do you want?";
  35. next;
  36. switch(select("Bulk Buyer Shop License:Who are you?:Nothing, nothing!")) {
  37. case 1:
  38. mes "[Mr. Jass]";
  39. mes "I knew it!";
  40. mes "Sure, I can make it for you.";
  41. mes "Mine looks just like the authentic one that Merchants get from that bastard Mr. Hugh!";
  42. next;
  43. mes "[Mr. Jass]";
  44. mes "And my license is better 'cuz you don't need ta' learn any skills.";
  45. mes "How many do you want?";
  46. next;
  47. mes "[Mr. Jass]";
  48. mes "Just so you know, I can only make them in small quantities, up to 10 at a time.";
  49. mes "It'll cost 500 zeny for each one.";
  50. next;
  51. while(1) {
  52. input .@input;
  53. mes "[Mr. Jass]";
  54. if (.@input == 0) {
  55. mes "Don't you need those licenses?";
  56. close;
  57. } else if (.@input > 10) {
  58. mes "I can only make up to 10 at a time, you know.";
  59. next;
  60. } else {
  61. mes "It'll cost "+(.@input*500)+" zeny.";
  62. if (Zeny < (.@input*500)) {
  63. mes "but you don't have enough money.";
  64. next;
  65. mes "[Mr. Jass]";
  66. mes "Don't you know the basics of business? Everything has a price.";
  67. mes "If you want something, you gotta pay for it.";
  68. } else {
  69. mes "Ha... Ha ha ha!";
  70. mes "Mr. Hugh, I'll take over your license business. You'll see!";
  71. mes "*Giggle Giggle*";
  72. getitem 12548,.@input; //Buy_Market_Permit2
  73. set Zeny,Zeny-(.@input*500);
  74. }
  75. close;
  76. }
  77. }
  78. case 2:
  79. mes "[Mr. Jass]";
  80. mes "I left my hometown a long time ago.";
  81. mes "It's meaningless to ask who I am because all I've got left now is my hatred.";
  82. next;
  83. mes "[Mr. Jass]";
  84. mes "...";
  85. mes "Hugh is a corrupt merchant with no sense of business ethics.";
  86. mes "My sole purpose in life is to destroy Hugh.";
  87. next;
  88. mes "[Mr. Jass]";
  89. mes "Aw, I drank too much... (*Hic*)";
  90. mes "That's just the alohol talking.";
  91. mes "Please forget anything I said.";
  92. close;
  93. case 3:
  94. mes "[Mr. Jass]";
  95. mes "Alright, alright! You don't have to yell.";
  96. mes "Just leave me alone if you've got no business with me.";
  97. close;
  98. }
  99. }
  100. // Purchasing Team (Learn Skill - Merchant Classes)
  101. //============================================================
  102. alberta_in,58,52,4 script Purchasing Team#Buying 59,{
  103. if (checkweight(1201,1) == 0 || MaxWeight - Weight < 2400) {
  104. mes "- You cannot converse or perform the quest because you are carrying too many items. -";
  105. close;
  106. }
  107. mes "[Mr. Hugh]";
  108. if (BaseClass == Job_Merchant && getskilllv("MC_VENDING") >= 1) {
  109. if (getskilllv("ALL_BUYING_STORE") == 1) {
  110. mes "I'm Hugh from the Purchasing Team.";
  111. mes "How may I help you today?";
  112. next;
  113. if(select("Purchase Bulk Buyer Shop License:Quit") == 2) {
  114. mes "[Mr. Hugh]";
  115. mes "Please feel free to ask me if you need any Bulk Buyer Shop Licenses.";
  116. mes "Come again~";
  117. close;
  118. }
  119. mes "[Mr. Hugh]";
  120. mes "It's 200 zeny for each Bulk Buyer Shop License, and you may purchase up to 50 at a time.";
  121. mes "How many licenses do you need?";
  122. next;
  123. while(1) {
  124. input .@input;
  125. mes "[Mr. Hugh]";
  126. if (.@input == 0) {
  127. mes "You have cancelled the trade.";
  128. mes "Have a good day.";
  129. close;
  130. } else if (.@input > 50) {
  131. mes "Please enter a value of 50 or less.";
  132. next;
  133. } else {
  134. mes "It'll cost "+(.@input*200)+" zeny for "+.@input+" licenses.";
  135. if (Zeny < (.@input*200)) {
  136. mes "but you don't seem to have enough money.";
  137. } else {
  138. mes "Thank you for your patronage.";
  139. getitem 6377,.@input; //Buy_Market_Permit
  140. set Zeny,Zeny-(.@input*200);
  141. }
  142. close;
  143. }
  144. }
  145. } else {
  146. mes "I'm Hugh from the Purchasing Team at the Alberta Merchant Guild.";
  147. mes "You're...";
  148. next;
  149. mes "[Mr. Hugh]";
  150. mes "Did you know? Our guild has issued a license to allow individuals to buy goods from others.";
  151. next;
  152. select("I've never had problems buying items...");
  153. mes "[Mr. Hugh]";
  154. mes "You're right, but think about it:";
  155. mes "haven't you had a hard time buying in bulk?";
  156. mes "You'd have to find and talk to everyone that has an item you want.";
  157. mes "Pretty inconvenient, isn't it?";
  158. next;
  159. mes "[Mr. Hugh]";
  160. mes "Since buying in bulk is an important issue to us Merchants,";
  161. mes "I've proposed an innovative plan to our guild, based on my 10 years of experience in making purchases.";
  162. next;
  163. mes "[Mr. Hugh]";
  164. mes "'Let Individuals Open";
  165. mes "a Bulk Buyer Shop!'";
  166. mes "That's the title of my proposal.";
  167. mes "You'll see, when you read it...";
  168. next;
  169. mes "[Mr. Hugh]";
  170. mes "...";
  171. mes "...(Mr. Hugh yammers on and on with all the details.)";
  172. next;
  173. select("Alright, what's your point?");
  174. mes "[Mr. Hugh]";
  175. mes "Oh, yes. In summary,";
  176. mes "you can buy certain items in bulk through Vending.";
  177. next;
  178. mes "[Mr. Hugh]";
  179. mes "In order to open a Bulk Buyer Shop, you need a license issued from the Merchant Guild.";
  180. next;
  181. mes "[Mr. Hugh]";
  182. mes "You need it every time you open the shop. We're expecting a significant increase in profits through this new kind of licensing.";
  183. next;
  184. mes "[Mr. Hugh]";
  185. mes "That's the point of my proposal!";
  186. mes "Our president was so happy to hear that we're going to make big bucks!";
  187. next;
  188. mes "["+strcharinfo(0)+"]";
  189. mes "Please get to the point already!";
  190. next;
  191. mes "[Mr. Hugh]";
  192. mes "Don't be so impatient, alright?";
  193. mes "My point is, we can let you open the Bulk Buyer Shop if you've learned Vending.";
  194. next;
  195. mes "[Mr. Hugh]";
  196. mes "Of course, we charge 10,000 zeny as a one-time registration fee.";
  197. mes "You will need the ^4A4AFFBulk Buyer Shop License^000000 every time you open the shop.";
  198. next;
  199. mes "[Mr. Hugh]";
  200. mes "Say, would you like to register now?";
  201. mes "If you do, I'll teach you how to open the Bulk Buyer Shop.";
  202. next;
  203. if(select("Learn how to open Bulk Buyer Shop:Cancel") == 2) {
  204. mes "[Mr. Hugh]";
  205. mes "Man, that's disappointing!";
  206. mes "Using this bulk buyer option can benefit your business in many ways, but it's your call.";
  207. mes "I'm always open for consultation!";
  208. close;
  209. }
  210. mes "[Mr. Hugh]";
  211. if (Zeny < 10000) {
  212. mes "The registration fee is 10,000 zeny.";
  213. mes "Please have the fee ready first.";
  214. close;
  215. } else {
  216. mes "You've made a good decision.";
  217. mes "Please give me the registration fee, and sign right here....";
  218. next;
  219. input .@name$;
  220. mes "[Mr. Hugh]";
  221. mes .@name$+"....";
  222. mes "I like your handwriting.";
  223. mes "Okay, you're now approved to open the Bulk Buyer Shop.";
  224. set Zeny,Zeny-10000;
  225. getitem 6377,5; //Buy_Stall_Permit
  226. skill "ALL_BUYING_STORE",1,SKILL_PERM_GRANT;
  227. next;
  228. mes "[Mr. Hugh]";
  229. mes "Currently, only normal items ^8C2121EXCEPT^000000 equipment, certain potions, and hand-crafted items can be purchased in bulk, but this can still be very beneficial to you, depending on how you use it.";
  230. next;
  231. mes "[Mr. Hugh]";
  232. mes "Oh, and you need at least one of the item that you want to buy in your inventory because you have to show it to other through your shop.";
  233. next;
  234. mes "[Mr. Hugh]";
  235. mes "Your skill should now be registered in your skill window. If you can't see it you probably have to minimize your Skill List and check the 3rd Job Tab.";
  236. next;
  237. mes "[Mr. Hugh]";
  238. mes "I've given you 5 Bulk Buyer Shop Licenses for your trial.";
  239. mes "Enjoy shopping!";
  240. close;
  241. }
  242. }
  243. }
  244. mes "I'm Hugh from the Purchasing Team at the Alberta Merchant Guild.";
  245. mes "I'd love to chat, but I'm too busy at the moment.";
  246. next;
  247. mes "[Mr. Hugh]";
  248. mes "My time is solely dedicated to our customers in the Merchant industry.";
  249. close;
  250. }