-
功能unescape（$str）
{
美元=；
$ len = strlen（str）；
（$ i = 0；$ i；
{
如果（$str { } = =我美元str { $我+ 1 } = = U）
{
$值= hexdec（substr（$str，我+ 2, 4））；
如果（$ val < 0x7f）$ RET = CHR（美元值）；
如果（美元值> 6）），Chr（0x80 |（$ val0x3f））；
其他的RET = CHR（0xE0 |美元（美元价值> >（12）。CHR）（0x80 |（Val > > 6美元）0x3F（0x80 |））。Chr（$ val0x3f））；
$ I = 5；
}
否则，如果（$ $ $ i =% =）
{
美元= URLDecode（RET substr（$str，我，3））；
$ I = 2；
}
除此之外，每一美元；
}
返回$；
}