tradecenter.asm 733 B

123456789101112131415161718192021222324252627282930313233343536373839
  1. TradeCenterScript:
  2. call EnableAutoTextBoxDrawing
  3. ld a, [hSerialConnectionStatus]
  4. cp USING_INTERNAL_CLOCK
  5. ld a, SPRITE_FACING_LEFT
  6. jr z, .next
  7. ld a, SPRITE_FACING_RIGHT
  8. .next
  9. ld [hSpriteFacingDirection], a
  10. ld a, $1
  11. ld [H_SPRITEINDEX], a
  12. call SetSpriteFacingDirection
  13. ld hl, wd72d
  14. bit 0, [hl]
  15. set 0, [hl]
  16. ret nz
  17. ld hl, wSpriteStateData2 + $14
  18. ld a, $8
  19. ld [hli], a
  20. ld a, $a
  21. ld [hl], a
  22. ld a, SPRITE_FACING_LEFT
  23. ld [wSpriteStateData1 + $19], a
  24. ld a, [hSerialConnectionStatus]
  25. cp USING_INTERNAL_CLOCK
  26. ret z
  27. ld a, $7
  28. ld [wSpriteStateData2 + $15], a
  29. ld a, SPRITE_FACING_RIGHT
  30. ld [wSpriteStateData1 + $19], a
  31. ret
  32. TradeCenterTextPointers:
  33. dw TradeCenterText1
  34. TradeCenterText1:
  35. TX_FAR _TradeCenterText1
  36. db "@"