TA的每日心情 | 奋斗 2016-9-19 12:34 |
---|
签到天数: 14 天 [LV.3]偶尔看看II
|
发表于 2010-7-5 16:54:46
|
显示全部楼层
//Public function gfpassexpand (ref string pspass) returns integer
integer i
integer vitemp
integer vicz
integer vinum
char vcbegin
char vcend
char vcfirst
char vcsecond
string vstemp
string vspass
vcbegin = left(pspass,1)
vcend = right(pspass,1)
vicz = asc(vcend) - asc(vcbegin)
pspass = mid(pspass,2)
pspass = left(pspass,len(pspass) - 1)
vinum = 0
FOR i = len(pspass) TO 1 STEP -2
vinum ++
IF mod(vinum,2) = 1 THEN //20
vcfirst = mid(pspass,i - 1,1)
vcsecond = mid(pspass,i,1)
ELSE //20
vcfirst = mid(pspass,i,1)
vcsecond = mid(pspass,i - 1,1)
END IF //20
vitemp = (asc(vcfirst) - asc(vcbegin)) * 26 + asc(vcsecond) - 97 - vicz
vstemp = char(vitemp)
vspass = vspass + vstemp
NEXT
return vspass |
|