Changes
jr c,ide48b1 ;2
pop af ;3
or #0f ;2
ld c,a ;1
push bc ;4
ld bc,ideprtsdh ;3
out (c),a ;4 write SDH Register (low bytes)
dec c ;1
ld bc,ideprtsdh ;3
pop de ;3
out (c),e ;4 write SDH Register (high bytes)
dec c ;1