文字列内の HTML タグの単純なフィルタリング

関数 deleteHtml( $scr )
{
$l = strlen( $scr );

for( $i=0; $i {
if( substr( $scr, $i, 1 ) == "<" )
{
// 現在位置
$ii = $i;

// $i が文字長より大きい場合ループを停止
while( substr( $scr, $i, 1 ) != ">" && $i < $l )
$i ;

// 大きな文字列の終わりに達したら、$i を '<' の開始位置にリセットします
if ( $i == $l )
{
$i = $ ii - 1;
// 文字列の終わりに到達したことを示します
$b = 1;
}

$i ;
}

// 次の文字が '<' でない場合のみ文字を受け入れます。それ以外の場合は $i--、この '<' から検索を開始します。
if ( substr( $scr, $i, 1 ) != '<' $b == 1 )
$str = $str . substr( $scr, $i, 1 );
else
$i--;
}

return( $str );
}