gldfunc_flag.txt 2.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758
  1. //===== eAthena Script =======================================
  2. //= War of Emperium Guild Flags Function
  3. //===== By: ==================================================
  4. //= jAthena - kalen (1.0)
  5. //= 1.1 by Akaru, ho|yAnge|X, and Valaris
  6. //===== Current Version: =====================================
  7. //= 1.2
  8. //===== Compatible With: =====================================
  9. //= eAthena 0.1+; RO Episode 4+
  10. //===== Description: =========================================
  11. //= Flags display messages stating whether or not a guild castle has been captured.
  12. //= Allows the guild members to return to a captured castle.
  13. //======================================
  14. //= Break down of arguments used in the function:
  15. //= arg(0): name of City.
  16. //= arg(1): name of guild castle.
  17. //= arg(2): x1 coordinate for warp
  18. //= arg(3): y1 coordinate for warp
  19. //===== Additional Comments: =================================
  20. //= v1.2: All Guild flags scripts use this function. [kobra_k88]
  21. //============================================================
  22. function script F_Flags {
  23. set @GID, GetCastleData(getarg(1)+".gat",1);
  24. if (@GID != 0) goto L_Startg;
  25. mes "[ Edict of the Divine Rune Midgard Kingdom of " + getarg(0) + " ]";
  26. mes " ";
  27. mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of " + getarg(0) + ", this guild base has not been taken by any guild yet";
  28. mes " ";
  29. mes "2. In order to take this guild base, you must defeat all the guardians that are protecting the guild base and eliminate the Emperium.";
  30. return;
  31. L_Startg:
  32. if (getcharid(2) == @GID) goto L_Startg2;
  33. mes "[ Edict of the Divine Rune Midgard Kingdom of "+ getarg(0) +" ]";
  34. mes " ";
  35. mes "1. Honoring the ordinance of the";
  36. mes "Divine Rune Midgard Kingdom of ";
  37. mes getarg(0) +", we approve that this";
  38. mes "base is in the private possession";
  39. mes "of the ^ff0000" + GetGuildName(@GID) + "^000000 guild.";
  40. mes " ";
  41. mes "2. The guild master of the";
  42. mes "^ff0000"+ GetGuildName(@GID) + "^000000 guild, is ^0000FF" + GetGuildMaster(@GID) + "^000000.";
  43. mes "If anyone objects to that, raise your sword to honor yourself.";
  44. return;
  45. L_Startg2:
  46. mes "[ Ringing Voice ]";
  47. mes "Brave one... would you return to your honorable be?";
  48. next;
  49. menu "Return.",M_Enter,"Cancel.",-;
  50. return;
  51. M_Enter:
  52. warp getarg(1)+".gat",getarg(2),getarg(3);
  53. return;
  54. }