求把这段代码 转为 aardio代码（字符串加密用）

winner

不会DELPHI,不知道有木有高手可以帮忙转一下aardio代码...
谢了..


下面是Delphi解密代码

XorKey:array[0..7] of Byte = ($A6,$B7,$23,$E7,$1C,$A3,$3C,$D1); //字符串加密用
function Dec2(Str:String):String;
var
  i, j:Integer;
begin
  Result := '';
  j := 0;
  for i := 1 to Length(Str) div 2 do
  begin
    Result := Result + Char(StrToInt('$'+Copy(Str,i*2-1,2)) xor XorKey[j]);
    j := (j + 1) mod 8;
  end;
end;

winner

自己搞定了...

Dec2 = function(code){
    xorkey = {0xa6;0xb7;0x23;0xe7;0x1c;0xa3;0x3c;0xd1}; //16进制解密Key数组
    str = ""
    j = 0;
    for(i=1;#code/2;1){
        code_16 = string.slice(code,i*2-1,i*2)            //获取16进制数据
        code_10 = tonumber('0x'++code_16);              //转为10进制
        key = xorkey[j+1]                               //加密key
        str_code = code_10^key                          //进行异或运算
        str += string.pack(str_code)
        j = (j+1) % 8
        //j = j+1   //aardio数组从下标1开始
        //console.log(i,j,j+1,code_16,code_10,xorkey[j+1],str_code)
    }
    return str;
}

不争

xorkey = {0xa6;0xb7;0x23;0xe7;0x1c;0xa3;0x3c;0xd1};
dec2 = function(code){
    var result,j = {},0;
    for(i=1;#code/2;1){
        table.push( result,tonumber(string.slice(code,i*2-1,i*2),16) ^ xorkey[j+1]  )
        j = (j+1) % 8
    }
    return string.pack(result) ;
}
  

不争

xorkey = { [0] = 0xa6;0xb7;0x23;0xe7;0x1c;0xa3;0x3c;0xd1 };
dec2 = function(code){
    var result,j = {},0;
    for hex in string.gmatch( code,"(\x\x)") {
        table.push( result,tonumber(hex,16) ^ xorkey[ j % 8 ]  )
        j++;
    }
    return string.pack(result) ;
}
  

winner

看到3楼的答案...虎躯一震啊

winner

原来可以定义下标从0开始的呀....

笑问天

//字符串加密用
import string
XorKey={0XA6;0XB7;0X23;0XE7;0XFC;0XA3;0X3C;0XD1};
function dec2(dostr)
{
    var j;
    result="0x"
    for (i=1;#dostr/2;1)
      {
        j=i % 8
        if (j=0) j=8;
        getnum= tonumber(string.slice(dostr,i,i+1),16)^XorKey[j]         
        getstr=tostring(getnum,16)
        if string.len(getstr)=3 getstr=string.left(getstr,2)+"0"+string.right(getstr,1)
        result=result+ getstr      
       }
    result=string.replace(result,"0x","")   
    return result
}
import console
dat="A48B90D4E58748B90D4E58A7"
console.log(dat)
console.log(dec2(dat))
execute("pause")