Creator.txt 3.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139
  1. //===== rAthena Script =======================================
  2. //= Advance Class jobchanger after kRO Normals.
  3. //===== By: ==================================================
  4. //= Nana
  5. //= finished, optimized and tested by Lupus
  6. //===== Current Version: =====================================
  7. //= 1.3
  8. //===== Compatible With: =====================================
  9. //= rAthena Project
  10. //===== Description: =========================================
  11. //= Advance Class jobchanger after kRO Normals.
  12. //===== Additional Comments: =================================
  13. //= 1.1 Made all into functions, additional checks, etc. [Lupus]
  14. //= 1.2 Made numbers into constants. [Vicious]
  15. //= 1.3 Now saves/restores all the quest skills [Lupus]
  16. //= 1.4 Creators did not get their homunculus skills [Lemongrass]
  17. //============================================================
  18. valkyrie,53,50,3 script Biochemist#Valkyrie 122,{
  19. if (Class == Job_Creator && bioeth == 13 && getskilllv("AM_BIOETHICS") == 0) {
  20. mes "[Biochemist]";
  21. mes "Ah, have you come to";
  22. mes "retrieve the memories";
  23. mes "lost to you? Yes, you";
  24. mes "must be here for the";
  25. mes "secrets of life that";
  26. mes "were once yours...";
  27. next;
  28. if (select("Yes:No") == 1) {
  29. mes "[Biochemist]";
  30. mes "Close your eyes and";
  31. mes "put your mind at rest.";
  32. mes "We will return to your";
  33. mes "past to recollect the";
  34. mes "fragments of your lost";
  35. mes "memories.";
  36. next;
  37. mes "[Biochemist]";
  38. mes "When you open your eyes,";
  39. mes "you will clearly remember";
  40. mes "the secret of life. You will";
  41. mes "also remember the weight of";
  42. mes "responsibility in using these";
  43. mes "secrets for the right ends...";
  44. next;
  45. skill "AM_BIOETHICS",1,SKILL_PERM;
  46. mes "[Biochemist]";
  47. mes "Open your eyes...";
  48. mes "Now that you have";
  49. mes "remembered how to";
  50. mes "create artificial life, I only";
  51. mes "ask that you treat all of your";
  52. mes "creations with respect.";
  53. close;
  54. }
  55. mes "[Biochemist]";
  56. mes "If you wish to";
  57. mes "retrieve your lost";
  58. mes "memories, please";
  59. mes "come back to me.";
  60. mes "The secret to creating";
  61. mes "life is no trifling thing...";
  62. close;
  63. }
  64. else if (ADVJOB == 0 || Upper != 1) {
  65. set .@karma_d,rand(1,10);
  66. if (.@karma_d > 4) {
  67. mes "[Biochemist]";
  68. mes "Congratulations.";
  69. mes "Honor to the warriors!";
  70. close;
  71. }
  72. mes "[Biochemist]";
  73. mes "It's strange that";
  74. mes "someone like me is here.";
  75. mes "But even someone skilled";
  76. mes "in the ways of science";
  77. mes "can manage to be a hero.";
  78. next;
  79. mes "[Biochemist]";
  80. mes "In this instance,";
  81. mes "it's not necessarily";
  82. mes "the means I've used, but";
  83. mes "the ends for which I've";
  84. mes "fought that earned me";
  85. mes "a place in Valhalla...";
  86. close;
  87. }
  88. else if (ADVJOB == Job_Creator && Class == Job_Merchant_High && JobLevel > 39) {
  89. mes "[Biochemist]";
  90. mes "Yes...";
  91. mes "It's about time.";
  92. mes "We need more geniuses";
  93. mes "like you on Midgard.";
  94. next;
  95. mes "[Biochemist]";
  96. mes "Would you like to";
  97. mes "become a Biochemist?";
  98. next;
  99. if (select("No.:Yes.") == 1) {
  100. mes "[Biochemist]";
  101. mes "When you're ready,";
  102. mes "feel free to come back.";
  103. mes "Honor to the warriors!";
  104. close;
  105. }
  106. if (SkillPoint) {
  107. mes "[Biochemist]";
  108. mes "It is still possible for you to learn more skills. Please use";
  109. mes "all of your remaining Skill Points before returning to me.";
  110. close;
  111. }
  112. jobchange Job_Creator;
  113. if (bioeth == 13)
  114. skill "AM_BIOETHICS",1,SKILL_PERM;
  115. set ADVJOB,0;
  116. mes "[Biochemist]";
  117. mes "Congratulations!";
  118. mes "As a Biochemist,";
  119. mes "I hope you use your";
  120. mes "vast knowledge for the";
  121. mes "right purposes.";
  122. close;
  123. }
  124. else {
  125. mes "[Biochemist]";
  126. mes "Welcome";
  127. mes "to Valhalla,";
  128. mes "the Hall of Honor.";
  129. next;
  130. mes "[Biochemist]";
  131. mes "Please make";
  132. mes "yourself comfortable";
  133. mes "while you are here.";
  134. mes "Honor to the warriors!";
  135. close;
  136. }
  137. }