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 |