![]() |
Routines |
Prev: 28665 | Up: Map | Next: 28713 |
|
||||
28672 | LD L,98 | Byte 98 of BOY WANDER's buffer holds his x-coordinate | ||
28674 | LD A,(HL) | Pick this up in A | ||
28675 | AND 3 | Is BOY WANDER's x-coordinate divisible by 4? | ||
28677 | RET NZ | Return if not | ||
28678 | LD L,96 | Byte 96 holds BOY WANDER's animatory state | ||
28680 | BIT 0,(HL) | Is BOY WANDER midstride? | ||
28682 | RET NZ | Return if so | ||
28683 | LD L,112 | Return if there is already an uninterruptible subcommand routine address in bytes 111 and 112 of BOY WANDER's buffer (he's otherwise occupied) | ||
28685 | LD A,(HL) | |||
28686 | AND A | |||
28687 | RET NZ | |||
28688 | CALL 24993 | A=random number | ||
28691 | RRCA | Return half the time | ||
28692 | RET NC | |||
28693 | LD L,97 | Byte 97 holds BOY WANDER's y-coordinate | ||
28695 | LD A,(HL) | Pick this up in A | ||
28696 | CALL 26185 | Is BOY WANDER on a staircase? | ||
28699 | RET NZ | Return if so | ||
28700 | CALL 28220 | Are there any teachers around who can see BOY WANDER? | ||
28703 | RET C | Return if so | ||
28704 | LD A,(43618) | Pick up the x-coordinate of BOY WANDER's pellet in A | ||
28707 | RLCA | Is BOY WANDER's catapult pellet airborne at the moment? | ||
28708 | RET NC | Return if so | ||
28709 | LD L,111 | |||
28711 | JR 28665 | Make BOY WANDER fire his catapult |
Prev: 28665 | Up: Map | Next: 28713 |