Prev: D82D Up: Map Next: D8DE
D887: routine84
routine84 D887 LD A,$04
D889 LD (unknown11),A
D88C LD A,(computer_player_flag)
D88F OR A
D890 JR NZ,routine84_0
D892 CALL routine13
D895 RET
routine84_0 D896 LD A,$09
D898 LD (unknown18),A
D89B LD HL,(D_ADD)
D89E LD (TEMADD),HL
D8A1 CALL EN_AN
D8A4 LD HL,(TEMADD)
D8A7 LD (D_ADD),HL
D8AA LD HL,INBUF
D8AD LD (BUFPNT),HL
D8B0 LD A,(SRTCNT)
D8B3 INC A
D8B4 CALL SORT
routine84_1 D8B7 CALL GETPLA
D8BA CP $FF
D8BC JR NZ,routine84_2
D8BE LD A,$00
D8C0 LD (unknown10),A
D8C3 RET
routine84_2 D8C4 LD D,$00
D8C6 LD E,A
D8C7 LD HL,map_object_table
D8CA ADD HL,DE
D8CB LD (object_table_entry_pointer),HL
D8CE LD (AIM),HL
D8D1 LD A,(HL)
D8D2 CP $1E
D8D4 JP P,routine18_0
D8D7 CP $13
D8D9 JP M,routine18_0
D8DC JR routine84_1
Prev: D82D Up: Map Next: D8DE