Advertisement
ProClifo

Untitled

Jun 25th, 2015
243
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.48 KB | None | 0 0
  1. #include stdpoke.rbh
  2. #freespace 0xFF
  3. #dynamic 0xF00000
  4.  
  5. #org 0x1FA490
  6. checkgender
  7. compare LASTRESULT 0x0
  8. if 0x1 call @may
  9. compare LASTRESULT 0x1
  10. if 0x1 call @brendan
  11. release
  12. end
  13.  
  14. #org @may
  15. bufferstring 0x1 @maybuffer
  16. call @giveegg
  17. msgbox 0x81FB528 MSG_KEEPOPEN '"MAY: I think I'll take a short bre..."
  18. return
  19.  
  20. #org @brendan
  21. bufferstring 0x1 @brendanbuffer
  22. call @giveegg
  23. msgbox 0x81FB58A MSG_KEEPOPEN '"BRENDAN: For the time being,\nI'm ..."
  24. return
  25.  
  26. #org @giveegg
  27. lock
  28. faceplayer
  29. copyvar 0x8000 0x4023
  30. call @startercheck
  31. msgbox @eggmsg MSG_YESNO
  32. compare LASTRESULT 0x0
  33. if 0x1 goto @nothanks
  34. giveegg 0x8001
  35. fanfare 0x172
  36. preparemsg @obtained
  37. waitmsg
  38. waitfanfare
  39. msgbox @takecare MSG_KEEPOPEN
  40. release
  41. end
  42.  
  43. #org @startercheck
  44. compare 0x8000 0x0
  45. if 0x1 call @blaziken
  46. compare 0x8000 0x1
  47. if 0x1 call @swampert
  48. compare 0x8000 0x2
  49. if 0x1 call @sceptile
  50. return
  51.  
  52. #org @blaziken
  53. bufferpokemon 0x0 PKMN_BLAZIKEN
  54. setvar 0x8001 PKMN_TORCHIC
  55. return
  56.  
  57. #org @swampert
  58. bufferpokemon 0x0 PKMN_SWAMPERT
  59. setvar 0x8001 PKMN_MUDKIP
  60. return
  61.  
  62. #org @sceptile
  63. bufferpokemon 0x0 PKMN_SCEPTILE
  64. setvar 0x8001 PKMN_TREECKO
  65. return
  66.  
  67. #org @nothanks
  68. release
  69. end
  70.  
  71. #org @eggmsg
  72. = [player], guess what!\nMy [buffer1] had an EGG!\pSince I'll be staying at the lab\nfor a while, why don't you take\lcare of it?
  73.  
  74. #org @takecare
  75. = I hope you'll care good care of\nit!
  76.  
  77. #org @obtained
  78. = [player] received the EGG from [buffer2].
  79.  
  80. #org @maybuffer
  81. = MAY
  82.  
  83. #org @brendanbuffer
  84. = BRENDAN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement