foldersTree = gFld("Отряд:Семейство:Род:Вид")
aux1 = insFld(foldersTree, gFld("Черепахи", "blank.html"))
 aux2 = insFld(aux1, gFld("Морские черепахи", "blank.html"))
  aux3 = insFld(aux2, gFld("Логгерхеды, или Головастые черепахи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Логгерхед, или головастая черепаха","reptiles/1.html"))
 aux2 = insFld(aux1, gFld("Кожистые черепахи", "blank.html"))
  aux3 = insFld(aux2, gFld("Кожистые черепахи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Кожистая черепаха","reptiles/2.html"))
 aux2 = insFld(aux1, gFld("Мягкотелые черепахи", "blank.html"))
  aux3 = insFld(aux2, gFld("Дальневосточные черепахи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Черепаха дальневосточная","reptiles/3.html"))
 aux2 = insFld(aux1, gFld("Пресноводные черепахи", "blank.html"))
  aux3 = insFld(aux2, gFld("Болотные черепахи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Болотная черепаха","reptiles/4.html"))
  aux3 = insFld(aux2, gFld("Водные черепахи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Каспийская черепаха","reptiles/5.html"))
 aux2 = insFld(aux1, gFld("Сухопутные черепахи", "blank.html"))
  aux3 = insFld(aux2, gFld("Средиземноморские черепахи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Средиземноморская черепаха","reptiles/6.html"))
aux1 = insFld(foldersTree, gFld("Чешуйчатые", "blank.html"))
    aux2 = insFld(aux1, gFld("Гекконы", "blank.html"))
         aux3 = insFld(aux2, gFld("Североазиатские геккончики", "blank.html"))
             aux4=insFld(aux3, gLnk(0,"Геккончик пискливый","reptiles/7.html"))
  aux3 = insFld(aux2, gFld("Тонкопалые гекконы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Геккон каспийский","reptiles/8.html"))
    aux4=insFld(aux3, gLnk(0,"Геккон серый","reptiles/9.html"))
 aux2 = insFld(aux1, gFld("Агамовые", "blank.html"))
  aux3 = insFld(aux2, gFld("Круглоголовки", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Круглоголовка-вертихвостка","reptiles/10.html"))
    aux4=insFld(aux3, gLnk(0,"Круглоголовка такырная","reptiles/11.html"))
    aux4=insFld(aux3, gLnk(0,"Круглоголовка ушастая","reptiles/12.html"))
    aux4=insFld(aux3, gLnk(0,"Круглоголовка пестрая","reptiles/13.html"))
  aux3 = insFld(aux2, gFld("Азиатские горные агамы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Агама кавказская","reptiles/14.html"))
  aux3 = insFld(aux2, gFld("Равнинные агамы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Агама степная","reptiles/15.html"))
 aux2 = insFld(aux1, gFld("Веретеницевые", "blank.html"))
  aux3 = insFld(aux2, gFld("Веретеницы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Веретеница ломкая, медяница","reptiles/16.html"))
  aux3 = insFld(aux2, gFld("Панцирные веретеницы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Желтопузик, глухарь","reptiles/17.html"))
 aux2 = insFld(aux1, gFld("Сцинковые", "blank.html"))
  aux3 = insFld(aux2, gFld("Длинноногие сцинки", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Сцинк дальневосточный","reptiles/18.html"))
    aux4=insFld(aux3, gLnk(0,"Сцинк длинноногий","reptiles/19.html"))
 aux2 = insFld(aux1, gFld("Настоящие ящерицы", "blank.html"))
  aux3 = insFld(aux2, gFld("Ящурки", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Ящурка монгольская","reptiles/20.html"))
    aux4=insFld(aux3, gLnk(0,"Ящурка разноцветная","reptiles/21.html"))
    aux4=insFld(aux3, gLnk(0,"Ящурка глазчатая","reptiles/22.html"))
    aux4=insFld(aux3, gLnk(0,"Ящурка гобийская, ящурка Пржевальского","reptiles/23.html"))
    aux4=insFld(aux3, gLnk(0,"Ящурка быстрая","reptiles/24.html"))
  aux3 = insFld(aux2, gFld("Настоящие ящерицы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица прыткая","reptiles/25.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица cредняя","reptiles/26.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица полосатая","reptiles/27.html"))
  aux3 = insFld(aux2, gFld(" Даревскиа (скальные ящерицы)", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица альпийская","reptiles/28.html"))
    aux4=insFld(aux3, gLnk(0,"Кавказская ящерица","reptiles/29.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица дагестанская","reptiles/30.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица артвинская","reptiles/31.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица луговая","reptiles/32.html"))
    aux4=insFld(aux3, gLnk(0,"Грузинская ящерица","reptiles/33.html"))
    aux4=insFld(aux3, gLnk(0,"Скальная ящерица","reptiles/34.html"))
  aux3 = insFld(aux2, gFld("Зоотока", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Ящерица живородящая","reptiles/35.html"))
  aux3 = insFld(aux2, gFld("Змееголовки", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Змееголовка стройная","reptiles/36.html"))
  aux3 = insFld(aux2, gFld("Долгохвостки", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Долгохвостка амурская","reptiles/37.html"))
    aux4=insFld(aux3, gLnk(0,"Долгохвостка корейская","reptiles/38.html"))
 aux2 = insFld(aux1, gFld("Слепозмейки, или слепуны", "blank.html"))
  aux3 = insFld(aux2, gFld("Слепозмейки, или слепуны", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Червеобразная слепозмейка","reptiles/39.html"))
 aux2 = insFld(aux1, gFld("Ложноногие, или удавы", "blank.html"))
  aux3 = insFld(aux2, gFld("Удавчики", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Западный удавчик","reptiles/40.html"))
    aux4=insFld(aux3, gLnk(0,"Песчаный удавчик","reptiles/41.html"))
 aux2 = insFld(aux1, gFld("Ужеобразные", "blank.html"))
  aux3 = insFld(aux2, gFld("Лесные ужи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Японский уж","reptiles/42.html"))
  aux3 = insFld(aux2, gFld("Стройные полозы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Желтобрюхий(Каспийский) полоз","reptiles/43.html"))
    aux4=insFld(aux3, gLnk(0,"Оливковый полоз","reptiles/44.html"))
    aux4=insFld(aux3, gLnk(0,"Разноцветный полоз","reptiles/45.html"))
    aux4=insFld(aux3, gLnk(0,"Краснобрюхий полоз","reptiles/46.html"))
    aux4=insFld(aux3, gLnk(0,"Полосатый полоз","reptiles/47.html"))
  aux3 = insFld(aux2, gFld("Медянки", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Обыкновенная медянка","reptiles/48.html"))
  aux3 = insFld(aux2, gFld("Динодоны", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Восточный динодон","reptiles/49.html"))
    aux4=insFld(aux3, gLnk(0,"Краснопоясный динодон","reptiles/50.html"))
  aux3 = insFld(aux2, gFld("Эйренисы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Ошейниковый эйренис","reptiles/51.html"))
    aux4=insFld(aux3, gLnk(0,"Смирный эйренис","reptiles/52.html"))
  aux3 = insFld(aux2, gFld("Лазающие полозы", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Островной полоз","reptiles/53.html"))
    aux4=insFld(aux3, gLnk(0,"Узорчатый полоз","reptiles/54.html"))
    aux4=insFld(aux3, gLnk(0,"Закавказский полоз","reptiles/55.html"))
    aux4=insFld(aux3, gLnk(0,"Японский полоз","reptiles/56.html"))
    aux4=insFld(aux3, gLnk(0,"Эскулапов полоз","reptiles/57.html"))
    aux4=insFld(aux3, gLnk(0,"Малочешуйчатый полоз","reptiles/58.html"))
    aux4=insFld(aux3, gLnk(0,"Четырехполосый полоз","reptiles/59.html"))
    aux4=insFld(aux3, gLnk(0,"Красноспинный полоз","reptiles/60.html"))
    aux4=insFld(aux3, gLnk(0,"Амурский полоз","reptiles/61.html"))
    aux4=insFld(aux3, gLnk(0,"Полоз тонкохвостый","reptiles/62.html"))
  aux3 = insFld(aux2, gFld("Ящеричные змеи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Ящеричная змея","reptiles/63.html"))
  aux3 = insFld(aux2, gFld("Настоящие ужи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Колхидский уж","reptiles/64.html"))
    aux4=insFld(aux3, gLnk(0,"Обыкновенный уж","reptiles/65.html"))
    aux4=insFld(aux3, gLnk(0,"Водяной уж","reptiles/66.html"))
  aux3 = insFld(aux2, gFld("Длиннозубые ужи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Тигровый уж","reptiles/67.html"))
  aux3 = insFld(aux2, gFld("Кошачьи змеи", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Кошачья змея","reptiles/68.html"))
 aux2 = insFld(aux1, gFld("Морские змеи", "blank.html"))
  aux3 = insFld(aux2, gFld("Пеламиды", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Двухцветная пеламида","reptiles/69.html"))
 aux2 = insFld(aux1, gFld("Морские крайты", "blank.html"))
  aux3 = insFld(aux2, gFld("Ложные морские крайты", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Большой морской крайт","reptiles/70.html"))
 aux2 = insFld(aux1, gFld("Гадюковые, или гадюки", "blank.html"))
  aux3 = insFld(aux2, gFld("Щитомордники", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Обыкновенный щитомордник","reptiles/71.html"))
    aux4=insFld(aux3, gLnk(0,"Щитомордник каменистый","reptiles/73.html"))
    aux4=insFld(aux3, gLnk(0,"Уccурийский щитомордник","reptiles/74.html"))
  aux3 = insFld(aux2, gFld("Гадюки", "blank.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка обыкновенная","reptiles/75.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка Динника","reptiles/76.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка Казанова, Кавказская  гадюка","reptiles/77.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка Лотиева","reptiles/78.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка Никольского","reptiles/79.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка сахалинская","reptiles/80.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка степная","reptiles/81.html"))
    aux4=insFld(aux3, gLnk(0,"Гадюка Орлова","reptiles/82.html"))
    aux4=insFld(aux3, gLnk(0,"Реликтовая гадюка","reptiles/83.html"))
    aux4=insFld(aux3, gLnk(0,"Гюрза","reptiles/84.html"))