我对密码没有什么研究,只是听说有单向检测的密码函数,我就从字面上的解释去试试凭空想一个出来了.
1. 用键盘输入一串密码
2. 利用它的ASC码做运算
3. 利用ASC码乘上一个质数来计算一个值作为保存

初步的试算是:比如密码 "ABC"
储存一个密码值= A*2 + B*5 + C*7 +......

检查密码的时候依此计算与密码值比较是否相符.
但具体如何降低巧合的机率,还需要进一步的优化

input "请输入密码:",a$
m&=1
n$="  2  3  5  7  13 17 19 23 29 31 37 39 41 ......"
for i%=1 to len(a$)
   m&=m&+asc(mid$(a$,i%,1)*val(mid$(n$,i*3,3))
next
密码值=m&

评论