|
Routines |
| Prev: 54472 | Up: Map | Next: 54608 |
|
Used by the routine at GoldfishGame.
|
||||
| 54476 | LD IX,56334 | IX=GoldfishGame_PlayerAttributes. | ||
| 54480 | LD A,17 | Set PAPER: BLUE (1). | ||
| 54482 | RST 16 | |||
| 54483 | LD A,1 | |||
| 54485 | RST 16 | |||
| 54486 | LD A,(IX+5) | Jump to 54497 if *IX+5 is equal to 0. | ||
| 54489 | CP 0 | |||
| 54491 | JR Z,54497 | |||
| 54493 | LD (IX+4),0 | Write 0 to *IX+4. | ||
| 54497 | CALL Handler_SeaCreatureMovement | Call Handler_SeaCreatureMovement. | ||
| 54500 | LD A,C | Jump to 54599 if C is equal to 25. | ||
| 54501 | CP 25 | |||
| 54503 | JP Z,54599 | |||
| 54506 | CP 13 | Jump to 54599 if C is equal to 13. | ||
| 54508 | JP Z,54599 | |||
| 54511 | LD A,B | Jump to 54599 if B is equal to 17. | ||
| 54512 | CP 17 | |||
| 54514 | JP Z,54599 | |||
| 54517 | CP 5 | Jump to 54599 if B is equal to 5. | ||
| 54519 | JP Z,54599 | |||
| 54522 | LD A,C | Jump to 54540 if C is not equal to *IX+0. | ||
| 54523 | CP (IX+0) | |||
| 54526 | JR NZ,54540 | |||
| 54528 | LD A,B | Jump to 54540 if B is not equal to *IX+1. | ||
| 54529 | CP (IX+1) | |||
| 54532 | JR NZ,54540 | |||
| 54534 | LD A,(IX+3) | Jump to 54540 if *IX+3 is equal to D. | ||
| 54537 | CP D | |||
| 54538 | JR Z,54540 | |||
| 54540 | LD (IX+0),C | Write C to *IX+0. | ||
| 54543 | LD (IX+1),B | Write B to *IX+1. | ||
| 54546 | LD (IX+2),E | Write E to *IX+2. | ||
| 54549 | LD (IX+3),D | Write D to *IX+3. | ||
| 54552 | PUSH DE | Stash DE on the stack. | ||
| 54553 | CALL Handler_SeaCreatureAnimation | Call Handler_SeaCreatureAnimation. | ||
| 54556 | POP DE | Restore DE from the stack. | ||
| 54557 | LD (IX+2),E | Write E to *IX+2. | ||
| 54560 | LD (IX+3),D | Write D to *IX+3. | ||
| 54563 | LD HL,37708 | Does nothing, this is immediately overwritten on the next line. | ||
| 54566 | LD HL,40684 | Write 40684 (Graphics_GoldfishGamePlayer) to *CHARS. | ||
| 54569 | LD (23606),HL | |||
| 54572 | CALL 54855 | Call 54855. | ||
| 54575 | LD A,(IX+0) | Write *IX+0 to *IX+13. | ||
| 54578 | LD (IX+13),A | |||
| 54581 | LD A,(IX+1) | Write *IX+1 to *IX+14. | ||
| 54584 | LD (IX+14),A | |||
| 54587 | LD A,(IX+3) | Write *IX+3 to *IX+15. | ||
| 54590 | LD (IX+15),A | |||
| 54593 | LD A,(IX+2) | Write *IX+2 to *IX+11. | ||
| 54596 | LD (IX+11),A | |||
| 54599 | LD (IX+4),0 | Write 0 to *IX+4. | ||
| 54603 | LD (IX+5),0 | Write 0 to *IX+5. | ||
| 54607 | RET | Return. | ||
| Prev: 54472 | Up: Map | Next: 54608 |