putMaskedSprite

plotMaskedSprite:
    ld  bc,plotSScreen
putMaskedSprite:
    cp  64      ; a = y
    ret nc      ; e = x
    ld  d,a     ; bc = buffer
    add a,a     ; ix = sprite
    add a,d
    ld  l,a
    ld  a,e
    cp  12
    ret nc
    ld  h,0
    ld  a,d
    ld  d,h
    add hl,hl
    add hl,hl
    add hl,de
    add hl,bc
    ld  b,8
    sub 57
    jr  c,putMaskedSpriteClipDone
    cpl
    add a,b
    ld  b,a
putMaskedSpriteClipDone:
    ld  e,12
putMaskedSpriteLoop:
    ld  a,(ix+0)
    ld  c,a
    xor (ix+8)
    cpl
    and (hl)
    or  c
    ld  (hl),a
    add hl,de
    inc ix
    djnz    putMaskedSpriteLoop
    ret