(100%结贴)求把这几行代码翻译成PHP的

const        XorKey:array[0..7] of Byte=($B2,$09,$AA,$55,$93,$6D,$84,$47); //字符串加密用 function Dec(Str:String):String;//字符解密函?vari,j:Integer;beginResult:='';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;

回复讨论(解决方案)

解决了200分奉上

还有一个帖子也是100分： http://bbs.csdn.net/topics/390998635

给个密文，我测试看看~

 
 
  
function Dec($str){  $XorKey = array(0xB2,0x09,0xAA,0x55,0x93,0x6D,0x84,0x47);  $result = "";  for($i=0, $j=0; $i 
 
  能顺便把加密函数也翻译一下吗  
  
 function Enc(Str:String):String;//字符加密函?   ?是用的一??或加密  
 var  
 i,j:Integer;  
 begin  
 Result:='';  
 j:=0;  
 for i:=1 to Length(Str) do  
     begin  
       Result:=Result+IntToHex(Byte(Str[i]) xor XorKey[j],2);  
       j:=(j+1) mod 8;  
     end;  
 end;  
  
  
  
 好测试密文 
 
  
   给个密文，我测试看看~  
  
  
  
 密文  F76DC321A1  解出来应该是Edit2  但是用你翻译的php的解出来是Edit  少了一位 
 
  
   
    
 给个密文，我测试看看~   
   
   
   
 密文  F76DC321A1  解出来应该是Edit2  但是用你翻译的php的解出来是Edit  少了一位  
  
  
  
 这样肯定没问题了。 
 
  
$XorKey = array(0xB2,0x09,0xAA,0x55,0x93,0x6D,0x84,0x47);echo $s = enc('Edit2', $XorKey), PHP_EOL;echo dec($s, $XorKey);function Enc($Str, $XorKey) { //:String;//字符加密函?   ?是用的一??或加密  $Result = '';  $j = 0;  for($i=0; $iF76DC321A1  
 Edit2  
 
 
  
   能顺便把加密函数也翻译一下吗   
   
 function Enc(Str:String):String;//字符加密函?   ?是用的一??或加密   
 var   
 i,j:Integer;   
 begin   
 Result:='';   
 j:=0;   
 for i:=1 to Length(Str) do   
     begin   
       Result:=Result+IntToHex(Byte(Str[i]) xor XorKey[j],2);   
       j:=(j+1) mod 8;   
     end;   
 end;   
   
   
   
 好测试密文  
  
  
  
 
 
  to: xuzuning 版主，你那个代码我执行的一直出错，不知道为什么。 
php入门到就业线上直播课：查看学习
声明：本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系admin@php.cn核实处理。
前端(VUE)零基础到就业课程：点击学习
清晰的学习路线+老师随时辅导答疑
自己动手写 PHP MVC 框架：点击学习
快速了解MVC架构、了解框架底层运行原理
专题推荐：(100%结贴)求把这几行代码翻译成PHP的

			   上一篇：php path_info 在nginx中失效问题               下一篇：自己动手写 PHP MVC 框架(40节精讲/巨细/新人进阶必看)