Открытый христианский форум JesusChrist.ru

Библия | Книги | Словари | Софт | Аудио, BQT, Евангелизм, JCQ, Молитва

Добро пожаловать на Открытый христианский форум JesusChrist.ru. Для того чтобы писать в форуме, Вам необходимо зарегистрироваться и войти на форум через ссылку для входа.

Общие разделы
   >> "Цитата из Библии"
Просмотров: 8814 Просмотреть ВСЕ ветвиСледующая ветвь*

В теме участвуют: ModulMaker (8) Тимофей (5) rigelzion (4) SamuelAKim (3)

rigelzion
21/07/11 19:51

Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ [re: ВСЕМ]Help admins  

Сделал скрипт для создания Индексного файла (ini) модулей Словарей и Стронга.
Работает с ASCII (ANSI X3.4), UTF-8 (на всякий случай, хотя не поддерживается Цитатой) и UTF-16 little endian. Кодировку определяет автоматически по BOMу.
В тексте скрипта только заменить "greek.htm", "greek.idx" и "Греческий лексикон Стронга (с) Bob Jones University\r\n" на необходимые названия.

<?

$lines = file("greek.htm");
$count = count($lines);

$fp = fopen("greek.idx", "w");

fputs($fp, "Греческий лексикон Стронга (с) Bob Jones University\r\n");

$offset = 0;

if(substr($lines[0],0,2)=='яю')

// обработка UTF-16, little endian
{print"Кодировка UTF-16, little endian";
if(substr($lines[0],2,1)=='<' && substr($lines[0],4,1)=='h' && substr($lines[0],6,1)=='4' && substr($lines[0],8,1)=='>')
fputs($fp, strip_tags(trim(substr($lines[0],2)))."\r\n".$offset."\r\n");

for($i=0;$i<$count;$i++)
{
if(substr($lines[$i],1,1)=='<' && substr($lines[$i],3,1)=='h' && substr($lines[$i],5,1)=='4' && substr($lines[$i],7,1)=='>')
fputs($fp, strip_tags(trim($lines[$i]))."\r\n".($offset + 1)."\r\n");

$offset += strlen($lines[$i]);
}
fclose($fp);exit;}

if(substr($lines[0],0,2)=='юя')

// обработка UTF-16, big endian
{print"ERROR - кодировка UTF-16, big endian не поддерживается";fclose($fp);exit;}


if(substr($lines[0],0,3)=='п»ї')

// обработка UTF-8
{ print"Кодировка UTF-8";
if(substr($lines[0],3,4)=='<h4>')
fputs($fp, strip_tags(trim(substr($lines[0],3)))."\r\n".$offset."\r\n");}
else print"Кодировка ASCII (ANSI X3.4)";

// обработка UTF-8 и ASCII
for($i=0;$i<$count;$i++)
{
if(substr($lines[$i],0,4)=='<h4>')
fputs($fp, strip_tags(trim($lines[$i]))."\r\n".$offset."\r\n");

$offset += strlen($lines[$i]);
}


fclose($fp);

?>




Вся ветвь
ЗаголовокАвторОтослано
*Создание словарей в Unicode для "Цитаты" версии 6.0+ SamuelAKim   28/02/11 10:29
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ rigelzion   25/09/11 23:30
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ SamuelAKim   26/09/11 08:58
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ rigelzion   31/08/11 22:14
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ rigelzion   31/08/11 21:40
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ rigelzion   21/07/11 19:51
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ SamuelAKim   26/08/11 20:09
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   23/07/11 08:12
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ Тимофей   28/02/11 10:39
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   08/07/11 16:31
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ Тимофей   08/07/11 16:41
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   08/07/11 18:11
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ Тимофей   08/07/11 18:16
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   08/07/11 18:34
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ Тимофей   08/07/11 18:51
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   08/07/11 19:31
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ Тимофей   08/07/11 19:42
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   20/07/11 00:24
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   09/07/11 21:56
.*Re: Создание словарей в Unicode для "Цитаты" версии 6.0+ ModulMaker   08/07/11 19:03
Перейти на