EE8F: Check for food pickup by Wally.
| Food_CheckPickup |
EE8F |
LD HL,(Food_ActivePtr) |
|
EE92 |
LD A,(Wally_RoomNo) |
|
EE95 |
CP (HL) |
|
EE96 |
JR Z,Food_CheckPickup_0 |
|
EE98 |
LD DE,$0016 |
|
EE9B |
ADD HL,DE |
|
EE9C |
CP (HL) |
|
EE9D |
RET NZ |
| Food_CheckPickup_0 |
EE9E |
INC HL |
|
EE9F |
LD A,(Wally_X) |
|
EEA2 |
SUB (HL) |
|
EEA3 |
SUB $01 |
|
EEA5 |
CP $FE |
|
EEA7 |
RET C |
|
EEA8 |
LD A,(Wally_Y) |
|
EEAB |
CP $98 |
|
EEAD |
RET NZ |
|
EEAE |
LD E,(HL) |
|
EEAF |
INC HL |
|
EEB0 |
LD D,$A8 |
|
EEB2 |
LD (BitmapX),DE |
|
EEB6 |
LD A,(HL) |
|
EEB7 |
CALL Bitmap16Draw |
|
EEBA |
LD HL,(Food_ActivePtr) |
|
EEBD |
INC HL |
|
EEBE |
INC HL |
|
EEBF |
INC HL |
|
EEC0 |
LD A,(HL) |
|
EEC1 |
CP $FF |
|
EEC3 |
JR NZ,Food_CheckPickup_1 |
|
EEC5 |
LD HL,Food_Table |
| Food_CheckPickup_1 |
EEC8 |
LD (Food_ActivePtr),HL |
|
EECB |
LD B,$0A |
|
EECD |
CALL Wally_EnergyIncBy |
|
EED0 |
LD BC,$643C |
|
EED3 |
LD DE,$0128 |
|
EED6 |
LD HL,$0103 |
|
EED9 |
CALL Beep_Effect |
|
EEDC |
RET |