为防止广告,目前nocow只有登录用户能够创建新页面。如要创建页面请先登录/注册(新用户需要等待1个小时才能正常使用该功能)。

BKDRHash

来自NOCOW
跳转到: 导航, 搜索

[编辑] Pascal

const seed=131;
function BKDRhash(str:string):longint;
var i:longint;
begin
  BKDRhash:=0;
  for i:=1 to length(str) do
    BKDRhash:=(BKDRhash*seed+ord(str[i]))and $FFFFFFF;   
end;

[编辑] C++

 
unsigned int BKDRHash(char *str)
 {
    unsigned int seed = 131; // 31 131 1313 13131 131313 etc..
    unsigned int hash = 0;
    while (*str)
    {
        hash = hash * seed + (*str++);
    }
    return (hash & 0x7FFFFFFF);
 }
个人工具