var obj = gb_findObj('mes');

function DoPrompt(action) {
 var tMessage = '';
 var rMessage = '';

 if (action == "01") {
  rMessage = "[URL=" + prompt(bb_m[0], "http://") + "]";
  if (rMessage == "[URL=null]" || rMessage == "[URL=]")
   return;
  
  tMessage = prompt(bb_m[1], "Page Title") + "[/URL]";
  if (tMessage == "null[/URL]" || tMessage == "[/URL]")
   return;
   
  rMessage = rMessage + tMessage;
 }

 if (action == "02") {
  rMessage = "[EMAIL]" + prompt(bb_m[2], "") + "[/EMAIL]";
  if (rMessage == "[EMAIL]null[/EMAIL]" || rMessage == "[EMAIL][/EMAIL]")
   return;
 }

 if (action == "03") {
  rMessage = "[B]" + prompt(bb_m[3], "") + "[/B]";
  if (rMessage == "[B]null[/B]" || rMessage == "[B][/B]")
   return;
 }

 if (action == "04") {
  rMessage = "[I]" + prompt(bb_m[4], "") + "[/I]";
  if (rMessage == "[I]null[/I]" || rMessage == "[I][/I]")
   return;
 }

 if (action == "05") {
  rMessage = "[U]" + prompt(bb_m[5], "") + "[/U]";
  if (rMessage == "[U]null[/U]" || rMessage == "[U][/U]")
   return;
 }

 if (action == "06") {
  rMessage = "[LIST]";
 }

 if (action == "07") {
  rMessage = "[LIST=1]";
 }

 if (action == "08") {
  rMessage = "[LIST=A]";
 }

 if (action == "09") {
  rMessage = "[*]" + prompt(bb_m[6], "");
  if (rMessage == "[*]null" || rMessage == "[*]")
   return;
 }

 if (action == "10") {
  rMessage = "[/LIST]";
 }
 
 if(rMessage != "") {
  obj.value = obj.value + rMessage; 
 }
 obj.focus();
 return true;
}

function gb_findObj(n, d) {
 var p, i, x;
 if(!d)  d = document;
 if( (p=n.indexOf("?")) > 0 && parent.frames.length) {d = parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
 if( !(x=d[n]) && d.all ) x=d.all[n];
 for(i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
 for(i=0; !x&&d.layers&&i<d.layers.length;i++) x=gb_findObj(n,d.layers[i].document);
 if(!x && d.getElementById) x=d.getElementById(n);
 return x;
}