mail.txt 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150
  1. //===== rAthena Script =======================================
  2. //= Mail Boxes
  3. //===== By: ==================================================
  4. //= L0ne_W0lf
  5. //===== Current Version: =====================================
  6. //= 1.8
  7. //===== Compatible With: =====================================
  8. //= rAthena Project
  9. //===== Description: =========================================
  10. //= [Official Conversion]
  11. //= Pickup and write mail from/to players in game.
  12. //===== Additional Comments: =================================
  13. //= 1.0 First version, place holders only. [L0ne_W0lf]
  14. //= 1.1 Dialog updated to Official. [L0ne_W0lf]
  15. //= 1.2 Swapped "atcommand" for "Openmail". [L0ne_W0lf]
  16. //= 1.3 Added Veins mail box. [L0ne_W0lf]
  17. //= 1.3a Corrected a typo error. (bugreport:798) [Samuray22]
  18. //= 1.4 Added a Mapflag to prevent mail operations in other maps [Zephyrus]
  19. //= 1.5 Moved Morocc Mail boxes to Morocc Ruins. [L0ne_W0lf]
  20. //= 1.6 Duplicates now spawn from floating NPCs. [L0ne_W0lf]
  21. //= 1.7 Updated Script from the Official. [Elias]
  22. //= 1.8 Optimized a bit. [Daegaladh]
  23. //============================================================
  24. // Floating mailbox npc that all NPCs duplicate from.
  25. //============================================================
  26. - script Mailbox#dummy::MailBox -1,{
  27. mes "[Mailbox]";
  28. mes "To use the mailbox service,";
  29. mes "you are required to pay 130 zeny.";
  30. mes "Would you like to use the service?";
  31. next;
  32. switch(select("Yes.:No.")) {
  33. case 1:
  34. mes "[Mailbox]";
  35. if (Zeny < 130) {
  36. mes "I am sorry, but you do not have enough money.";
  37. mes "To use the mailbox service,";
  38. mes "you are required to pay 130 zeny.";
  39. close;
  40. }
  41. mes "Thank you, please come again.";
  42. set Zeny, Zeny - 130;
  43. close2;
  44. openmail;
  45. end;
  46. case 2:
  47. mes "[Mailbox]";
  48. mes "Thank you, please come again.";
  49. close;
  50. }
  51. }
  52. // Prontera
  53. //============================================================
  54. prontera,146,86,0 duplicate(MailBox) Mailbox#prt 888
  55. prontera,275,213,0 duplicate(MailBox) Mailbox#2prt 888
  56. prontera,34,212,0 duplicate(MailBox) Mailbox#3prt 888
  57. // Izlude
  58. //============================================================
  59. izlude,136,94,0 duplicate(MailBox) Mailbox#iz 888
  60. // Morocc
  61. //============================================================
  62. moc_ruins,72,166,0 duplicate(MailBox) Mailbox#1moc 888
  63. moc_ruins,156,52,0 duplicate(MailBox) Mailbox#2moc 888
  64. // Geffen
  65. //============================================================
  66. geffen,115,67,0 duplicate(MailBox) Mailbox#gef 888
  67. geffen,199,125,0 duplicate(MailBox) Mailbox#2gef 888
  68. // Payon
  69. //============================================================
  70. payon,191,104,0 duplicate(MailBox) Mailbox#pay 888
  71. payon,171,226,0 duplicate(MailBox) Mailbox#2pay 888
  72. pay_arche,55,127,0 duplicate(MailBox) Mailbox#3pay 888
  73. // Alberta
  74. //============================================================
  75. alberta,90,60,0 duplicate(MailBox) Mailbox#alb 888
  76. alberta,30,240,0 duplicate(MailBox) Mailbox#2alb 888
  77. // Al De Baran
  78. //============================================================
  79. aldebaran,135,122,0 duplicate(MailBox) Mailbox#alde 888
  80. // Juno
  81. //============================================================
  82. yuno,148,187,0 duplicate(MailBox) Mailbox#yuno 888
  83. yuno,332,108,0 duplicate(MailBox) Mailbox#2yuno 888
  84. // Lighthalzen
  85. //============================================================
  86. lighthalzen,164,85,0 duplicate(MailBox) Mailbox#lht 888
  87. lighthalzen,196,320,0 duplicate(MailBox) Mailbox#2lht 888
  88. // Einbroch and Einbech
  89. //============================================================
  90. einbroch,231,215,0 duplicate(MailBox) Mailbox#ein 888
  91. einbroch,77,202,0 duplicate(MailBox) Mailbox#2ein 888
  92. einbech,182,124,0 duplicate(MailBox) Mailbox#3ein 888
  93. // Comodo
  94. //============================================================
  95. comodo,200,150,0 duplicate(MailBox) Mailbox#cmd 888
  96. // Umbala
  97. //============================================================
  98. umbala,104,155,0 duplicate(MailBox) Mailbox#um 888
  99. // Amatsu
  100. //============================================================
  101. amatsu,102,146,0 duplicate(MailBox) Mailbox#ama 888
  102. // Kunlun
  103. //============================================================
  104. gonryun,152,117,0 duplicate(MailBox) Mailbox#gon 888
  105. // Ayothaya
  106. //============================================================
  107. ayothaya,205,169,0 duplicate(MailBox) Mailbox#ayo 888
  108. // Luoyang
  109. //============================================================
  110. louyang,204,100,0 duplicate(MailBox) Mailbox#lou 888
  111. // Hugel
  112. //============================================================
  113. hugel,86,168,0 duplicate(MailBox) Mailbox#hu 111
  114. // Rachel
  115. //============================================================
  116. rachel,122,146,0 duplicate(MailBox) Post Box#ra 888
  117. // Veins
  118. //============================================================
  119. veins,218,123,0 duplicate(MailBox) Post Box#ve 888
  120. // RODEX makes these NPCs useless
  121. - script RodexMailBoxInit -1,{
  122. end;
  123. OnInit:
  124. if( PACKETVER >= 20150513 ){
  125. unloadnpc "MailBox";
  126. }
  127. end;
  128. }