Routines
Prev: 58651 Up: Map Next: 58736
58710: Release Sabreman
Used by the routine at Handle_Carrying_Eagle.
Makes the eagle let go of Sabreman. Bit 6 of the redraw flags of Sabreman is set, and when Handle_Carried_Sabreman sees that bit it makes him tumble.
If bit 7 of the redraw flags of Sabreman is set (he has been hit while he was being carried) bit 7 is reset and the eagle is destroyed (see Destroy_Creature). Otherwise the eagle becomes the type 48 and flies away upwards, with a y velocity of 240.
The handler of the eagle also comes here when Sabreman is not being carried.
Input
IX Object record of the eagle
Release_Sabreman 58710 LD A,(36649) Fetch the redraw flags of Sabreman.
58713 OR %01000000 Set bit 6.
58715 BIT 7,A Test bit 7.
58717 RES 7,A Reset bit 7.
58719 LD (36649),A Store the redraw flags of Sabreman.
58722 JP NZ,Destroy_Creature Jump to Destroy_Creature to destroy the eagle if bit 7 was set.
58725 LD (IX+0),48 Change the eagle into a flying eagle.
58729 LD (IX+9),240 Set the y velocity to 240.
58733 JP Update_Object_Sprite Jump to Update_Object_Sprite.
Prev: 58651 Up: Map Next: 58736