daycare_exp.asm 205 B

12345678910111213141516171819
  1. IncrementDayCareMonExp:
  2. ld a, [wDayCareInUse]
  3. and a
  4. ret z
  5. ld hl, wDayCareMonExp + 2
  6. inc [hl]
  7. ret nz
  8. dec hl
  9. inc [hl]
  10. ret nz
  11. dec hl
  12. inc [hl]
  13. ld a, [hl]
  14. cp $50
  15. ret c
  16. ld a, $50
  17. ld [hl], a
  18. ret