celadondiner.asm 1.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667
  1. CeladonDinerScript:
  2. call EnableAutoTextBoxDrawing
  3. ret
  4. CeladonDinerTextPointers:
  5. dw CeladonDinerText1
  6. dw CeladonDinerText2
  7. dw CeladonDinerText3
  8. dw CeladonDinerText4
  9. dw CeladonDinerText5
  10. CeladonDinerText1:
  11. TX_FAR _CeladonDinerText1
  12. db "@"
  13. CeladonDinerText2:
  14. TX_FAR _CeladonDinerText2
  15. db "@"
  16. CeladonDinerText3:
  17. TX_FAR _CeladonDinerText3
  18. db "@"
  19. CeladonDinerText4:
  20. TX_FAR _CeladonDinerText4
  21. db "@"
  22. CeladonDinerText5:
  23. TX_ASM
  24. CheckEvent EVENT_GOT_COIN_CASE
  25. jr nz, .asm_eb14d
  26. ld hl, CeladonDinerText_491a7
  27. call PrintText
  28. lb bc, COIN_CASE, 1
  29. call GiveItem
  30. jr nc, .BagFull
  31. SetEvent EVENT_GOT_COIN_CASE
  32. ld hl, ReceivedCoinCaseText
  33. call PrintText
  34. jr .asm_68b61
  35. .BagFull
  36. ld hl, CoinCaseNoRoomText
  37. call PrintText
  38. jr .asm_68b61
  39. .asm_eb14d
  40. ld hl, CeladonDinerText_491b7
  41. call PrintText
  42. .asm_68b61
  43. jp TextScriptEnd
  44. CeladonDinerText_491a7:
  45. TX_FAR _CeladonDinerText_491a7
  46. db "@"
  47. ReceivedCoinCaseText:
  48. TX_FAR _ReceivedCoinCaseText
  49. TX_SFX_KEY_ITEM
  50. db "@"
  51. CoinCaseNoRoomText:
  52. TX_FAR _CoinCaseNoRoomText
  53. db "@"
  54. CeladonDinerText_491b7:
  55. TX_FAR _CeladonDinerText_491b7
  56. db "@"