}?>
function imode_encode($str){ $len = mb_strlen($str, "SJIS"); for($i=0; $i<$len; $i++) { $w = mb_substr($str, $i, 1, "SJIS"); if (($w[0] == "\xf8" && ereg("[\x9f-\xfc]",$w[1])) || ($w[0] == "\xf9" && ereg("[\x40-\x49\x50-\x53\x55-\x57\x5b-\x7e\x80-\xfc]",$w[1]))) { $hex = dechex(ord($w[0])) . dechex(ord($w[1])); $enc .= ''; }else{ $enc.=$w; }}return$enc;} $output='