function openWindow (url)
 {     
	 window.open(url,"","width=650,height=550,toolbar=no,menubar=no,scrollbars=yes,status=no,location=no,resizable=yes");
 }

var repWin; // Окно для ввода ответа

function openReplyWindow (url)
 {     
repWin=window.open(url,"replyWindow","width=650,height=550,toolbar=no,menubar=no,scrollbars=yes,status=no,location=no,resizable=yes");
 }

function CountSelected(Menu)
{ var C = 0;
for (i = 0; i < Menu.options.length; i++) {
  if (Menu.options[i].selected ) {
      C = C +1;
  }
}
return C;
}

function CheckSelected(Menu,Limit)
{ var c;
 c = CountSelected(Menu);
 if ( c  > Limit) {
   alert("Может быть выбрано не более "+Limit+" вариантов"); 
   Menu.options[Menu.selectedIndex].selected = false;  
 }
}


function GetSelection() {
  /*  
    Функция проверяет наличие выделения в документе
  */  
  if (document.all) message=document.selection.createRange().text;
  else if (document.getSelection) message=document.getSelection();
}

function checkSelection() {
  /*  
    Функция проверяет наличие выделения в документе
  if (document.all) message=document.selection.createRange().text;
  else if (document.getSelection) message=document.getSelection();
  */
  GetSelection();

  if (!message) {
    alert("отметьте цитируемый фрагмент и нажмиите кнопку [Цитировать]. \n Включать в выделяемый фрагмент автора и дату не надо - это будет сделано автоматически"); 
    return false;
  }
  else return true;
}

function open_reply_window(url) {
  /*
    Функция открывает новое окно для ввода ответа (repWin)
  */
  repWin=window.open(url,"replyWindow","width=700,height=500,toolbar=no,menubar=no,scrollbars=yes,status=yes,location=no");
}


function quote_or_reply(replic_id,url) {
  if (typeof(repWin) == 'undefined' || ! repWin || repWin.closed) {  
    GetSelection();
    open_reply_window(url);
//    if (message) alert ('Цитируемый фрагмент: '+message);

  } else {
    checkSelection();
  }


  if (message ) {
     var  textarea=repWin.document.forms['repForm'].elements['REP.TEXT'];
//      while (! textarea ){
//        textarea=repWin.document.forms['repForm'].elements['REP.TEXT'];
//      }
      quote_replic(replic_id,textarea);
     }
  repWin.focus();
}


function quote_replic(replic_id,field_obj) {
  /*  
    Функция подставляет выделенный фрагмент как цитату в указанное поле. Параметры:
    replic_id - порядковый номер сообщения, используется для извлечения соответсвующего автора и даты
    field_obj - имя текстового поле, куда будет записана цитата (объект)
  */  
  author = document.getElementById('author'+replic_id).innerHTML;
  date = document.getElementById('date'+replic_id).innerHTML;
  message=message.replace(/<br>((\r\n)|(\n))*?/gi,'\r\n');


  message=message.replace(/(<p>)/gi,'\r\n');
  message=message.replace(/(<\/p>)/gi,'\r\n');
  message=message.replace(/_/g,' ');

  var strLength=60;
  var i=0;
  var qMessage=new String();
  var qStrings=new Array();
  qStrings=message.split("\r\n");
  for (i=0; i<qStrings.length; i++)
  {
    var j=0;
    var qPrefix="";
    qStrings[i]=qStrings[i].replace(/^\s+/,'');
    if (strLength)
    {
      while (j<qStrings[i].length)
      {
        var curEnd=0;
        var curSubstr=qStrings[i].substr(j,strLength);
        var nextSymbol=qStrings[i].charAt(j+curSubstr.length);
        if (nextSymbol && nextSymbol!=" ") curEnd=curSubstr.lastIndexOf(" ")+1;
        if (curEnd > 0) curSubstr=curSubstr.substring(0,curEnd);
        else curEnd=curSubstr.length;  
        curSubstr=curSubstr.replace(/^\s+/,'');
        qMessage+="_"+qPrefix+curSubstr+"_\r\n";
        qMark=curSubstr.match(/^(>\s*)+/g);
        if (qMark) qPrefix=qMark[0];
        j+=curEnd;
      }  
    }
    else qMessage+="_"+qStrings[i]+"_\r\n";
  }

  qMessage=qMessage.replace(/ _/g,'_');
  qMessage=qMessage.replace(/_ /g,'_');
  qMessage=qMessage.replace(/ _/g,'_');
  qMessage=qMessage.replace(/_ /g,'_');


  author=author.replace(/^\s*/gi,'');
  author=author.replace(/\s*$/gi,'');
  author= "*_" + author;
  author= author.replace(/ _/g,'_');
  author= author.replace(/ _/g,'_');

  date=date.replace(/^\s*/gi,'');
  date=date.replace(/\s*$/gi,'');
  field_obj.value=field_obj.value + '\r\n' + author + ' ' + date + ' писал:_*\r\n\r\n' + qMessage + '\r\n' ;
  field_obj.focus();
}