แปลง UTF-8 เป็น TIS-620

function utf8_to_tis620($string) {

$str = $string;

$res = "";

for ($i = 0; $i < strlen($str); $i++) {

if (ord($str[$i]) == 224) {

$unicode = ord($str[$i+2]) & 0x3F;

$unicode |= (ord($str[$i+1]) & 0x3F) << 6;

$unicode |= (ord($str[$i]) & 0x0F) << 12;

$res .= chr($unicode-0x0E00+0xA0);

$i += 2;

} else {

$res .= $str[$i];

}

}

return $res;

}