+replace {
+ ld (hl+),a
+ ld (hl),d
+ dec hl
+ ld e,(hl)
+ inc hl
+ ld d,(hl)
+ ld a,(de)
+} by {
+ ld (hl+),a
+ ld (hl),d
+ ld e,a
+ ld a,(de)
+}
+replace {
+ ld (hl),a
+ ld %1,(hl)
+} by {
+ ld (hl),a
+ ld %1,a
+}
+replace {
+ ld (hl),a
+ inc de
+ ld a,(de)
+ inc hl
+} by {
+ ld (hl+),a
+ inc de
+ ld a,(de)
+}