![]() |
Routines |
| Prev: A5E2 | Up: Map | Next: A640 |
|
Two turns after it is started, whatever is in the barrel goes to location 34, the long lake -- the player too, who is told so and arrives there. Then the barrel itself is put back in location 32, the elvenking's cellar, closed and full, emptied with printing off so that what spills is not reported, and given back its wine: it is ready for another ride. Tried in the simulator with the player in the barrel at the forest river and the timer at 2: two WAITs later the player was on the long lake's bank, held by nothing, and the barrel was in the cellar with the wine in it.
|
||||
| BARREL_REACHES_LAKE | A5FB | SUB A | Clear TIMER_FIRED: this does not count as the turn's firing | |
| A5FC | LD (TIMER_FIRED),A | |||
| A5FF | LD A,(PLAYER_HOLDER) | In the barrel ($13)? "you are thrown onto the bank of the long lake." | ||
| A602 | CP $13 | |||
| A604 | LD HL,MSG_YOU_ARE_THROWN_ONTO | |||
| A607 | CALL Z,RUN_MESSAGE_HL | |||
| A60A | LD A,$22 | The barrel at location 34 for the moment... | ||
| A60C | LD (BARREL_WHERE),A | |||
| A60F | LD B,A | ...so that everything in it goes there | ||
| A610 | LD A,$13 | |||
| A612 | CALL MOVE_CONTENTS | |||
| A615 | LD IX,BARREL | Then the barrel back to location 32, the cellar: closed (flag bit 5 off) and full (bit 2 on) | ||
| A619 | LD (IX+$10),$20 | |||
| A61D | RES 5,(IX+$07) | |||
| A621 | SET 2,(IX+$07) | |||
| A625 | SUB A | Empty it with printing off | ||
| A626 | LD (PRINTING_ON),A | |||
| A629 | LD A,$13 | |||
| A62B | CALL EMPTY_OUT | |||
| A62E | LD A,$01 | |||
| A630 | LD (PRINTING_ON),A | |||
| A633 | LD IY,WINE | The wine: back in location 32, held by the barrel | ||
| A637 | LD (IY+$10),$20 | |||
| A63B | LD (IY+$01),$13 | |||
| A63F | RET | |||
| Prev: A5E2 | Up: Map | Next: A640 |