Prev: 35735 Up: Map Next: 36036
36008: Make Berk eat the entity he is holding, if edible, and exit calling routine
Used by the routine at 35735.
36008 LD A,(34221) If Berk is not holding anything...
36011 OR A ...
36012 RET Z ...then return
36013 CP 12 If class value of entity held by Berk is greater than 12...
36015 RET NC ...then return
36016 POP BC Remove top value from stack (i.e. return address to routine that called this routine)
36017 CALL 48710 Move carried entity in front of Berk as he faces out of screen
36020 LD IY,(34260) Load IY with address of complex state data for entity held by Berk
36024 DEC (IY+4) Move entity up one character to level of Berk's mouth...
36027 DEC (IY+6) ...
36030 LD HL,35493 Point HL at script data for Berk eating an entity...
36033 JP 48098 ...and execute
Prev: 35735 Up: Map Next: 36036