|
Routines |
| Prev: 64355 | Up: Map | Next: 64399 |
|
Carry out the "Pour" command.
|
||||
| Action_Pour | 64359 | CALL ParserValidateNoDirectObject | Call ParserValidateNoDirectObject to check that the command has no object, and return if it does not. | |
| 64362 | RET C | |||
| 64363 | LD A,(44749) | Read the current room into A. | ||
| 64366 | LD HL,64399 | See whether this room is one Pour carries to the cottage. | ||
| 64369 | LD BC,3 | |||
| 64372 | CPIR | |||
| 64374 | JR NZ,Action_Pour_Next | Try to return when this room is not one of the three. | ||
| 64376 | LD (44665),A | Store A in *Room_PourReturn. | ||
| 64379 | LD A,2 | Take the player inside the ruined cottage. | ||
| 64381 | JR Action_Pour_ChangeRoom | |||
| Action_Pour_Next | 64383 | CP 2 | Branch to Messaging_NothingHappens_Reply when the exit is east. | |
| 64385 | JP NZ,Messaging_NothingHappens_Reply | |||
| 64388 | LD A,(44665) | Read *Room_PourReturn into A. | ||
| 64391 | AND A | Do nothing when Pour has nowhere to return. | ||
| 64392 | JP Z,Messaging_NothingHappens_Reply | |||
| Action_Pour_ChangeRoom | 64395 | CALL Handler_ChangeRoom | Call Handler_ChangeRoom to change room. | |
| 64398 | RET | Return. | ||
| Prev: 64355 | Up: Map | Next: 64399 |