RMM Segmentation Algorithm Code fragment

function splitrmm ($str = "") {
if ($str!= "") $this->setsource (Trim ($STR));
if ($this->sourcestring== "") return "";
Make the text bold
$this->sourcestring = $this->revisestring ($this->sourcestring);
Separation of specific text
$spwords = Explode ("", $this->sourcestring);
$spLen = count ($spwords);
$SPC = $this->splitchar;
for ($i = ($spLen-1); $i >=0; $i-) {
if (Trim ($spwords [$i]) = = "") continue;
if ($this->notgbk ($spwords [$i])) {
if (Ereg ("[^0-9.+-]", $spwords [$i]))
{$this->resultstring = $spwords [$i]. $spc. $this->resultstring;}
Else
{
$nextword = "";
@ $nextword = substr ($this->resultstring,0,strpos ($this->resultstring, ""));
if (Ereg ("^". $this->commonunit, $nextword)) {
$this->resultstring = $spwords [$i]. $this->resultstring;
}else{
$this->resultstring = $spwords [$i]. $spc. $this->resultstring;
}
}
}
Else
{
$c = $spwords [$i][0]. $spwords [$i][1];
$n = Hexdec (Bin2Hex ($c));
if ($c = = "")//title
{$this->resultstring = $spwords [$i]. $spc. $this->resultstring;}
else if ($n >0xa13f && $n < 0XAA40)//punctuation
{$this->resultstring = $spwords [$i]. $spc. $this->resultstring;}
else//Normal
{
if (strlen ($spwords [$i]) <= $this->splitlen)
{
If the Terminator is a special segmentation word, the separation process
if (Ereg ($this->especialchar.) $ ", $spwords [$i], $regs)) {
$spwords [$i] = ereg_replace ($regs [0]. " $ "," ", $spwords [$i]). $spc. $regs [0];
}
is a common unit
if (!ereg ("^". $this->commonunit, $spwords [$i]) | | $i ==0) {
$this->resultstring = $spwords [$i]. $spc. $this->resultstring;
}else{
$this->resultstring = $spwords [$i-1]. $spwords [$i]. $spc. $this->resultstring;
$i--;
}
}
Else
{
$this->resultstring = $this->runrmm ($spwords [$i]). $spc. $this->resultstring;
}
}
}
}
return $this->resultstring;
}