Advertisement
ProClifo

Untitled

Aug 24th, 2015
96
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.07 KB | None | 0 0
  1. #freespace 0xFF
  2. #include stdpoke.rbh
  3. #dynamic 0xF00000
  4.  
  5. #org @chikorita
  6. setvar 0x4001 PKMN_CHIKORITA
  7. call @showpic
  8. msgbox 0x81FB8E0 MSG_YESNO
  9. compare LASTRESULT 0x0
  10. if 0x1 goto @reject
  11. setflag 0x251
  12. hidesprite 0x6
  13. hidepokepic
  14. goto @give
  15.  
  16. #org @cyndaquil
  17. setvar 0x4001 PKMN_CYNDAQUIL
  18. call @showpic
  19. msgbox 0x81FB7F6 MSG_YESNO
  20. compare LASTRESULT 0x0
  21. if 0x1 goto @reject
  22. setflag 0x252
  23. hidesprite 0x4
  24. hidepokepic
  25. goto @give
  26.  
  27. #org @totodile
  28. setvar 0x4001 PKMN_TOTODILE
  29. call @showpic
  30. msgbox 0x81FB869 MSG_YESNO
  31. compare LASTRESULT 0x0
  32. if 0x1 goto @reject
  33. setflag 0x253
  34. hidesprite 0x5
  35. hidepokepic
  36. goto @give
  37.  
  38. #org @showpic
  39. release
  40. applymovement 0x2 0x82725A8
  41. waitmovement 0x0
  42. showpokepic 0x4001 0xA 0x3
  43. return
  44.  
  45. #org @reject
  46. hidepokepic
  47. msgbox 0x81FB959 MSG_KEEPOPEN '"PROF. BIRCH: Take your time before..."
  48. releaseall
  49. end
  50.  
  51. #org @give
  52. givepokemon 0x4001 0x5 0x0 0x0 0x0 0x0
  53. call 0x8F00465
  54. checkflag 0x252
  55. if 0x0 goto @end
  56. checkflag 0x253
  57. if 0x0 goto @end
  58. checkflag 0x251
  59. if 0x0 goto @end
  60. setvar 0x40D3 0x6
  61. goto @end
  62.  
  63. #org @end
  64. release
  65. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement