Prev: 986F Up: Map Next: 9968
9880: Routine at 9880
9880 LD D,(HL)
9881 CP L
9882 AND A
9883 JR NZ,$98C4
9885 LD DE,Terminal_Buffer
9888 LD A,(IX+$04)
988B LD B,A
988C RRCA
988D RRCA
988E RRCA
988F RRCA
9890 AND $0F
9892 ADD A,$30
9894 LD (DE),A
9895 INC DE
9896 LD A,B
9897 AND $0F
9899 ADD A,$30
989B LD (DE),A
989C INC DE
989D LD HL,Str_seconds
98A0 LD BC,$0009
98A3 LDIR
98A5 PUSH DE
98A6 LD E,(IX+$05)
98A9 LD HL,$73AC
98AC LD A,$5E
98AE LD BC,$0000
98B1 CPIR
98B3 DEC E
98B4 JR NZ,$98B1
98B6 POP DE
98B7 LD A,(HL)
98B8 LDI
98BA CP $5E
98BC JR NZ,$98B7
98BE LD HL,Terminal_Buffer
98C1 CALL Message_ClearIfNoPlans
98C4 LD HL,_bd90
98C7 LD A,(HL)
98C8 CP $28
98CA JR NC,$98CE
98CC INC (HL)
98CD RET
98CE JR NZ,$98E4
98D0 LD (HL),$FE
98D2 LD A,(IX+$04)
98D5 ADD A,$01
98D7 DAA
98D8 LD L,A
98D9 LD H,$00
98DB LD (Plans_CountDownTime),HL
98DE LD A,($5C78)
98E1 LD (Plans_CountDownFrames),A
98E4 LD HL,(Plans_CountDownTime)
98E7 LD A,L
98E8 OR H
98E9 JR NZ,$992F
98EB LD A,$FF
98ED LD (_bd90),A
98F0 CALL _939a_58
98F3 LD E,(IX+$06)
98F6 LD HL,$73AC
98F9 LD A,$5E
98FB LD BC,$0000
98FE CPIR
9900 DEC E
9901 JR NZ,$98FE
9903 LD DE,Terminal_Buffer
9906 CP (HL)
9907 JR Z,$990D
9909 LDI
990B JR $9906
990D PUSH DE
990E LD A,(IX+$03)
9911 CALL Obj_CarriedSearch
9914 POP DE
9915 LD HL,Str_NoEffect
9918 JR Z,$9922
991A LD A,$01
991C LD (Stat_ResetGame),A
991F LD HL,Str_IntruderIliminated
9922 LD A,(HL)
9923 LDI
9925 CP $5E
9927 JR NZ,$9922
9929 LD HL,Terminal_Buffer
992C JP Message_ClearIfNoPlans
992F BIT 7,(IX+$03)
9933 RET Z
9934 LD A,($BD1D)
9937 CP (IX+$03)
993A RET NZ
993B LD HL,$0000
993E LD (Plans_CountDownTime),HL
9941 LD HL,Str_BombDeactivated
9944 CALL Message_ClearIfNoPlans
This entry point is used by the routine at 986F.
9947 LD A,$FF
9949 LD (_bd90),A
994C RET
994D DEC BC
994E INC D
994F EX AF,AF'
9950 DEC B
9951 LD BC,$0102
9954 INC B
9955 LD BC,$0B06
9958 INC D
9959 LD E,E
995A LD E,E
995B LD E,E
995C LD E,C
995D LD E,C
995E LD E,C
995F LD E,H
9960 LD E,H
9961 LD E,H
9962 LD E,C
9963 LD E,C
9964 LD (HL),C
9965 LD (HL),A
9966 LD H,C
9967 LD (HL),E
Prev: 986F Up: Map Next: 9968