Advertisement
ProClifo

Untitled

Jun 25th, 2015
222
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.23 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. goto @giveegg
  16. msgbox 0x81FB528 MSG_KEEPOPEN '"MAY: I think I'll take a short bre..."
  17. return
  18.  
  19. #org @brendan
  20. goto @giveegg
  21. msgbox 0x81FB58A MSG_KEEPOPEN '"BRENDAN: For the time being,\nI'm ..."
  22. return
  23.  
  24. #org @giveegg
  25. goto @startercheck
  26. copyvar 0x8000 0x4023
  27. msgbox @eggmsg MSG_YESNO
  28. if 0x0 goto @nothanks
  29. copyvar 0x40c5 LASTRESULT
  30. giveegg 0x40c5
  31. msgbox @takecare MSG_KEEPOPEN
  32.  
  33. #org @startercheck
  34. compare 0x8000 0x0
  35. if 0x1 goto @blaziken
  36. compare 0x8000 0x1
  37. if 0x1 goto @swampert
  38. compare 0x8000 0x2
  39. if 0x1 goto @sceptile
  40. return
  41.  
  42. #org @blaziken
  43. bufferpokemon 0x0 PKMN_BLAZIKEN
  44. setvar LASTRESULT PKMN_TORCHIC
  45. return
  46.  
  47. #org @swampert
  48. bufferpokemon 0x0 PKMN_SWAMPERT
  49. setvar LASTRESULT PKMN_MUDKIP
  50. return
  51.  
  52. #org @sceptile
  53. bufferpokemon 0x0 PKMN_SCEPTILE
  54. setvar LASTRESULT PKMN_TREECKO
  55. return
  56.  
  57. #org @nothanks
  58. release
  59. end
  60.  
  61. #org @eggmsg
  62. = [player], guess what!\nMy [buffer] had an EGG!\pSince I'll be staying at the lab\nfor a while, why don't you take\lcare of it?
  63.  
  64. #org @takecare
  65. = I hope you'll take good care of\nit!
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement