kafras_dungeons.txt 3.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129
  1. //===== eAthena Script ================
  2. //= Kafras in Dungeons and Fields
  3. //===== By: ============================
  4. //= eAthena Dev Team
  5. //===== Current Version: =======================
  6. //= 2.1b
  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. Added teleport service for Orc Dungeon
  18. //= and Coal Mine Kafras.
  19. //= v2.1 Fixed bug with Merc job quest kafra.[Lupus]
  20. //= v2.1b Minor changes to function calls. Using arguments.
  21. //= Added ant hell kafras. This version uses arrays .[kobra_k88]
  22. //===============================================================
  23. //<============================= Ant Hell ==============================>\\
  24. // Mocfild04 -----------------------------------------
  25. moc_fild04.gat,230,329,3 script Kafra 115,{
  26. cutin "kafra_03",2;
  27. callfunc "F_Kafra",0,1,1;
  28. M_Save:
  29. savepoint "moc_fild04.gat",231,339;
  30. callfunc "F_KafEnd",0,1;
  31. }
  32. // Mocfild15 --------------------------------------------
  33. moc_fild15.gat,264,260,3 script Kafra 115,{
  34. cutin "kafra_03",2;
  35. callfunc "F_Kafra",0,1,1;
  36. M_Save:
  37. savepoint "moc_fild15.gat",266,271;
  38. callfunc "F_KafEnd",0,1;
  39. }
  40. //<============================= Byalan Island ============================>\\
  41. izlu2dun.gat,106,58,8 script Kafra 115,{
  42. cutin "kafra_03",2;
  43. if(Class==Job_Novice && job_merchant_q3>0) callfunc "F_MercKafra"; //F_MercKafra found in merchant.txt
  44. callfunc "F_Kafra",0,1,1;
  45. M_Save:
  46. savepoint "izlu2dun.gat",87,170;
  47. callfunc "F_KafEnd",0,1;
  48. }
  49. //<============================ Culvert Sewers ============================>\\
  50. prt_fild05.gat,290,224,1 script Kafra 114,{
  51. cutin "kafra_04",2;
  52. callfunc "F_Kafra",0,1,1;
  53. M_Save:
  54. savepoint "prt_fild05.gat",274,243;
  55. callfunc "F_KafEnd",0,1;
  56. }
  57. //<=========================== Coal Mine (Dead Pitt) =======================>\\
  58. mjolnir_02.gat,83,361,4 script Kafra 114,{
  59. cutin "kafra_04",2;
  60. callfunc "F_KafSetOrcCoal";
  61. callfunc "F_Kafra",0,0,1;
  62. M_Save:
  63. savepoint "mjolnir_02.gat",98,352;
  64. callfunc "F_KafEnd",0,1;
  65. }
  66. //<=============================== Morroc Ruins ============================>\\
  67. moc_ruins.gat,61,156,5 script Kafra 114,{
  68. cutin "kafra_04",2;
  69. callfunc "F_Kafra",0,1,1;
  70. M_Save:
  71. savepoint "moc_ruins.gat",41,141;
  72. callfunc "F_KafEnd",0,1;
  73. }
  74. //<================================ Orc Dungeon ============================>\\
  75. gef_fild10.gat,73,340,4 script Kafra 115,{
  76. cutin "kafra_02",2;
  77. callfunc "F_KafSetOrcCoal";
  78. callfunc "F_Kafra",0,0,1;
  79. M_Save:
  80. savepoint "gef_fild10.gat",54,326;
  81. callfunc "F_KafEnd",0,1;
  82. }
  83. // Function: Sets variables for Kafras at the Orc Dungeon and the Coal Mines
  84. function script F_KafSetOrcCoal {
  85. setarray @wrpD$[0], "Prontera", "Geffen";
  86. setarray @wrpP[0], 3000, 3000;
  87. set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0];
  88. set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1];
  89. set @wrpC$[2], "Cancel";
  90. set @wrpC$[3], "";
  91. set @wrpC$[4], "";
  92. set @wrpC$[5], "";
  93. set @wrpC$[6], "";
  94. return;
  95. }
  96. //<============================== Treasure Island ==========================>\\
  97. alb2trea.gat,59,69,1 script Kafra 117,{
  98. cutin "kafra_01",2;
  99. callfunc "F_Kafra",0,1,1;
  100. M_Save:
  101. savepoint "alb2trea.gat",92,64;
  102. callfunc "F_KafEnd",0,1;
  103. }