Prev: 26428 Up: Map Next: 26506
26469: DROP action
Used by the routine at ACTION_AUTOD.
Input
DE pointer to object location
ACTION_DROP 26469 LD A,(DE) A=location of object
26470 CP 253 Is object worn?
26472 JR NZ,ACTION_DROP_0 If not, check if it is carried
26474 LD A,(23297) A=number of objects currently carried
26477 LD HL,27538 HL=adress of max objects
26480 CP (HL) Compare with max number of objects
26481 LD HL,24 "Hands full"
26484 JP NC,PRINT_MSG_DONE If hands full, display message
26487 JR ACTION_DROP_1
ACTION_DROP_0 26489 LD HL,28 "Not carried"
26492 CP 254 Is it carried?
26494 JP NZ,PRINT_MSG_DONE If not, display "Not carried" and exit
26497 DEC (IX+1) Decrement flag 1
This entry point is used by the routine at ACTION_DROP.
ACTION_DROP_1 26500 LD A,(23331) A = current location
26503 LD (DE),A Set object location to current location
26504 JR ACTION_CLEAR_0 Next action
Prev: 26428 Up: Map Next: 26506