gldfunc_kafra.txt 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637
  1. //===== eAthena Script =======================================
  2. //= War of Emperium Kafras 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. //= Kafra service for guild members
  12. //======================================
  13. //= Break down of arguments used in the function:
  14. //= arg(0): name of City.
  15. //= arg(1): name of guild castle.
  16. //= arg(2): x1 coordinate for warp
  17. //= arg(3): y1 coordinate for warp
  18. //===== Additional Comments: =================================
  19. //= v1.2: All Guild kafra scripts use this function. [kobra_k88]
  20. //============================================================
  21. function script F_GKafra {
  22. cutin "kafra_01",2;
  23. set @GID, GetCastleData(getarg(0)+".gat",1);
  24. if (getcharid(2) == @GID) goto L_StartG;
  25. mes "[Kafra Service]";
  26. mes "I am here to serve only ^5533FF" + GetGuildName(@GID) + "^000000 members. Please use different Kafra Service. Thank you.";
  27. cutin "",255;
  28. close;
  29. L_StartG:
  30. set @wrpP[0], 0;
  31. set @wrpD$[0], getarg(1);
  32. setarray @wrpC$[0], @wrpD$[0], "Cancel", "", "", "","";
  33. callfunc "F_Kafra",2;
  34. end;
  35. }