Can someone tell me what this does on the PIC16F84?

CALL  macro k
  dw  2000h or ((k - __zero) shr 1)
endm

Thanks