Юрий Карпов - Пишем программу для создания книг FB2.

Компьютеры и Интернет

('comp_db', 'Базы данных'),

('comp_www', 'Интернет'),

('comp_hard', 'Компьютерное "железо"'),

('computers', 'Околокомпьютерная литература'),

('comp_osnet', 'ОС и Сети'),

('comp_programming', 'Программирование'),

('comp_soft', 'Программы'),

('comp_dsp', 'Цифровая обработка сигналов'),

// Любовные романы

('love_history', 'Исторические любовные романы'),

('love_short', 'Короткие любовные романы'),

('love_sf', 'Любовно-фантастические романы'),

('love', 'О любви'),

('love_detective', 'Остросюжетные любовные романы'),

('love_contemporary', 'Современные любовные романы'),

('love_erotica', 'Эротика'),

// Наука, Образование

('sci_medicine_alternative', 'Альтернативная медицина'),

('sci_cosmos', 'Астрономия и Космос'),

('sci_biology', 'Биология'),

('sci_biophys', 'Биофизика'),

('sci_biochem', 'Биохимия'),

('sci_geo', 'Геология и география'),

('sci_state', 'Государство и право'),

('sci_business', 'Деловая литература'),

('sci_history', 'История'),

('sci_culture', 'Культурология'),

('sci_philology', 'Литературоведение'),

('sci_math', 'Математика'),

('sci_medicine', 'Медицина'),

('science', 'Научная литература'),

('sci_orgchem', 'Органическая химия'),

('sci_politics', 'Политика'),

('sci_psychology', 'Психология'),

('sci_religion', 'Религиоведение'),

('sci_tech', 'Технические науки'),

('sci_phys', 'Физика'),

('sci_physchem', 'Физическая химия'),

('sci_philosophy', 'Философия'),

('sci_chem', 'Химия'),

('sci_economy', 'Экономика'),

('sci_juris', 'Юриспруденция'),

('sci_linguistic', 'Языкознание'),

// Периодика

('periodic', 'Журналы'),

//Поэзия, Драматургия

('dramaturgy', 'Драматургия'),

('poetry', 'Поэзия'),

// Приключения

('adv_western', 'Вестерн'),

('adv_history', 'Исторические приключения'),

('adv_maritime', 'Морские приключения'),

('adventure', 'Приключения'),

('adv_indian', 'Приключения про индейцев'),

('adv_animal', 'Природа и животные'),

('adv_geo', 'Путешествия и география'),

// Проза

('prose_history', 'Историческая проза'),

('prose_classic', 'Классическая проза'),

('prose_counter', 'Контркультура'),

('prose_military', 'О войне'),

('prose', 'Проза'),

('prose_rus_classic', 'Русская классическая проза'),

('prose_su_classics', 'Советская классическая проза'),

('prose_contemporary', 'Современная проза'),

// Прочее

('other', 'Неотсортированное'),

('notes', 'Партитуры'),

//Религия и духовность

('religion_budda', 'Буддизм'),

('religion', 'Религиозная литература'),

('religion_rel', 'Религия'),

('religion_self', 'Самосовершенствование'),

('religion_esoterics', 'Эзотерика'),

//Справочная литература

('geo_guides', 'Путеводители'),

('ref_guide', 'Руководства'),

('ref_dict', 'Словари'),

('reference', 'Справочная литература'),

('ref_ref', 'Справочники'),

('ref_encyc', 'Энциклопедии'),

//Старинное

('antique_ant', 'Античная литература'),

('antique_east', 'Древневосточная литература'),

('antique_russian', 'Древнерусская литература'),

('antique_european', 'Европейская старинная литература'),

('antique_myths', 'Мифы. Легенды. Эпос'),

('antique', 'Старинная литература'),

//Техника

('sci_metal', 'Металлургия'),

('sci_radio', 'Радиоэлектроника'),

('sci_build', 'Строительство и сопромат'),

('sci_transport', 'Транспорт и авиация'),

//Фантастика

('sf_history', 'Альтернативная история'),

('sf_action', 'Боевая фантастика'),

('sf_heroic', 'Героическая фантастика'),

('sf_fantasy_city', 'Городское фэнтези'),

('sf_detective', 'Детективная фантастика'),

('sf_cyberpunk', 'Киберпанк'),

('sf_space', 'Космическая фантастика'),

('sf', 'Научная Фантастика'),

('sf_postapocalyptic', 'Постапокалипсис'),

('sf_social', 'Социально-психологическая фантастика'),

('sf_horror', 'Ужасы и Мистика'),

('sf_fantasy', 'Фэнтези'),

('sf_epic', 'Эпическая фантастика'),

('sf_humor', 'Юмористическая фантастика'),

//Юмор

('humor_anecdote', 'Анекдоты'),

('humor', 'Юмор'),

('humor_prose', 'Юмористическая проза'),

('humor_verse', 'Юмористические стихи')

);

maxI = 18;

LI: array[0..maxI] of integer = (

0, // Деловая литература

16, // Детективы и Триллеры

28, // Детское

36,// Документальная литература

42, //Домоводство

52, // Компьютеры и Интернет

60, // Любовные романы

67, // Наука, Образование

93, // Периодика

94, //Поэзия, Драматургия

96, // Приключения

106,// Проза

111,// Прочее

113, //Религия и духовность

118, //Справочная литература

124, //Старинное

130,//Техника

134, //Фантастика

147 //Юмор

);

maxL = 23;

Lg: array[0..maxL] of gr = (

('', ''),

('en', 'Английский'),

('be', 'Белорусский'),

('bg', 'Болгарский'),

('hu', 'Венгерский'),

('nl', 'Голландский'),

('el', 'Греческий современный (1453-)'),

('da', 'Данийский'),

('grc', 'Древнегреческий (до 1453)'),

('he', 'Иврит'),

('it', 'Итальянский'),

('de', 'Немецкий'),

('pl', 'Польский'),

('pt', --">