BlackHalt writeln (by me or from manual) PHP source Codes ...

encrypt / decrypt

<?php

# encrypt / decrypt

function en_crypt($string,$key){
    
$result='';
    for(
$i=0;$i<strlen($string);$i++){
        
$char=substr($string,$i,1);
        
$keychar=substr($key,($i%strlen($key))-1,1);
        
$char=chr(ord($char)+ord($keychar));
        
$result.=$char;
    }
    return 
str_rot13(base64_encode($result));
}

function 
de_crypt($string,$key){
    
$result='';
    
$string=base64_decode(str_rot13($string));
    for(
$i=0;$i<strlen($string);$i++){
        
$char=substr($string,$i,1);
        
$keychar=substr($key,($i%strlen($key))-1,1);
        
$char=chr(ord($char)-ord($keychar));
        
$result.=$char;
    }
    return 
$result;
}

echo 
en_crypt('<h1>Šaursliežu dzelzceļš</h1>','qwerty');
echo 
'<br />';
echo 
de_crypt('gqzbbmpH2hoc2A7q3wL12cYL89ow39KMCF08Od6w4nX1','qwerty');

?>