Изменения небольшие:
Команды типа
ld a,(hl)
and d ; вырезаем по маске
ld (hl),a

Заменяем на
ld l,l ; записываем маску
ld (hl),d