kafras_dungeons.txt 3.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132
  1. //===== eAthena Script ================
  2. //= Kafras in Dungeons and Fields
  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. //===== 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. //= Fixed Kafras, not giving you Save menu [Lupus]
  23. //= 2.3 Removed SAVE menu from dungeons Kafras [Lupus]
  24. //= 2.4 Now Baby Merchant can pass Merch Job Quest w/o probs [Lupus]
  25. //===============================================================
  26. //<============================= Ant Hell ==============================>\\
  27. // Mocfild04 -----------------------------------------
  28. moc_fild04.gat,230,329,3 script Kafra 115,{
  29. cutin "kafra_03",2;
  30. callfunc "F_Kafra",0,2,1;
  31. M_Save:
  32. savepoint "moc_fild04.gat",231,339;
  33. callfunc "F_KafEnd",0,1;
  34. }
  35. // Mocfild15 --------------------------------------------
  36. moc_fild15.gat,264,260,3 script Kafra 115,{
  37. cutin "kafra_03",2;
  38. callfunc "F_Kafra",0,2,1;
  39. M_Save:
  40. savepoint "moc_fild15.gat",266,271;
  41. callfunc "F_KafEnd",0,1;
  42. }
  43. //<============================= Byalan Island ============================>\\
  44. izlu2dun.gat,106,58,8 script Kafra 115,{
  45. cutin "kafra_03",2;
  46. if(BaseJob==Job_Novice && job_merchant_q3>0) callfunc "F_MercKafra"; //F_MercKafra found in merchant.txt
  47. callfunc "F_Kafra",0,2,1;
  48. M_Save:
  49. savepoint "izlu2dun.gat",87,170;
  50. callfunc "F_KafEnd",0,1;
  51. }
  52. //<============================ Culvert Sewers ============================>\\
  53. prt_fild05.gat,290,224,1 script Kafra 114,{
  54. cutin "kafra_04",2;
  55. callfunc "F_Kafra",0,2,1;
  56. M_Save:
  57. savepoint "prt_fild05.gat",274,243;
  58. callfunc "F_KafEnd",0,1;
  59. }
  60. //<=========================== Coal Mine (Dead Pitt) =======================>\\
  61. mjolnir_02.gat,83,361,4 script Kafra 114,{
  62. cutin "kafra_04",2;
  63. callfunc "F_KafSetOrcCoal";
  64. callfunc "F_Kafra",0,0,1;
  65. M_Save:
  66. savepoint "mjolnir_02.gat",98,352;
  67. callfunc "F_KafEnd",0,1;
  68. }
  69. //<=============================== Morroc Ruins ============================>\\
  70. moc_ruins.gat,61,156,5 script Kafra 114,{
  71. cutin "kafra_04",2;
  72. callfunc "F_Kafra",0,2,1;
  73. M_Save:
  74. savepoint "moc_ruins.gat",41,141;
  75. callfunc "F_KafEnd",0,1;
  76. }
  77. //<================================ Orc Dungeon ============================>\\
  78. gef_fild10.gat,73,340,4 script Kafra 115,{
  79. cutin "kafra_03",2;
  80. callfunc "F_KafSetOrcCoal";
  81. callfunc "F_Kafra",0,0,1;
  82. M_Save:
  83. savepoint "gef_fild10.gat",54,326;
  84. callfunc "F_KafEnd",0,1;
  85. }
  86. // Function: Sets variables for Kafras at the Orc Dungeon and the Coal Mines
  87. function script F_KafSetOrcCoal {
  88. setarray @wrpD$[0], "Prontera", "Geffen";
  89. setarray @wrpP[0], 3000, 3000;
  90. set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0];
  91. set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1];
  92. set @wrpC$[2], "Cancel";
  93. set @wrpC$[3], "";
  94. set @wrpC$[4], "";
  95. set @wrpC$[5], "";
  96. set @wrpC$[6], "";
  97. return;
  98. }
  99. //<============================== Treasure Island ==========================>\\
  100. alb2trea.gat,59,69,1 script Kafra 117,{
  101. cutin "kafra_01",2;
  102. callfunc "F_Kafra",0,2,1;
  103. M_Save:
  104. savepoint "alb2trea.gat",92,64;
  105. callfunc "F_KafEnd",0,1;
  106. }