Changes
/* Key redefinition library */
GetPressed
push HL
ld C,10.loop_col
ld B,8
ld A,(HL++).loop_bit rla jr nc,.pressed
djnz .loop_bit
dec C
.loop
rra ;get bit in carry
djnz .loop
ccf ;reverse bit
pop HL