Routines
31746: Print inventory
Used by routines at
23863,
23907,
30804,
62178 and
63586
31746 |
21EA7F |
LD HL,32746 |
31749 |
0E06 |
LD C,6 |
31751 |
2650 |
LD H,80 |
31753 |
0608 |
LD B,8 |
31755 |
3600 |
LD (HL),0 |
31757 |
24 |
INC H |
31758 |
10FB |
DJNZ 31755 |
31760 |
2C |
INC L |
31761 |
0D |
DEC C |
31762 |
20F3 |
JR NZ,31751 |
31764 |
11EA50 |
LD DE,20714 |
31767 |
01E898 |
LD BC,39144 |
31770 |
21EB7F |
LD HL,32747 |
31773 |
3E06 |
LD A,6 |
31775 |
CB46 |
BIT 0,(HL) |
31777 |
C4647C |
CALL NZ,31844 |
31780 |
04 |
INC B |
31781 |
3E07 |
LD A,7 |
31783 |
CB4E |
BIT 1,(HL) |
31785 |
C4647C |
CALL NZ,31844 |
31788 |
3E04 |
LD A,4 |
31790 |
04 |
INC B |
31791 |
CB56 |
BIT 2,(HL) |
31793 |
C4647C |
CALL NZ,31844 |
31796 |
04 |
INC B |
31797 |
CB5E |
BIT 3,(HL) |
31799 |
2812 |
JR Z,31819 |
31801 |
3E05 |
LD A,5 |
31803 |
CB66 |
BIT 4,(HL) |
31805 |
2802 |
JR Z,31809 |
31807 |
3E43 |
LD A,67 |
31809 |
F5 |
PUSH AF |
31810 |
CD647C |
CALL 31844 |
31813 |
F1 |
POP AF |
31814 |
04 |
INC B |
31815 |
CD647C |
CALL 31844 |
31818 |
05 |
DEC B |
31819 |
04 |
INC B |
31820 |
04 |
INC B |
31821 |
3E07 |
LD A,7 |
31823 |
CB6E |
BIT 5,(HL) |
31825 |
200A |
JR NZ,31837 |
31827 |
04 |
INC B |
31828 |
CB76 |
BIT 6,(HL) |
31830 |
2005 |
JR NZ,31837 |
31832 |
CB7E |
BIT 7,(HL) |
31834 |
2804 |
JR Z,31840 |
31836 |
04 |
INC B |
31837 |
CD647C |
CALL 31844 |
31840 |
26D2 |
LD H,210 |
31842 |
C9 |
RET |