Prev: 9265 Up: Map Next: 93DD
929C: See if the player has collided with a duckling
Used by the routines at 911E and 9265.
929C PUSH BC
929D PUSH DE
929E PUSH AF
929F PUSH HL
92A0 EX DE,HL
92A1 LD HL,$72D8
92A4 LD A,E
92A5 ADD A,$05
92A7 CP (HL)
92A8 JR C,$92C2
92AA SUB $0D
92AC JR NC,$92AF
92AE XOR A
92AF CP (HL)
92B0 JR NC,$92C2
92B2 INC HL
92B3 LD A,D
92B4 CP (HL)
92B5 JR NC,$92C2
92B7 ADD A,$1C
92B9 CP (HL)
92BA JR C,$92C2
92BC LD B,$06
92BE POP HL
92BF DJNZ $92BE
92C1 RET
92C2 POP HL
92C3 POP AF
92C4 PUSH AF
92C5 PUSH HL
92C6 AND A
92C7 JP Z,$935F
92CA LD IXh,A
92CC CP $04
92CE JR NZ,$92D1
92D0 DEC A
92D1 EX DE,HL
92D2 CP $07
92D4 JR NC,$92E7
92D6 CP $03
92D8 JR NZ,$92E1
92DA BIT 2,D
92DC JR Z,$92E7
92DE INC A
92DF JR $92E7
92E1 BIT 2,E
92E3 JR Z,$92E7
92E5 ADD A,$04
92E7 LD B,$00
92E9 LD C,A
92EA SLA C
92EC SLA C
92EE SLA C
92F0 SLA C
92F2 SLA C
92F4 RL B
92F6 LD HL,$900E
92F9 ADD HL,BC
92FA EX DE,HL
92FB LD C,$02
92FD LD A,L
92FE CP $F9
9300 JR C,$9303
9302 DEC C
9303 CALL $9404
9306 LD B,$10
9308 LD A,(DE)
9309 DEC C
930A JR Z,$9317
930C INC DE
930D OR (HL)
930E LD (HL),A
930F INC HL
9310 LD A,(DE)
9311 OR (HL)
9312 DEC DE
9313 DEC DE
9314 DEC DE
9315 LD (HL),A
9316 DEC HL
9317 INC C
9318 DEC H
9319 LD A,H
931A AND $07
931C CP $07
931E JR NZ,$932E
9320 LD A,H
9321 ADD A,$08
9323 LD H,A
9324 LD A,L
9325 SUB $20
9327 LD L,A
9328 JR NC,$932E
932A LD A,H
932B SUB $08
932D LD H,A
932E DJNZ $9308
9330 POP HL
9331 PUSH HL
9332 LD D,$02
9334 LD A,IXh
9336 CP $07
9338 JR NC,$933F
933A BIT 2,L
933C JR NZ,$933F
933E DEC D
933F LD E,$03
9341 BIT 2,H
9343 JR NZ,$9346
9345 DEC E
9346 CALL $93DD
9349 LD B,D
934A PUSH HL
934B LD (HL),$05
934D INC HL
934E DJNZ $934B
9350 POP HL
9351 LD BC,$0020
9354 AND A
9355 SBC HL,BC
9357 DEC E
9358 JR NZ,$9349
935A POP HL
935B POP AF
935C POP DE
935D POP BC
935E RET
935F LD IXl,$02
9362 LD A,L
9363 CP $F8
9365 JR C,$9369
9367 DEC IXl
9369 LD A,H
936A AND $F8
936C LD H,A
936D CALL $9404
9370 EX DE,HL
9371 POP HL
9372 PUSH HL
9373 CALL $93FE
9376 PUSH HL
9377 POP BC
9378 POP HL
9379 PUSH HL
937A CALL $93DD
937D LD IXh,$03
9380 PUSH IX
9382 PUSH HL
9383 PUSH BC
9384 PUSH DE
9385 PUSH HL
9386 LD A,(BC)
9387 ADD A,$4F
9389 LD H,$98
938B LD L,A
938C LD A,(HL)
938D POP HL
938E LD (HL),A
938F PUSH HL
9390 PUSH BC
9391 LD A,(BC)
9392 SLA A
9394 SLA A
9396 SLA A
9398 LD HL,$84F7
939B LD B,$00
939D LD C,A
939E ADD HL,BC
939F PUSH DE
93A0 LD B,$08
93A2 LD A,(HL)
93A3 LD (DE),A
93A4 DEC D
93A5 DEC HL
93A6 DJNZ $93A2
93A8 POP DE
93A9 INC DE
93AA POP BC
93AB INC BC
93AC POP HL
93AD INC HL
93AE DEC IXl
93B0 JR NZ,$9385
93B2 POP DE
93B3 POP BC
93B4 POP HL
93B5 LD A,E
93B6 SUB $20
93B8 LD E,A
93B9 JR NC,$93BF
93BB LD A,D
93BC SUB $08
93BE LD D,A
93BF PUSH DE
93C0 LD DE,$0020
93C3 AND A
93C4 SBC HL,DE
93C6 PUSH HL
93C7 PUSH BC
93C8 POP HL
93C9 ADD HL,DE
93CA PUSH HL
93CB POP BC
93CC POP HL
93CD POP DE
93CE POP IX
93D0 DEC IXh
93D2 JR NZ,$9380
93D4 POP HL
93D5 POP AF
93D6 POP DE
93D7 POP BC
93D8 LD IX,$72D8
93DC RET
Prev: 9265 Up: Map Next: 93DD