|
Routines |
| Prev: 93DA | Up: Map | Next: 9428 |
|
Not if it is shut ("the ... is closed.") or has nothing in it ("the ... is empty."); otherwise EMPTY_OUT, and it is no longer full.
|
||||
| DO_EMPTY | 9404 | LD IX,(TARGET_RECORD) | ||
| 9408 | CALL IS_SHUT | |||
| 940B | JP Z,SAY_STATE | |||
| 940E | LD A,(TARGET) | |||
| 9411 | CALL COUNT_HELD | |||
| 9414 | CP $00 | |||
| 9416 | JR Z,DO_EMPTY_0 | |||
| 9418 | CALL FOR_REAL | |||
| 941B | CALL EMPTY_FIRST | |||
| 941E | RES 2,(IX+$07) | |||
| 9422 | RET | |||
| DO_EMPTY_0 | 9423 | LD A,$02 | ||
| 9425 | JP SAY_STATE | |||
| Prev: 93DA | Up: Map | Next: 9428 |