; The function in the game is:
Function8e814: ; 8e814
	push hl
	push de
	push bc
	push af
	ld hl, wc300
	ld bc, $00c1
.loop
	ld [hl], $0
	inc hl
	dec bc
	ld a, c
	or b
	jr nz, .loop
	pop af
	pop bc
	pop de
	pop hl
	ret

; More efficient would be:
Function8e814_eff:
	push hl
	push bc
	push af
	ld hl, wc300
	ld c, $c1
	xor a
.loop
	ld [hli], a
	dec c
	jr nz, .loop
	pop af
	pop bc
	pop hl
	ret