مرجع پارسی MyBB
تابع برای تبدیل باینری به text و بلعکس - نسخه‌ی قابل چاپ

+- مرجع پارسی MyBB (https://community.mybbiran.com)
+-- انجمن: متفرقه (https://community.mybbiran.com/forum-52.html)
+--- انجمن: آموزش PHP (https://community.mybbiran.com/forum-131.html)
+--- موضوع: تابع برای تبدیل باینری به text و بلعکس (/thread-12857.html)



تابع برای تبدیل باینری به text و بلعکس - mypgr.ir - ۱۳۹۱/۱۰/۱

تابع برای تبدیل باینری به text و بلعکس
کد php:
<? 
function bin2text($bin_str

    
$text_str ''
    
$chars explode("\n"chunk_split(str_replace("\n"''$bin_str), 8)); 
    
$_I count($chars); 
    for(
$i 0$i $_I$text_str .= chr(bindec($chars[$i])), $i  ); 
    return 
$text_str


function 
text2bin($txt_str

    
$len strlen($txt_str); 
    
$bin ''
    for(
$i 0$i $len$i  
    { 
        
$bin .= strlen(decbin(ord($txt_str[$i]))) < str_pad(decbin(ord($txt_str[$i])), 80STR_PAD_LEFT) : decbin(ord($txt_str[$i])); 
    } 
    return 
$bin

print 
text2bin('How are you gentlements?'); 
?>