This function encrypts the given `data' using the given encryption
`key'. If the the second argument is given as an integer, the
encryption is done with a random key.
EXAMPLE
string pw,login_pw;
/* crypt */
pw=crypt(pw,0);
/* check if login_pw is right */
if(crypt(login_pw,pw)==pw) ok();