Prev: 98EC Up: Map Next: 9945
9918: Draw shield power
Used by the routines at 98EC, 9D68, A0F8 and A939.
9918 LD A,($A1E6) Set A to shield power
991B LD L,A Copy shield power to HL
991C LD H,$00
991E CALL $A5AA Convert shield power to charcode digits
9921 LD E,$15 Draw shield power into display file
9923 LD L,$00
9925 LD B,$02
9927 CALL $A570
992A LD A,($A1E6) Computes color attribute of digits based on shield power Color attribute is bit6-4 of shield power + 1
992D SRL A
992F SRL A
9931 SRL A
9933 SRL A
9935 AND $07
9937 INC A
9938 LD ($5815),A Set color attribute into attribute file
993B LD ($5814),A
993E LD ($E514),A Set color attribute into attribute buffer for HUD
9941 LD ($E513),A
9944 RET
Prev: 98EC Up: Map Next: 9945