divorce.txt 6.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217
  1. //===== rAthena Script =======================================
  2. //= Divorcing Deviruchi
  3. //===== By: ==================================================
  4. //= Perkka, Scriptor, LightFighter
  5. //= L0ne_W0lf
  6. //===== Current Version: =====================================
  7. //= 1.5
  8. //===== Compatible With: =====================================
  9. //= rAthena Project
  10. //===== Description: =========================================
  11. //= [Official Conversion]
  12. //= Official Divorce script.
  13. //= Added isloggedin() check, even though Aegis doesn't do it;
  14. //= should be able to divorce even when the spouse is not online.
  15. //===== Additional Comments: =================================
  16. //= Both players should be online to get divorced
  17. //= Fixed menu [Lupus]
  18. //= 1.1 Added check if the patner's online, added effects [Lupus]
  19. //= 1.2 Updated to Aegis 10.3 standards. [L0ne_W0lf]
  20. //= 1.2a Commented out check of 'wedding_sign' to let
  21. //= old married players divorcing, optimized, fixed a bug [Lupus]
  22. //= 1.3 Wedding variable 'wedding_sign' is now unset on divorce. [L0ne_W0lf]
  23. //= 1.4 Removed ifpartneron check, fixed typo in percentheal. [L0ne_W0lf]
  24. //= 1.5 Replaced effect numerics with constants. [L0ne_W0lf]
  25. //============================================================
  26. nif_in,190,112,5 script Deviruchi#divorce 738,{
  27. mes "[Deviruchi]";
  28. // if (wedding_sign == 0) {
  29. // mes "Heh heh...";
  30. // mes "Look at that depressed face.";
  31. // mes "You must be feeling very lonely.";
  32. // mes "But that's something everyone";
  33. // mes "has to deal with.";
  34. // next;
  35. // mes "[Deviruchi]";
  36. // mes "If you feel that lonely,";
  37. // mes "how about raising a Pet?";
  38. // mes "I hear that my kind is very";
  39. // mes "popular nowadays, heh heh~";
  40. // close;
  41. // }
  42. // else
  43. if (!getpartnerid()) {
  44. mes "Bwah hah hah~!";
  45. mes "That look in your eyes~!";
  46. if (Sex == SEX_MALE) {
  47. mes "Those are definitely the eyes";
  48. mes "of a lonely male bachelor.";
  49. mes "I'm almost 100 percent sure";
  50. mes "you got ditched at the altar.";
  51. }
  52. else {
  53. mes "They're just filled with the";
  54. mes "pain of an old maid--!";
  55. mes "Couldn't rope some poor guy";
  56. mes "into marriage, huh?";
  57. }
  58. next;
  59. mes "[Deviruchi]";
  60. mes "HHAHAHAHA~!";
  61. mes "Oooooh...Hee hee~";
  62. mes "I'd be more sympathetic if,";
  63. mes "you know, I weren't a creature";
  64. mes "of darkness.";
  65. close;
  66. }
  67. mes "You look awfully depressed...";
  68. mes "Lucky for you, I could care";
  69. mes "less about happy people...";
  70. mes "It's the humans in despair";
  71. mes "that I take an interest in.";
  72. mes "Hahahahahahah~!";
  73. next;
  74. mes "[Deviruchi]";
  75. mes "I sense that you carry a";
  76. mes "tiresome burden...";
  77. mes "If I'm not wrong, you're";
  78. if (Sex == SEX_MALE)
  79. mes "a married man, aren't you?";
  80. else
  81. mes "a married woman, aren't you?";
  82. next;
  83. mes "[Deviruchi]";
  84. mes "Let me ask you one thing.";
  85. mes "Are you happy to be married?";
  86. mes "Forget about responsibilities,";
  87. mes "romance and all that other junk";
  88. mes "for now.";
  89. next;
  90. mes "[Deviruchi]";
  91. mes "I mean, can just one single";
  92. mes "person really bring you all that";
  93. mes "happiness? I know all about how";
  94. mes "special weddings and the magic";
  95. mes "of love is supposed to be, but...";
  96. next;
  97. mes "[Deviruchi]";
  98. mes "At the end of the day, you and";
  99. mes "your partner fight, and you feel";
  100. mes "totally totally miserable.";
  101. if (Sex == SEX_MALE)
  102. mes "...all because of HER.";
  103. else
  104. mes "...all because of HIM.";
  105. next;
  106. mes "[Deviruchi]";
  107. mes "Yes, it's your destiny to find me";
  108. mes "here. We all make mistakes...";
  109. mes "Even if you promised everlasting";
  110. mes "love, even if you made a vow...";
  111. mes "I can free you from that prison";
  112. mes "of matrimony.";
  113. next;
  114. mes "[Deviruchi]";
  115. mes "It's simple if you look at";
  116. mes "marriage as a contract...a";
  117. mes "contract that ends with 'till";
  118. mes "death do we part.' Here in";
  119. mes "Niflheim, it's easy to use";
  120. mes "that little loophole...";
  121. next;
  122. mes "[Deviruchi]";
  123. mes "*whispers*";
  124. mes "^555555It's not like you're breaking^000000";
  125. if (Sex == SEX_MALE) {
  126. mes "^555555any promises, and it's not";
  127. mes "like your wife will care if she";
  128. mes "doesn't know... Don't you";
  129. mes "want to be freed from her?^000000";
  130. }
  131. else {
  132. mes "^555555any promises. Hell, your husband";
  133. mes "doesn't even have to know";
  134. mes "about it... you deserve";
  135. mes "real happiness, right?^000000";
  136. }
  137. next;
  138. mes "[Deviruchi]";
  139. mes "You can have a brand new love";
  140. mes "with a better person...";
  141. mes "Wouldn't that be great...?";
  142. mes "I can help you if you want...";
  143. mes "I can make all of this happen!";
  144. next;
  145. if (select("No thanks, I am happy.:Yes, please do.") == 1) {
  146. mes "[Deviruchi]";
  147. mes "Hmpf~! You must still be";
  148. mes "fascinated with the silly";
  149. mes "notion of eternal love. Well,";
  150. mes "if you think you're happy,";
  151. mes "then I'll have nothing";
  152. mes "to do with you--!";
  153. close2;
  154. warp "niflheim",169,162;
  155. end;
  156. }
  157. mes "[Deviruchi]";
  158. mes "Good, good...";
  159. mes "Now all you have to do is give";
  160. mes "me what I want in exchange...";
  161. mes "Just 2,500,000 zeny and...*cough!*";
  162. mes "^666666An eensy piece of your soul.^000000";
  163. next;
  164. mes "[Deviruchi]";
  165. mes "After that, it's the carefree";
  166. mes "single's life. All you have to";
  167. mes "do is say the word...";
  168. next;
  169. if (select("...Give me some time to think.:Any price will do, give me a divorce right now!") == 1) {
  170. mes "[Deviruchi]";
  171. mes "I understand. But if you think";
  172. mes "about anything, think about";
  173. if (Sex == SEX_MALE) {
  174. mes "your wife's nagging, and";
  175. mes "how great it would be to";
  176. mes "finally free yourself of the";
  177. mes "old ball and chain~";
  178. }
  179. else {
  180. mes "how horrible your husband is,";
  181. mes "and what a relief it would";
  182. mes "be to be rid of that crumbum~";
  183. }
  184. close;
  185. }
  186. mes "[Deviruchi]";
  187. if (Zeny > 2499999) {
  188. mes "Excellent choice~";
  189. mes "Let's get started right";
  190. mes "away! This may take some";
  191. mes "time, but it's better than";
  192. mes "being hopelessly married";
  193. mes "^FF0000for the rest of your life.^000000";
  194. next;
  195. specialeffect EF_MAGICROD;
  196. specialeffect2 EF_DEVIL;
  197. set wedding_sign,0;
  198. set Zeny, Zeny-2500000;
  199. percentheal -100,-100;
  200. divorce;
  201. mes "[Deviruchi]";
  202. mes "Bwahhahahaha~!";
  203. mes "Now you're free~!";
  204. mes "Don't you feel so much";
  205. mes "better now as a single?";
  206. mes "Ah, bachelorhood...";
  207. close;
  208. }
  209. mes "Hmmm...I did tell you to bring";
  210. mes "2,500,000 zeny, right?";
  211. mes "No one else in this world can";
  212. mes "offer this kind of freedom...";
  213. mes "You can't put a price on";
  214. mes "peace of mind, can you?";
  215. close;
  216. }