kafras_mor.txt 2.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100
  1. //===== eAthena Script =======================================
  2. //= Morroc Kafras
  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 :)
  18. //= v2.1b Minor changes to function calls. Using arguments.
  19. //= This version uses arrays .[kobra_k88]
  20. //=====================================================================
  21. // South ================================
  22. morocc.gat,156,97,4 script Kafra 115,{
  23. cutin "kafra_03",2;
  24. callfunc "F_KafSetMoc";
  25. callfunc "F_Kafra",0,0,0;
  26. M_Save:
  27. savepoint "morocc.gat",156,46;
  28. callfunc "F_KafEnd",0,1;
  29. }
  30. // North =================================
  31. morocc.gat,162,271,4 script Kafra 114,{
  32. cutin "kafra_04",2;
  33. callfunc "F_KafSetMoc";
  34. callfunc "F_Kafra",0,0,0;
  35. M_Save:
  36. menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In;
  37. sM_Out:
  38. savepoint "moc_fild07.gat",212,30;
  39. callfunc "F_KafEnd",0,1;
  40. sM_In:
  41. savepoint "morocc.gat",157,272;
  42. callfunc "F_KafEnd",0,1;
  43. }
  44. // West =================================
  45. morocc.gat,28,167,6 script Kafra 116,{
  46. cutin "kafra_02",2;
  47. callfunc "F_KafSetMoc";
  48. callfunc "F_Kafra",0,0,0;
  49. M_Save:
  50. menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In;
  51. sM_Out:
  52. savepoint "moc_fild19.gat",164,107;
  53. callfunc "F_KafEnd",0,1;
  54. sM_In:
  55. savepoint "morocc.gat",31,164;
  56. callfunc "F_KafEnd",0,1;
  57. }
  58. // East =================================
  59. morocc.gat,292,211,4 script Kafra 112,{
  60. cutin "kafra_06",2;
  61. callfunc "F_KafSetMoc";
  62. callfunc "F_Kafra",0,0,0;
  63. M_Save:
  64. menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In;
  65. sM_Out:
  66. savepoint "moc_fild10.gat",24,107;
  67. callfunc "F_KafEnd",0,1;
  68. sM_In:
  69. savepoint "morocc.gat",294,207;
  70. callfunc "F_KafEnd",0,1;
  71. }
  72. // Function: Sets variables for Morroc Kafras --------------------------------
  73. function script F_KafSetMoc {
  74. setarray @wrpD$[0], "Comodo", "Prontera", "Payon", "Geffen", "Alberta";
  75. setarray @wrpP[0], 1400, 1400, 1800, 2100, 2200;
  76. set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0];
  77. set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1];
  78. set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2];
  79. set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3];
  80. set @wrpC$[4], @wrpD$[4]+" -> "+@wrpP[4];
  81. set @wrpC$[5], "Cancel";
  82. set @wrpC$[6], "";
  83. setarray @viewpX[0], 156, 163, 28, 292;
  84. setarray @viewpY[0], 97, 260, 167, 211;
  85. return;
  86. }