>FUNCTION XORDATA(data,Key) > RETURN BITXOR(m.Data,REPLICATE(m.Key,CEILING(LEN(m.Data)/LEN(m.Key)))) >ENDFUNC >