-replace restart {
- ld %1,%1
+replace {
+ ld (hl),a
+ dec hl
} by {
- ; Removed redundent load
+ ld (hl-),a
}
-replace restart {
- xor a,a
- or a,%1
- or a,a
- jp %2,%3
+replace {
+ ld (hl),a
+ inc hl
} by {
- ; Removed redundent or a,a
- xor a,a
- or a,%1
- jp %2,%3
+ ld (hl+),a
}
-replace restart {
- cp a,#0x00
- jp nz,%1
+replace {
+ ld a,(hl)
+ inc hl
} by {
- ; Rule 3
- or a,a
- jp nz,%1
+ ld a,(hl+)
}
-replace restart {
- jp nz,%1
- jp %2
-%1:
- jp %3
-%2:
+replace {
+ ld a,[hl]
+ inc hl
} by {
- ; Rule 4
- jp z,%2
-%1:
- jp %3
-%2:
+ ld a,[hl+]
}
-replace restart {
- jp nz,%1
- jp %2
-%1:
+replace {
+ ld a,[hl]
+ inc hl
} by {
- ; Rule 5
- jp z,%2
-%1:
+ ld a,[hl+]
}
-replace restart {
- jp z,%1
- jp %2
-%1:
+replace {
+ ld [hl],a
+ inc hl
} by {
- ; Rule 6
- jp nz,%2
-%1:
+ ld [hl+],a
}
-replace restart {
-%1:
- jp %2
- jp %3
+replace {
+ ld [hl],a
+ dec hl
} by {
- ; Weird Rule 7
-%1:
- jp %2
+ ld [hl-],a
}
-replace restart {
- ld (hl),a
+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 restart {
- ld a,(hl)
- inc hl
+replace {
+ ld (hl),a
+ ld %1,(hl)
} by {
- ld a,(hl+)
+ ld (hl),a
+ ld %1,a
}