A good UBB encoding function implemented using JavaScript

Function jsubb (STR)
{
VaR Re = // [I/] (. [^/[] *)/[// I/]/GI;
STR = Str. Replace (Re, "<I> $1 </I>"); // Italic
Re = // [B/] (. [^/[] *)/[// B/]/GI;
STR = Str. Replace (Re, "<B> $1 </B>"); // bold
Re = // [U/] (. [^/[] *)/[// U/]/GI;
STR = Str. Replace (Re, "<u> $1 </u>"); // underline
Re = // [color = (. [^/[] *)/] (. [^/[] *)/[// color/]/GI;
STR = Str. Replace (Re, "<font color = $1> $2 </font>"); // font color
Re = // [size = ([1-7])/] (. [^/[] *)/[// size/]/GI;
STR = Str. Replace (Re, "<font size = $1> $2 </font>"); // font size
Re = // [face = (. [^/[] *)/] (. [^/[] *)/[// face/]/GI;
STR = Str. Replace (Re, "<font face = $1> $2 </font>"); // font

Re = // [center/] (. [^/[] *)/[// center/]/GI;
STR = Str. replace (Re, "

$1

"); // center
Re = // [Right/] (. [^/[] *)/[// right/]/GI;
STR = Str. replace (Re, "

$1

"); // right-aligned
Re = // [quote/] (. [^/[] *)/[// quote/]/GI; // reference
STR = Str. replace (Re, "

$1

");

Re = // [fly/] (. *)/[// fly/]/GI; // flight
STR = Str. Replace (Re, "<marquee width = 90% behavior = alternate scrollamount = 3> $1 </marquee> ");
Re = // [move/] (. *)/[// move/]/GI; // move
STR = Str. Replace (Re, "<marquee scrollamount = 3> $1 </marquee> ");
Re = // [shadow = * ([0-9] *), * (# * [a-z0-9] *), * ([0-9] *)/] (. [^/[] *)/[// shadow]/GI; // shadow
STR = Str. replace (Re, "<Table width = $1> <tr> <TD style = 'filter: Shadow (color = $2, strength = $3) '> $4 </TD> </tr> </table> ");
Re = // [glow = * ([0-9] *), * (# * [a-z0-9] *), * ([0-9] *)/] (. [^/[] *)/[// glow]/GI; // outshines
STR = Str. replace (Re, "<Table width = $1> <tr> <TD style = 'filter: glow (color = $2, strength = $3) '> $4 </TD> </tr> </table> ")

Re = // [url/] (. [^/[] *)/[// URL/]/GI;
STR = Str. Replace (Re, "<a href = '$ 1' target = _ blank> $1 </a>"); // hyperlink 1
Re = // [url = (. [^/[] *)/] (. [^/[] *)/[// URL/]/GI;
STR = Str. Replace (Re, "<a href = '$ 1' target = _ blank> $2 </a>"); // hyperlink 2

Re = // [email/] ([/W-] + (/. [/W-] +) * @ [/W-] + (/. [/W-] +)/[// email/]/GI;
STR = Str. Replace (Re, "<a href = 'mailto: $ 1'> $1 </a>"); // email link 1
Re = // [email = ([/W-] + (/. [/W-] +) * @ [/W-] + (/. [/W-] +)/] (. [^/[] *)/[// email/]/GI;
STR = Str. Replace (Re, "<a href = 'mailto: $ 1'> $4 </a>"); // email link 2

Re = // [img/] (. [^/[] *)/[// img/]/GI;
STR = Str. replace (Re, "<a href = '$ 1' target = _ blank> </> "); // Image
Re =/: EM (/d {1,}):/GI;
STR = Str. Replace (Re, "Return STR;
}