kafras_new.txt 7.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225
  1. //===== eAthena Script ===========
  2. //= New Kafras
  3. //===== By: =========================
  4. //= eAthena Dev Team
  5. //===== Current Version: ===================
  6. //= 3.1
  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.1 Added Niflheim Kafra by Dizzy
  21. //= v2.1b Minor changes to function calls. Using arguments.
  22. //= This version uses arrays .[kobra_k88]
  23. //= 2.2 Added Louyang Kafra, fixed other kafras not saving players coords [Lupus]
  24. //= 2.3 Added temp Amatsu + Ayothaya Kafra (wrong coords and sprite) [Lupus]
  25. //= 2.4 Added correct Ayothaya, Louyang & Amatsu Kafras. [Lupus]
  26. //= 2.5 Added 2 Einbroch Kafras. [Lupus]
  27. //= 2.6 Added the Einbech Kafra [MasterOfMuppets]
  28. //= 2.7 Added the Lighthalzen Kafras [MasterOfMuppets]
  29. //= 2.7b Chanced the Sprite of the Einbech Kafra. [Poki#3]
  30. //= 2.7c Added missing kafra in Lighthalzen, thanks to Muad_Dib [Vicious]
  31. //= 2.8 Removed warps from Umbala and Gonryun, thanks Drakee [Evera]
  32. //= 2.9 Fixed an incorrect savepoint (inside the hotel) the map was wrong.
  33. //= 3.0 Updated function calls with new arguments. [L0ne_W0lf]
  34. //= Added unique Kafra Welcome messages.
  35. //= 3.1 Fixed one of Einbroch (east) kafras not displaying a name, bugreport:857 [Brainstorm]
  36. //==========================================================================
  37. // Amatsu ------------------------------------------------------------------
  38. amatsu,102,149,4 script Kafra Employee::kaf_amatsu 116,{
  39. cutin "kafra_02",2;
  40. mes "[Kafra Employee]";
  41. mes "Welcome to the";
  42. mes "Kafra Corporation.";
  43. mes "Kafra's Employees are";
  44. mes "always ready to serve you.";
  45. mes "How can I help you today?";
  46. callfunc "F_Kafra",5,3,1,50,700;
  47. M_Save:
  48. savepoint "amatsu",116,94;
  49. callfunc "F_KafEnd",0,1,"in the city of Amatsu";
  50. }
  51. // Ayothaya ----------------------------------------------------------------
  52. ayothaya,212,169,5 script Kafra Employee::kaf_ayothaya 116,{
  53. cutin "kafra_02",2;
  54. mes "[Kafra Employee]";
  55. mes "Welcome to the";
  56. mes "Kafra Corporation.";
  57. mes "Kafra's Employees are";
  58. mes "always ready to serve you.";
  59. mes "How can I help you today?";
  60. callfunc "F_Kafra",5,3,1,50,700;
  61. M_Save:
  62. savepoint "ayothaya",149,69;
  63. callfunc "F_KafEnd",0,1,"in the city of Ayotaya";
  64. }
  65. // Einbech -----------------------------------------------------------------
  66. einbech,181,132,5 script Kafra Employee#ein3::kaf_einbech 860,{
  67. cutin "kafra_08",2;
  68. mes "[Kafra Employee]";
  69. mes "Welcome~!";
  70. mes "The Kafra Services";
  71. mes "are always on your side.";
  72. mes "So how can I help you?";
  73. callfunc "F_Kafra",5,4,1,40,850;
  74. M_Save:
  75. savepoint "einbech",182,124;
  76. callfunc "F_KafEnd",0,1,"in the town of Einbech";
  77. }
  78. // Einbroch (North-East) ---------------------------------------------------
  79. einbroch,242,205,5 script Kafra Employee#ein2::kaf_einbroch 860,{
  80. cutin "kafra_08",2;
  81. mes "[Kafra Employee]";
  82. mes "Welcome to the";
  83. mes "Kafra Corporation.";
  84. mes "Kafra's Employees are";
  85. mes "always ready to serve you.";
  86. mes "How can I help you today?";
  87. callfunc "F_Kafra",5,4,1,50,800;
  88. M_Save:
  89. savepoint "einbroch",238,198;
  90. callfunc "F_KafEnd",0,1,"in the city of Einbroch";
  91. }
  92. // Einbroch (East) ---------------------------------------------------------
  93. einbroch,59,203,6 script Kafra Employee#ein1::kaf_einbroch2 861,{
  94. cutin "kafra_09",2;
  95. mes "[Kafra Employee]";
  96. mes "Welcome to the";
  97. mes "Kafra Corporation.";
  98. mes "The Kafra services";
  99. mes "are always on your side.";
  100. mes "How may I assist you?";
  101. callfunc "F_Kafra",5,4,1,50,800;
  102. M_Save:
  103. savepoint "einbroch",240,197;
  104. callfunc "F_KafEnd",0,1,"in the city of Einbroch";
  105. }
  106. // Gonryun -----------------------------------------------------------------
  107. gonryun,159,122,4 script Kafra Employee::kaf_gonryun 116,{
  108. cutin "kafra_02",2;
  109. mes "[Kafra Employee]";
  110. mes "Welcome to the";
  111. mes "Kafra Corporation.";
  112. mes "Kafra's Employees are";
  113. mes "always ready to serve you.";
  114. mes "How can I help you today?";
  115. callfunc "F_Kafra",5,3,1,50,700;
  116. M_Save:
  117. savepoint "gonryun",160,62;
  118. callfunc "F_KafEnd",0,1,"in the city of Kunlun";
  119. }
  120. // Lighthalzen--------------------------------------------------------------
  121. //Outside the hotel
  122. lighthalzen,164,100,4 script Kafra Employee::kaf_lighthalzen 860,{
  123. cutin "kafra_08",2;
  124. mes "[Kafra Employee]";
  125. mes "Welcome to the";
  126. mes "Kafra Corporation.";
  127. mes "The Kafra services";
  128. mes "are always on your side.";
  129. mes "How may I assist you?";
  130. callfunc "F_Kafra",5,4,1,40,800;
  131. M_Save:
  132. savepoint "lighthalzen",158,94;
  133. callfunc "F_KafEnd",0,1,"in the city of Lighthalzen";
  134. }
  135. // Entrance
  136. lighthalzen,191,320,4 script Kafra Employee::kaf_lighthalzen2 861,{
  137. cutin "kafra_09",2;
  138. mes "[Kafra Employee]";
  139. mes "Welcome~!";
  140. mes "The Kafra Services";
  141. mes "are always on your side.";
  142. mes "So how can I help you?";
  143. callfunc "F_Kafra",5,4,1,40,800;
  144. M_Save:
  145. savepoint "lighthalzen",194,313;
  146. callfunc "F_KafEnd",0,1,"in the city of Lighthalzen";
  147. }
  148. //Inside the hotel
  149. lhz_in02,237,284,4 script Kafra Employee::kaf_lhz_in02 861,{
  150. cutin "kafra_09",2;
  151. mes "[Kafra Employee]";
  152. mes "Welcome~!";
  153. mes "The Kafra Services";
  154. mes "are always on your side.";
  155. mes "So how can I help you?";
  156. callfunc "F_Kafra",5,4,1,40,800;
  157. M_Save:
  158. savepoint "lhz_in02",278,215;
  159. callfunc "F_KafEnd",0,1,"in the city of Lighthalzen";
  160. }
  161. // Louyang -----------------------------------------------------------------
  162. louyang,210,104,5 script Kafra Employee::kaf_louyang 117,{
  163. cutin "kafra_01",2;
  164. mes "[Kafra Employee]";
  165. mes "Welcome to the";
  166. mes "Kafra Corporation.";
  167. mes "Kafra's Employees are";
  168. mes "always ready to serve you.";
  169. mes "How can I help you today?";
  170. callfunc "F_Kafra",5,3,1,50,700;
  171. M_Save:
  172. savepoint "louyang",217,92;
  173. callfunc "F_KafEnd",0,1,"in the city of Louyang";
  174. }
  175. // Umbala Kafra ------------------------------------------------------------
  176. umbala,128,133,4 script Kafra Employee::kaf_umbala 721,{
  177. cutin "kafra_07",2;
  178. cleararray @wrpC$[0],"",getarraysize(@wrpC$);
  179. setarray @wrpD$[0], "Comodo";
  180. setarray @wrpP[0], 1800;
  181. set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0];
  182. set @wrpC$[1], "Cancel";
  183. mes "[Kafra Employee]";
  184. mes "Welcome to the";
  185. mes "Kafra Corporation.";
  186. mes "You know that our";
  187. mes "service is always";
  188. mes "on your side~";
  189. callfunc "F_Kafra",5,0,1,80,0;
  190. M_Save:
  191. savepoint "umbala",126,131;
  192. callfunc "F_KafEnd",0,1,"in the city of Umbala";
  193. }
  194. // Niflheim ----------------------------------------------------------------
  195. niflheim,202,180,3 script Kafra Employee::kaf_niflheim 791,{
  196. callfunc "F_Kafra",1,2,1,150,0;
  197. M_Save:
  198. savepoint "niflheim",192,182;
  199. callfunc "F_KafEnd",1,1,"in the city of Niflheim";
  200. }