Function G ($ NUM)
{
Global $ D;
IF ($ NUM> 0 && $ Num <160)
{
Return CHR ($ NUM);
}
Elseif ($ Num <-20319 | | $ NUM> -10247)
{
""; "
}
Else
{
For ($ i = count ($ d) -1; $ i> = 0; $ I -)
{
IF ($ D [$ I] [1] <= $ NUM)
Break;
}
RETURN $ D [$ I] [0];
}
}
Function C ($ STR) {$ RET = "" "; for ($ I = 0; $ I 160) {$ = ORD (Substr ($ Str, $ I, 1)); $ P = $ P * 256 $ Q-65536;} $ RET. = G ($ P) Return $ RET;}
Echo C ($ HZ);>
