Advertisement
ProClifo

Untitled

Jun 25th, 2015
272
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.93 KB | None | 0 0
  1. /*
  2. buffer1 = Rival's evolved Pokemon
  3. buffer2 = Received Pokemon
  4. Var 0x4023 0x0 = Treecko was the player's starter
  5. Var 0x4023 0x1 = Torchic was the player's starter
  6. Var 0x4023 0x2 = Mudkip was the player's starter
  7. */
  8.  
  9.  
  10.  
  11. // MAY SPECIFIC SCRIPTS
  12. #org @tree_may
  13. call @startercheck
  14. checkflag 0x245
  15. if 0x1 goto @tryagain_may
  16. call @may_firstmeet
  17. call @givepokemon
  18. msgbox @takecare_may MSG_KEEPOPEN
  19. release
  20. end
  21.  
  22. #org @may_firstmeet
  23. msgbox @may_firstmeet_msg MSG_YESNO
  24. compare LASTRESULT 0x0
  25. if 0x1 goto @reject_may
  26. // maybe i'll put a msgbox here
  27. return
  28.  
  29. #org @tryagain_may
  30. msgbox @tryagain_may_msg MSG_YESNO
  31. compare LASTRESULT 0x0
  32. if 0x1 goto @reject_may
  33. // maybe i'll put a msgbox here
  34. return
  35.  
  36. #org @reject_may
  37. msgbox @reject_may_msg MSG_KEEPOPEN
  38. release
  39. end
  40.  
  41. #org @may_firstmeet_msg
  42. = MAY: Hello, [player]! I recently hatched an EGG that my [buffer1] had some time ago. I'm going to stay here for a while, so why don't you raise it?
  43. #org @tryagain_may_msg
  44. = MAY: How about it, [player]? Will you take care of my [buffer2]?
  45. #org @reject_may_msg
  46. = Is that so? Well, let me know if you have a change of heart.
  47. #org @takecare_may
  48. = Please take good care of it!
  49.  
  50.  
  51.  
  52. // BRENDAN SPECIFIC SCRIPTS
  53. #org @tree_brendan
  54. call @startercheck
  55. checkflag 0x245
  56. if 0x1 goto @tryagain_brendan
  57. call @brendan_firstmeet
  58. call @givepokemon
  59. msgbox @takecare_brendan MSG_KEEPOPEN
  60. release
  61. end
  62.  
  63. #org @brendan_firstmeet
  64. msgbox @brendan_firstmeet_msg MSG_YESNO
  65. compare LASTRESULT 0x0
  66. if 0x1 goto @reject_brendan
  67. // brendanbe i'll put a msgbox here
  68. return
  69.  
  70. #org @tryagain_brendan
  71. msgbox @tryagain_brendan_msg MSG_YESNO
  72. compare LASTRESULT 0x0
  73. if 0x1 goto @reject_brendan
  74. // brendanbe i'll put a msgbox here
  75. return
  76.  
  77. #org @reject_brendan
  78. msgbox @reject_brendan_msg MSG_KEEPOPEN
  79. release
  80. end
  81.  
  82. #org @brendan_firstmeet_msg
  83. = MAY: Hello, [player]! I just hatched an egg that my [buffer1] laid a while back. I'll be in the lab for some time, how about you take it off my hands?
  84. #org @tryagain_brendan_msg
  85. = MAY: How about it, [player]? Do you want my [buffer2] or not?
  86. #org @reject_brendan_msg
  87. = Oh, all right. Just let me know if you change your mind.
  88. #org @takecare_brendan_msg
  89. = I wish you two the best of luck.
  90.  
  91.  
  92.  
  93. // UNIVERSAL SCRIPTS
  94. #org @givepokemon
  95. givepokemon 0x8001 5 0 0 0 0
  96. fanfare 0x172
  97. preparemsg @obtained
  98. waitmsg
  99. waitfanfare
  100. setflag 0x255
  101. return
  102.  
  103. #org @startercheck
  104. copyvar 0x8000 0x4023
  105. compare 0x8000 0x0
  106. if 0x1 call @blaziken
  107. compare 0x8000 0x1
  108. if 0x1 call @swampert
  109. compare 0x8000 0x2
  110. if 0x1 call @sceptile
  111. return
  112.  
  113. #org @blaziken
  114. bufferpokemon 0x0 PKMN_BLAZIKEN
  115. setvar 0x8001 PKMN_TORCHIC
  116. bufferpokemon 0x1 PKMN_MUDKIP
  117. return
  118.  
  119. #org @swampert
  120. bufferpokemon 0x0 PKMN_SWAMPERT
  121. setvar 0x8001 PKMN_MUDKIP
  122. bufferpokemon 0x1 PKMN_MUDKIP
  123. return
  124.  
  125. #org @sceptile
  126. bufferpokemon 0x0 PKMN_SCEPTILE
  127. setvar 0x8001 PKMN_TREECKO
  128. bufferpokemon 0x1 PKMN_MUDKIP
  129. return
  130.  
  131. #org @obtained
  132. = [player] received a [buffer2]!
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement