Prev: 26414 Up: Map Next: 26469
26428: GET action
Used by the routine at ACTION_AUTOG.
Input
DE pointer to object location
ACTION_GET 26428 LD HL,25 "However, he already had that!"
26431 LD A,(DE) A=object location
26432 CP 253 Is it worn or carried?
26434 JP NC,PRINT_MSG_DONE If so, print system message
26437 LD HL,26 "Object not here"
26440 CP (IX+35)
26443 JP NZ,PRINT_MSG_DONE
26446 LD HL,27 "Carrying too much"
This entry point is used by the routine at ACTION_REMOVE.
ACTION_GET_0 26449 LD A,(23297) A=current number of objects being carried
26452 PUSH HL
26453 LD HL,27538 Address of max number of objects
26456 CP (HL) Compare with max number of objects
26457 POP HL
26458 JP NC,PRINT_MSG_DONE If carrying too much, display message indicating so
26461 EX DE,HL
26462 LD (HL),254 Set object to carried
26464 INC (IX+1) Increment flag 1???
26467 JR ACTION_CLEAR_0 Process next action
Prev: 26414 Up: Map Next: 26469