Prev: 61668 Up: Map Next: 61796
61733: Reveal Ladder
Used by the routine at Handler_Events.
Event 27: reveal the first ladder.
Event_RevealLadder 61733 LD IX,(25640) IX=*ReferenceLadders.
61737 BIT 7,(IX+0) Return if this ladder is already visible.
61741 RET Z
61742 RES 7,(IX+0) Clear bit 7 of the ladder record.
61746 LD BC,8711 Write 8711 to *SoundFlags.
61749 LD (25714),BC
61753 LD C,(IX+0) Fetch the column, row and colour; glyph 217.
61756 LD B,(IX+1)
61759 LD L,(IX+2)
61762 LD A,217
61764 LD DE,1282
61767 LD IX,25739 IX=CarriedObject.
61771 CALL JumpTable_SpawnEntity Call JumpTable_SpawnEntity.
61774 CALL Copy_ActorDestination Call Copy_ActorDestination.
61777 LD A,(IX+1) Store the drop row five cells above the ladder.
61780 LD (IX+15),A
61783 SUB 5
61785 LD (IX+1),A
61788 LD (IX+17),A
61791 LD (IX+9),1
61795 RET Return.
Prev: 61668 Up: Map Next: 61796