[COD] Hash string (secure)

/*
 *  Created by Bruno da Silva
 *  www.ips-team.blogspot.com
*/


hashString(buffer[])
{
    new valueHash = 1;
    for(new x = 1; buffer[x]; ++x) {
        valueHash += (buffer[x] * 65535)  - (buffer[x - 1]);
    }
    return ~(((valueHash * buffer[0]) >>> strlen(buffer)) % cellmax);
}