UBB 转换函数演示 (经典论坛)

    经典论坛的UBB转换我觉得是处理的非常好的，研究了一下它的转换结果[因为没有源码:)]，做了下面的演示。转换结果基本上觉得象了。

    主要是针对[code]{html}这两个标签的处理，其他的UBB标签还是一般的处理方法。

    下面是分别用javascript和vbscript实现的演示。自己做论坛的朋友，如果想实现类似经典论坛的运行代码框可以看看这种转换。

欢迎大家输入尽量多格式的UBB进行测试，多多指出错误。
javascirpt:
复制代码 代码如下:

.CodeSamp {
 PADDING-RIGHT: 0.5em; MARGIN-TOP: 1em; PADDING-LEFT: 0.5em; FONT-SIZE: 8p; MARGIN-BOTTOM: 1em; PADDING-BOTTOM: 0.5em; MARGIN-LEFT: 0pt; PADDING-TOP: 0.5em; FONT-FAMILY: "Courier New"; BACKGROUND-COLOR: #eeeeee;width: 480px;overflow:hidden;border: 1px solid #888888;
}
textarea {
border-width: 1; border-color: #000000;font-size: 12px;FONT-FAMILY: "Tahoma", "MS Shell Dlg";
}

<BR>[i][b][color=blue]blue[/color][/b][/i]</FONT></P> <P><FONT face=Verdana>{html}[color=red]te<BR>st[/color]{/html}</FONT></P> <P><FONT face=Verdana>{html}[code]te<BR>st[/code]{/html}</FONT></P> <P><FONT face=Verdana>[code]{html}te<BR>st{/html}[/code]

转换

'Tahoma', 'MS Shell Dlg';
">

vbscript:
复制代码 代码如下:

.CodeSamp {
 PADDING-RIGHT: 0.5em; MARGIN-TOP: 1em; PADDING-LEFT: 0.5em; FONT-SIZE: 8p; MARGIN-BOTTOM: 1em; PADDING-BOTTOM: 0.5em; MARGIN-LEFT: 0pt; PADDING-TOP: 0.5em; FONT-FAMILY: "Courier New"; BACKGROUND-COLOR: #eeeeee;width: 480px;overflow:hidden;border: 1px solid #888888;
}
textarea {
border-width: 1; border-color: #000000;font-size: 12px;FONT-FAMILY: "Tahoma", "MS Shell Dlg";
}

<BR>[i][b][color=blue]blue[/color][/b][/i]</FONT></P> <P><FONT face=Verdana>{html}[color=red]te<BR>st[/color]{/html}</FONT></P> <P><FONT face=Verdana>{html}[code]te<BR>st[/code]{/html}</FONT></P> <P><FONT face=Verdana>[code]{html}te<BR>st{/html}[/code]

转换

'Tahoma', 'MS Shell Dlg';
">