|
Routines |
| Prev: 48388 | Up: Map | Next: 48487 |
| 48417 | LD A,(34220) | If Berk has no current power... | ||
| 48420 | OR A | ... | ||
| 48421 | RET Z | ...then return | ||
| 48422 | PUSH IX | Store IX | ||
| 48424 | CP 6 | If Berk's current power is not 6 (flying, level 3, 2)... | ||
| 48426 | JR NZ,48445 | ...then skip ahead to 48445 | ||
| 48428 | LD A,13 | Reset complex state data for red coloured creature to that stored in initial-state table... | ||
| 48430 | CALL 53987 | ... | ||
| 48433 | LD A,14 | Reset complex state data for yellow coloured creature to that stored in initial-state table... | ||
| 48435 | CALL 53987 | ... | ||
| 48438 | LD A,15 | Reset complex state data for white coloured creature to that stored in initial-state table... | ||
| 48440 | CALL 53987 | ... | ||
| 48443 | JR 48474 | Skip ahead to 48474 | ||
| 48445 | CP 10 | If Berk's current power is not 10 (floating)... | ||
| 48447 | JR NZ,48474 | ...then skip ahead to 48474 | ||
| 48449 | LD IX,(34240) | Load IX with address of current level's complex state data for Berk | ||
| 48453 | RES 7,(IX+9) | Reset Berk's moving-upwards flag | ||
| 48457 | LD (IX+11),192 | Reset Berk's walking-right, walking-left, unused-(11,2), unused-(11,3), impassable-leftwards and impassable-rightwards flags and set his interaction-(11,6) and interaction-(11,7) flags | ||
| 48461 | RES 7,(IX+8) | Reset bit 7 of Berk's class value (change from 159 to 31) | ||
| 48465 | DEC (IX+6) | Decrease Berk's bottom y-coordinate by two... | ||
| 48468 | DEC (IX+6) | ... | ||
| 48471 | CALL 55516 | Set Berk's can-fall flag and set his initial velocity factor to 2 | ||
| 48474 | LD A,(34220) | Reset complex state data for entity responsible for Berk's current power to that stored in initial-state table... | ||
| 48477 | CALL 53987 | ... | ||
| 48480 | XOR A | Clear Berk's current power... | ||
| 48481 | LD (34220),A | ... | ||
| 48484 | POP IX | Restore IX | ||
| 48486 | RET | Return | ||
| Prev: 48388 | Up: Map | Next: 48487 |