icecream.txt 2.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788
  1. //===== rAthena Script =======================================
  2. //= Ice Cream Maker
  3. //===== By: ==================================================
  4. //= KOOK SWU, Kisuka
  5. //===== Current Version: =====================================
  6. //= 1.5
  7. //===== Compatible With: =====================================
  8. //= rAthena Project
  9. //===== Description: =========================================
  10. //= A man makes you ice-cream
  11. //===== Additional Comments: =================================
  12. //= 1.1 Optimized, changed overlapping coords in Alberta [Lupus]
  13. //= 1.2 According to the patch, IceCream seller has been removed from Morocc [Lupus]
  14. //= 1.3 No more label menu and updated to match AEGIS script. [Kisuka]
  15. //= 1.4 Duplicates now spawn from floating NPCs. [L0ne_W0lf]
  16. //= 1.5 Fixed small checkweight issue. [Kisuka]
  17. //============================================================
  18. - script Ice Cream Maker::IceCreamer -1,{
  19. mes "[Ice Cream Maker]";
  20. mes "Fresh Ice Cream made with snow from Lutie!";
  21. mes "Enjoy it now, it won't be on sale for long!";
  22. mes "^3355FF100 Zeny^000000 Ice Cream,";
  23. mes "Ice Cream!";
  24. next;
  25. if(select("Gimme Ice Cream!:Cancel Trade") == 2) {
  26. mes "Are you sure you don't want any?";
  27. mes "I won't be selling it for long,";
  28. mes "and once I run out,";
  29. mes "there won't be any more!!!";
  30. close;
  31. }
  32. mes "[Ice Cream Maker]";
  33. mes "Fresh Ice Cream made with snow from Lutie!";
  34. mes "Everyone wants our delicious ice cream, ";
  35. mes "but we have a limited amount,";
  36. mes "so you can only purchase 5 at a time!!";
  37. next;
  38. while(true) {
  39. input .@input;
  40. if(.@input < 1) {
  41. mes "[Ice Cream Maker]";
  42. mes "If you don't want to buy any,";
  43. mes "could you please let the next customer";
  44. mes "make a purchase?";
  45. mes "Thank you.";
  46. close;
  47. }
  48. if(.@input > 5) {
  49. mes "[Ice Cream Maker]";
  50. mes "Ouch";
  51. mes "You expect too much.";
  52. mes "Dear customer,";
  53. mes "If you eat more than 5 Ice creams,";
  54. mes "If you might haveto make a lot of trips";
  55. mes "to the bathroom tonight.";
  56. next;
  57. continue;
  58. }
  59. break;
  60. }
  61. if(Zeny<.@input*100) {
  62. mes "[Ice Cream Maker]";
  63. mes "Dear customer, your wallet seems to be light.";
  64. mes "Price is ^3355FF100 Zeny^000000 per ice cream.";
  65. close;
  66. }
  67. if(checkweight(536,.@input) == 0) {
  68. mes "[Ice Cream Maker]";
  69. mes "Dear customer,you look like you're carrying a lot.";
  70. mes "Ice Cream is fine,";
  71. mes "but you must consider your weight";
  72. mes "before making a purchase.";
  73. close;
  74. }
  75. set Zeny,Zeny-100*.@input;
  76. getitem 536,.@input; // Ice_Cream
  77. close;
  78. }
  79. // Alberta
  80. alberta,120,45,2 duplicate(IceCreamer) Ice Cream Maker#1 85
  81. // Morocc Field
  82. moc_fild16,88,304,4 duplicate(IceCreamer) Ice Cream Maker#2 85
  83. // Morocc
  84. //morocc,160,144,4 duplicate(IceCreamer) Ice Cream Maker#3 85