GetKeyAnyFast:
	ld	hl, mpKeyRange + (keyModeAny << 8)
	ld	(hl), h
	ld	l, keyIntStat
	xor	a, a
	ld	(hl), 1 << 2
_:	bit	2, (hl)
	jr	z, -_
	ld	l, a
	ld	(hl), 2
_:	cp	a, (hl)
	jr	nz, -_
	ld	l, keyIntStat
_:	ld	(hl), 1 << 2
	bit	2, (hl)
	jr	nz, -_
	ret