nguild_dunsw.txt 2.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667
  1. //===== rAthena Script =======================================
  2. //= War of Emperium Dungeon Switch for NGuild Castles
  3. //===== By: ==================================================
  4. //= kobra_k88
  5. //===== Current Version: =====================================
  6. //= 1.1
  7. //===== Compatible With: =====================================
  8. //= rAthena 0.1+; RO Episode 4+
  9. //===== Description: =========================================
  10. //= Switch that warps guild members to the guild dungeon
  11. //===== Additional Comments: =================================
  12. //= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
  13. //= 1.1 Guild Dungeon Switch Fucntion added. [L0ne_W0lf]
  14. //============================================================
  15. //==================================================
  16. function script F_GldDunSw {
  17. set .@GID, GetCastleData(getarg(0),1);
  18. if (.@GID == 0) {
  19. mes "[ Echoing Voice ]";
  20. mes " ' The one who can overcome an ordeal and show true bravery... will find the way... ' ";
  21. close;
  22. }
  23. else {
  24. mes "[ Echoing Voice ]";
  25. mes " ' Only the one who can show true bravery can take this test. '";
  26. next;
  27. mes " ";
  28. mes "There's a small lever. Will you pull it?";
  29. next;
  30. if (select("Pull.:Do not.") == 1) {
  31. if (getcharid(2) == .@GID) {
  32. warp "gld_dun"+getarg(1),getarg(2),getarg(3);
  33. end;
  34. }
  35. mes " ";
  36. mes " Nothing happened.";
  37. }
  38. return;
  39. }
  40. }
  41. // Castle 1 ===============================================
  42. nguild_alde,212,181,0 script Switch#DunN01 111,{
  43. callfunc "F_GldDunSw","nguild_alde","02",32,122;
  44. close;
  45. }
  46. // Castle 2 ===============================================
  47. nguild_gef,78,84,0 script Switch#DunN02 111,{
  48. callfunc "F_GldDunSw","nguild_gef","04",39,258;
  49. close;
  50. }
  51. // Castle 3 ===============================================
  52. nguild_pay,101,25,0 script Switch#DunN03 111,{
  53. callfunc "F_GldDunSw","nguild_pay","01",186,165;
  54. close;
  55. }
  56. // Castle 4 ===============================================
  57. nguild_prt,94,200,0 script Switch#DunN04 111,{
  58. callfunc "F_GldDunSw","nguild_prt","03",28,251;
  59. close;
  60. }