Routines

25188: Copy two bytes from table of A&P into character's buffer


Used by several routines

H Character number (183-214)
L Destination for copied bytes

25188 D5 PUSH DE
25189 E5 PUSH HL
25190 2E19 LD L,25 Collect into DE the address of the point reached in the table of A&P (stored in bytes 25 and 26 of the character's buffer)
25192 5E LD E,(HL)
25193 2C INC L
25194 56 LD D,(HL)
25195 E1 POP HL
25196 1A LD A,(DE) Collect the first byte from the table of A&P
25197 13 INC DE
25198 77 LD (HL),A Copy it to the character's buffer
25199 2C INC L
25200 1A LD A,(DE) Collect the second byte from the table of A&P
25201 13 INC DE
25202 77 LD (HL),A Copy it to the character's buffer
25203 2D DEC L
25204 7D LD A,L Save L temporarily
25205 2E19 LD L,25 Update the address reached in the table of A&P (stored in bytes 25 and 26 of the character's buffer)
25207 73 LD (HL),E
25208 2C INC L
25209 72 LD (HL),D
25210 D1 POP DE
25211 6F LD L,A Restore L
25212 C9 RET