shithub: pokecrystal

ref: 9b0002161be17ff7369a987a3de3c8776992d3a7
dir: /home/compare.asm/

View raw version 
CompareBytes::
; Compare c bytes at de and hl.
; Return z if they all match.
.loop
	ld a, [de]
	cp [hl]
	ret nz
	inc de
	inc hl
	dec c
	jr nz, .loop
	ret

CompareBytesLong::
; Compare bc bytes at de and hl.
; Return carry if they all match.
.loop
	ld a, [de]
	cp [hl]
	jr nz, .diff

	inc de
	inc hl
	dec bc

	ld a, b
	or c
	jr nz, .loop

	scf
	ret

.diff:
	and a
	ret