Changes
/* Complete keyboard scanning routine */
out (c),c ;4
ld a,#40 ;2
ld c,#4a d ;2 431 (+42)
loop ld b,d ;1
out (c),a ;4 select line
ini ;5 read bits and write into KEYMAP
inc a ;1
ld bc,#f782 ;3
out (c),c ;4
ei ;1 (+8 =210 209 microseconds)
ret
</pre>
