kafras_yun.txt 3.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788
  1. //===== eAthena Script =======================================
  2. //= Yuno Kafras
  3. //===== By: =========================
  4. //= eAthena Dev Team
  5. //===== Current Version: ===================
  6. //= 2.4
  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 Now only warps to Aldebaran [Evera]
  23. //= 2.3 Updated a kafra location. [Musashiden]
  24. //= 2.4 Updated function calls with new arguments. [L0ne_W0lf]
  25. //= Added unique Kafra Welcome message.
  26. //=====================================================================
  27. // Center ------------------------------------------------------------------
  28. yuno,152,187,4 script Kafra Employee::kaf_yuno 860,{
  29. cutin "kafra_08",2;
  30. callfunc "F_KafSetYun";
  31. mes "[Kafra Employee]";
  32. mes "The Kafra Corporation";
  33. mes "is always working to provide";
  34. mes "you with convenient services.";
  35. mes "How may I be of assistance?";
  36. callfunc "F_Kafra",5,0,0,40,800;
  37. M_Save:
  38. savepoint "yuno",158,125;
  39. callfunc "F_KafEnd",0,1,"in the city of Juno";
  40. }
  41. // South East --------------------------------------------------------------
  42. yuno,327,108,4 script Kafra Employee::kaf_yuno2 860,{
  43. cutin "kafra_08",2;
  44. callfunc "F_KafSetYun";
  45. mes "[Kafra Employee]";
  46. mes "The Kafra Corporation";
  47. mes "is always working to provide";
  48. mes "you with convenient services.";
  49. mes "How may I be of assistance?";
  50. callfunc "F_Kafra",5,0,0,40,800;
  51. M_Save:
  52. savepoint "yuno",328,101;
  53. callfunc "F_KafEnd",0,1,"in the city of Juno";
  54. }
  55. // East --------------------------------------------------------------------
  56. yuno,277,221,4 script Kafra Employee::kaf_yuno3 861,{
  57. cutin "kafra_09",2;
  58. callfunc "F_KafSetYun";
  59. mes "[Kafra Employee]";
  60. mes "The Kafra Corporation";
  61. mes "is always working to provide";
  62. mes "you with convenient services.";
  63. mes "How may I be of assistance?";
  64. callfunc "F_Kafra",5,0,0,40,800;
  65. M_Save:
  66. savepoint "yuno",274,229;
  67. callfunc "F_KafEnd",0,1,"in the city of Juno";
  68. }
  69. // Function: Sets variables for Yuno Kafras ------------
  70. function script F_KafSetYun {
  71. cleararray @wrpC$[0],"",getarraysize(@wrpC$);
  72. setarray @wrpD$[0], "Al De Baran";
  73. setarray @wrpP[0], 1200;
  74. set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0];
  75. set @wrpC$[1], "Cancel";
  76. setarray @viewpX[0], 328, 278, 153, 0;
  77. setarray @viewpY[0], 108, 221, 187, 0;
  78. return;
  79. }