![]() |
Routines |
Prev: 60521 | Up: Map |
|
|||||||
60539 | CALL 60521 | Make a sound effect | |||||
60542 | LD H,230 | 230=Sam | |||||
60544 | CALL 60506 | Move Sam from the midstride or mid-action position and update the SRB | |||||
This entry point is used by the routines at 25789, 31476 and 64338.
|
|||||||
60547 | LD DE,32766 | 32766 holds X, the x-coordinate of the leftmost column of the play area on screen | |||||
60550 | LD L,1 | Point HL at byte 1 of Sam's buffer | |||||
60552 | LD A,(DE) | A=X | |||||
60553 | SUB (HL) | Subtract Sam's x-coordinate | |||||
60554 | JR Z,60560 | Jump if they are equal | |||||
60556 | CP 247 | Is Sam's x-coordinate >= X+10? | |||||
60558 | JR C,60572 | Jump if so (no need to scroll right) | |||||
60560 | LD A,(DE) | A=X | |||||
60561 | AND A | Is X=0? | |||||
60562 | JR Z,60587 | Jump if so (no need to scroll right) | |||||
60564 | CALL 60032 | Update the display | |||||
60567 | CALL 61838 | Cycle a character buffer group forwards and scroll the screen right | |||||
60570 | JR 60587 | ||||||
60572 | CP 235 | Is Sam's x-coordinate <= X+21? | |||||
60574 | JR NC,60587 | Jump if so (no need to scroll left) | |||||
60576 | LD A,(DE) | A=X | |||||
60577 | CP 224 | Is X=224? | |||||
60579 | JR Z,60587 | Jump if so (no need to scroll left) | |||||
60581 | CALL 60032 | Update the display | |||||
60584 | CALL 61882 | Cycle a character buffer group backwards and scroll the screen left | |||||
Now that any required horizontal scrolling has been done, it's time to check whether any vertical scrolling is required.
|
|||||||
60587 | LD DE,32767 | 32767 holds Y, the y-coordinate of the topmost row of the play area on screen | |||||
60590 | LD HL,58882 | Point HL at byte 2 of Sam's buffer | |||||
60593 | LD A,(DE) | A=Y-3 | |||||
60594 | SUB 3 | ||||||
60596 | SUB (HL) | Subtract Sam's y-coordinate | |||||
60597 | CP 252 | Is Sam's y-coordinate >= Y+2? | |||||
60599 | JR C,60611 | Jump if so (no need to scroll down) | |||||
60601 | LD A,(DE) | A=Y | |||||
60602 | CP 2 | Is Y=2? | |||||
60604 | RET Z | Return if so (no need to scroll down) | |||||
60605 | CALL 60032 | Update the display | |||||
60608 | JP 59575 | Scroll the screen down | |||||
60611 | CP 240 | Is Sam's y-coordinate <= Y+13? | |||||
60613 | RET NC | Return if so (no need to scroll up) | |||||
60614 | LD A,(DE) | A=Y | |||||
60615 | CP 20 | Is Y=20? | |||||
60617 | RET Z | Return if so (no need to scroll up) | |||||
60618 | CALL 60032 | Update the display | |||||
60621 | JP 59516 | Scroll the screen up |
Prev: 60521 | Up: Map |