kafras_gef.txt 2.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879
  1. //===== eAthena Script =======================================
  2. //= Geffen Kafras
  3. //===== By: =========================
  4. //= eAthena Dev Team
  5. //===== Current Version: ===================
  6. //= 2.5
  7. //===== Compatible With: =====================
  8. //= eAthena 1.0
  9. //===== Description: ============================================
  10. //= Description of argument settings for callfunc "F_Kafra".
  11. //= arg(0): When set at 0 the default Kafra message is displayed.
  12. //= When set to 1 the Niflhiem Kafra message is displayed.
  13. //= When set to 2 the Guild Kafra message is displayed.
  14. //= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0.
  15. //= arg(2): Set to 1 to disable info menu. Otherwise set to 0.
  16. //= arg(3): Cost of Storage service
  17. //= arg(4): Cost of Rent a Pushcart service
  18. //===== Additional Comments: ==========================================
  19. //= v1.1 Now using functions :)
  20. //= v2.1b Minor changes to function calls. Using arguments.
  21. //= This version uses arrays .[kobra_k88]
  22. //= 2.2 New warps and prices [Evera]
  23. //= 2.3 Can't save outside city [Evera]
  24. //= 2.4 Updated function calls with new arguments. [L0ne_W0lf]
  25. //= Added unique Kafra Welcome messages.
  26. //= Removed North and West Kafra
  27. //= 2.5 Fixed Kafra NPC names. [L0ne_W0lf]
  28. //=====================================================================
  29. // South =====================================
  30. geffen,120,62,0 script Kafra Employee::kaf_geffen 115,{
  31. cutin "kafra_03",2;
  32. callfunc "F_KafSetGef";
  33. mes "[Kafra Employee]";
  34. mes "Welcome~!";
  35. mes "The Kafra Services";
  36. mes "are always on your side.";
  37. mes "So how can I help you?";
  38. callfunc "F_Kafra",5,0,0,30,750;
  39. M_Save:
  40. savepoint "geffen",119,40;
  41. callfunc "F_KafEnd",0,1,"in the city of Geffen";
  42. }
  43. // East ==============================================
  44. geffen,203,123,2 script Kafra Employee::geffen2 114,{
  45. cutin "kafra_04",2;
  46. callfunc "F_KafSetGef";
  47. mes "[Kafra Employee]";
  48. mes "Welcome!";
  49. mes "The Kafra Corporation";
  50. mes "will always support the";
  51. mes "adventurers of Rune-Midgard";
  52. mes "with its excellent service. So";
  53. mes "what can I do for you today?";
  54. callfunc "F_Kafra",5,0,0,30,750;
  55. M_Save:
  56. savepoint "geffen",200,124;
  57. callfunc "F_KafEnd",0,1,"in the city of Geffen";
  58. }
  59. // Function: Sets variables for Geffen Kafras -------------------
  60. function script F_KafSetGef {
  61. cleararray @wrpC$[0],"",getarraysize(@wrpC$);
  62. setarray @wrpD$[0], "Prontera", "Al De Baran", "Orc Dungeon", "Mjolnir Dead Pit";
  63. setarray @wrpP[0], 1200, 1200, 1200, 1700;
  64. set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0];
  65. set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1];
  66. set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2];
  67. set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3];
  68. set @wrpC$[4], "Cancel";
  69. setarray @viewpX[0], 120, 203;
  70. setarray @viewpY[0], 62, 123;
  71. return;
  72. }