//JCBI links control engine (based on main database engine of Cybernix OS) //Cybernix OS (C) 2002-2010 //Version 5.13 //Common parameters var d=document; i=""; ii=""; j=""; jj=""; k=""; kk=""; generator=""; //переменные для организации циклов //Functions function print_all() //распечатка всех элементов { for(i=0; i'); } d.write('
'); } current_length=""; //длина строки с информацией о текущем куске информации var current_field=""; //------------------------------------------------------------ var fieldarray1=new Array(); //доступность (если 0) или тип (если 1, 2, 3) var fieldarray2=new Array(); //номер раздела (topic_id) var fieldarray3=new Array(); //сама ссылка var fieldarray4=new Array(); //текст ссылки (не сама ссылка) var fieldarray5=new Array(); //текст ссылки (англ.) //var fieldarray6=new Array(); // //------------------------------------------------------------ var field_element=new Array(); //---------------------------------------------------------------------------------------------------------------- function field_arrays_spawn() //вызывается ОДИН РАЗ { for(ii=0; ii") //нашли символ, указывающий на наличие поля { if (myarray[i].substr(j-1, 1)==current_field) //нашли номер поля { j++; //устанавливаем маркер в позицию после ">" (не путать: это не для цикла!) k=0; for(;;) { field_element[k]=myarray[i].substr(j, 1); //формируем массив if (myarray[i].substr(j, 1)=="<") {break;} //если конец поля, то выходим k++; j++; if (k>10000) {d.write('Error: k>10000'); break;} if (j>10000) {d.write('Error: j>10000'); break;} } } } } for(ii=0; ii'); d.write(''); d.write(''); d.write(''); // //top d.write(''); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write('

'); //zagolovok d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write('

'); d.write('

'); //kollaj d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write('

'); // d.write('

'); if (language==0) { mi[0]="Welcome"; mi[1]="Bioinformatics"; mi[2]="Cluster"; mi[3]="Projects"; mi[4]="Data Bases"; mi[5]="Links"; mi[6]="Announcements"; mi[7]="FeedBack"; } if (language==1) { mi[0]="Заглавная"; mi[1]="Научный Cовет"; mi[2]="Кластер"; mi[3]="Проекты"; mi[4]="Базы данных"; mi[5]="Ссылки"; mi[6]="Объявления"; mi[7]="Контакты"; } //menu d.write(''); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write('

'); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); if (file_flag!=1) d.write(' '); else d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write('

'); //menu1 d.write(''); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write('

'); } var what=""; //тематическое название файла var topic=""; //название подкатегории ссылок function generate_begin(what) //генерация начала таблицы { d.write(''); d.write(' '); d.write(' '); d.write(' '); d.write('

'+what+''); } var topic_id; //номер раздела function spawn_links(topic, topic_id, language) { if (language==0) jcbi_root="../"; if (language==1) jcbi_root=""; d.write('

'); //if (fieldarray1[i]==1) d.write('

'); //if (fieldarray1[i]==2) d.write('

'); //if (fieldarray1[i]==3) d.write('

'); d.write('

'); if (fieldarray1[i]==0) d.write(' '); if (language==0 && fieldarray1[i]!=0) //eng { if (fieldarray5[i]=="") d.write(' '+fieldarray4[i]+''); else d.write(' '+fieldarray5[i]+''); } if (language==1 && fieldarray1[i]!=0) //rus { if (fieldarray2[i]==18 || fieldarray2[i]==19 || fieldarray2[i]==20) d.write(' '+fieldarray4[i]+''); else d.write(' '+fieldarray4[i]+''); } if (language==0 && fieldarray1[i]==0) { if (fieldarray5[i]=="") d.write(fieldarray4[i]); else d.write(fieldarray5[i]); } if (language==1 && fieldarray1[i]==0) d.write(fieldarray4[i]); } } d.write('

'); } function generate_end() //генерация конца таблицы { d.write('

'); d.write('

'); } function generate_bottom(language) //генерация нижней части { d.write('

'); //bottom d.write(''); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write(' '); d.write('

	Copyright 2001-2010 © '); if (language==0) d.write('Institute of Mathematical Problems of Biology RAS'); if (language==1) d.write('Институт математических проблем биологии РАН'); d.write('

'); //end of bottom } //--- End of file ---