FindMewInParty

FindPokemonInParty:
    ld b, a
    ld hl, PartyCount
    ld a, [hli]
    and a
    jr z, .done
    ld c, a
.loop
    ld a, [hli]
    cp b
    jr z, .found
    dec c
    jr nz, .loop
.done
    xor a
    ret

.found
    ld a, [PartyCount]
    sub c
    scf
    ret

FindMewInParty:
    ld a, MEW
    call FindPokemonInParty
    ret