kafras_gef.txt 3.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100
  1. //===== eAthena Script =======================================
  2. //= Geffen Kafras
  3. //===== By: =========================
  4. //= eAthena Dev Team
  5. //===== Current Version: ===================
  6. //= 2.2
  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. //===== Additional Comments: ==========================================
  17. //= v1.1 Now using functions :)
  18. //= v2.1b Minor changes to function calls. Using arguments.
  19. //= This version uses arrays .[kobra_k88]
  20. //= 2.2 New warps and prices [Evera]
  21. //=====================================================================
  22. // South =====================================
  23. geffen.gat,120,62,8 script Kafra::kaf_geffen 115,{
  24. cutin "kafra_03",2;
  25. callfunc "F_KafSetGef";
  26. callfunc "F_Kafra",0,0,0;
  27. M_Save:
  28. savepoint "geffen.gat",119,40;
  29. callfunc "F_KafEnd",0,1;
  30. }
  31. // East ==============================================
  32. geffen.gat,203,123,3 script Kafra::geffen2 114,{
  33. cutin "kafra_04",2;
  34. callfunc "F_KafSetGef";
  35. callfunc "F_Kafra",0,0,0;
  36. M_Save:
  37. menu "-Save outside city.",sM_Out, "-Save inside city.",sM_In;
  38. sM_Out:
  39. savepoint "gef_fild00.gat",51,194;
  40. callfunc "F_KafEnd",0,1;
  41. sM_In:
  42. savepoint "geffen.gat",200,124;
  43. callfunc "F_KafEnd",0,1;
  44. }
  45. // North ==============================================
  46. geffen.gat,116,202,3 script Kafra::geffen3 116,{
  47. cutin "kafra_02",2;
  48. callfunc "F_KafSetGef";
  49. callfunc "F_Kafra",0,0,0;
  50. M_Save:
  51. menu "-Save outside city.",sM_Out, "-Save inside city.",sM_In;
  52. sM_Out:
  53. savepoint "gef_fild04.gat",192,49;
  54. callfunc "F_KafEnd",0,1;
  55. sM_In:
  56. savepoint "geffen.gat",110,199;
  57. callfunc "F_KafEnd",0,1;
  58. }
  59. // West =========================================
  60. geffen.gat,37,116,6 script Kafra::geffen4 117,{
  61. cutin "kafra_01",2;
  62. callfunc "F_KafSetGef";
  63. callfunc "F_Kafra",0,0,0;
  64. M_Save:
  65. menu "-Save outside city.",sM_Out, "-Save inside city.",sM_In;
  66. sM_Out:
  67. savepoint "gef_fild07.gat",330,192;
  68. callfunc "F_KafEnd",0,1;
  69. sM_In:
  70. savepoint "geffen.gat",43,108;
  71. callfunc "F_KafEnd",0,1;
  72. }
  73. // Function: Sets variables for Geffen Kafras -------------------
  74. function script F_KafSetGef {
  75. cleararray @wrpC$[0],"",getarraysize(@wrpC$);
  76. setarray @wrpD$[0], "Prontera", "Al De Baran", "Orc Dungeon", "Coal Mine(Dead Pit)";
  77. setarray @wrpP[0], 1200, 1200, 1200, 1700;
  78. set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0];
  79. set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1];
  80. set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2];
  81. set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3];
  82. set @wrpC$[4], "Cancel";
  83. setarray @viewpX[0], 120, 203, 116, 37;
  84. setarray @viewpY[0], 62, 123, 202, 116;
  85. return;
  86. }