Home Explore Help
Sign In
MineRobber9000
/
pokered-rematch
Watch 1
Star 0
Fork 0
Files Issues 0 Pull Requests 0 Wiki
Tree: db1981dd9b
Branches Tags
pokered-rema...
/
scripts
/
safarizonesecrethouse.asm

safarizonesecrethouse.asm 790 B
History Raw

12345678910111213141516171819202122232425262728293031323334353637383940414243444546 
  1. SafariZoneSecretHouseScript:
    2. 

  2. 	jp EnableAutoTextBoxDrawing
    3. 

  3. 

  4. SafariZoneSecretHouseTextPointers:
    5. 

  5. 	dw SafariZoneSecretHouseText1
    6. 

  6. 

  7. SafariZoneSecretHouseText1:
    8. 

  8. 	TX_ASM
    9. 

  9. 	CheckEvent EVENT_GOT_HM03
    10. 

  10. 	jr nz, .asm_20a9b
    11. 

  11. 	ld hl, SafariZoneSecretHouseText_4a350
    12. 

  12. 	call PrintText
    13. 

  13. 	lb bc, HM_03, 1
    14. 

  14. 	call GiveItem
    15. 

  15. 	jr nc, .BagFull
    16. 

  16. 	ld hl, ReceivedHM03Text
    17. 

  17. 	call PrintText
    18. 

  18. 	SetEvent EVENT_GOT_HM03
    19. 

  19. 	jr .asm_8f1fc
    20. 

  20. .BagFull
    21. 

  21. 	ld hl, HM03NoRoomText
    22. 

  22. 	call PrintText
    23. 

  23. 	jr .asm_8f1fc
    24. 

  24. .asm_20a9b
    25. 

  25. 	ld hl, HM03ExplanationText
    26. 

  26. 	call PrintText
    27. 

  27. .asm_8f1fc
    28. 

  28. 	jp TextScriptEnd
    29. 

  29. 

  30. SafariZoneSecretHouseText_4a350:
    31. 

  31. 	TX_FAR _SecretHouseText_4a350
    32. 

  32. 	db "@"
    33. 

  33. 

  34. ReceivedHM03Text:
    35. 

  35. 	TX_FAR _ReceivedHM03Text
    36. 

  36. 	TX_SFX_ITEM_1
    37. 

  37. 	db "@"
    38. 

  38. 

  39. HM03ExplanationText:
    40. 

  40. 	TX_FAR _HM03ExplanationText
    41. 

  41. 	db "@"
    42. 

  42. 

  43. HM03NoRoomText:
    44. 

  44. 	TX_FAR _HM03NoRoomText
    45. 

  45. 	db "@"
    46. 

  46.