Routines

63455: Make ANGELFACE find and hit HAYLEY


Used by table of A&P number 44

H 207 (ANGELFACE)

63455 111DD1 LD DE,53533 D=209 (HAYLEY), E=29
63458 1A LD A,(DE) Pick up byte 29 of HAYLEY's buffer
63459 0F RRCA
63460 381A JR C,63488
63462 1E04 LD E,4 Pick up the MSB of the address of the routine currently controlling HAYLEY
63464 1A LD A,(DE)
63465 FE64 CP 100 Is it the "Go to..." routine at 25700?
63467 2013 JR NZ,63488 Jump if not
63469 ED5B05D1 LD DE,(53509) Get coordinates of HAYLEY's destination in DE
63473 ED53E2E5 LD (58850),DE Place these directly into table of A&P number 44
63477 2E04 LD L,4 Pick up the MSB of the address of the routine currently controlling ANGELFACE
63479 7E LD A,(HL)
63480 FE64 CP 100 Is it the "Go to..." routine at 25700?
63482 2004 JR NZ,63488 Jump if not
63484 ED5305CF LD (52997),DE Copy HAYLEY's destination into bytes 5 and 6 of ANGELFACE's buffer (i.e. make it his destination too)
63488 C3F277 JP 30706