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 |