Ищу Скрипт Автозамены

[Natsvin]

Ответ: Ищу Скрипт Автозамены

Задача: создать простой текстовый редактор с
расшириными функциями.

Или Скрипт

1. открывает любой текстовый файл (тхт, rtf. Doc?)
2. существует возможность правки
3. при нажатии ctrl+f или правка пакетная
автозамена выводится окно с
двухколоночной и многострочной таблицей.
А) Первоя колонка "Что искать" вторая "Заменить
на..."
Б) В окне с таблицей автозамены должны быть
кнопки: загрузить таблицу
автозамены и новая таблица автозамены.
4) Сохранить в txt, rtf, doc, Indesign Tagget
Text, qurk
5) конвертировать в txt, rtf, doc, Indesign
Tagget Text, qurk

В принципи всё




Вот так я справлялся раньше в AdvaSaR

Вот составленная мною таблица Автозамены в программе AdvaSaR
Скопируйте её в Word и включите неотображаемые символы.

НО

Это моя таблица, а другие люди которые будут решать эту же проблему но со своим набором замен!!!

Поэтому нужна программа (скрипт) с настраеваемой автозаменой, стилем

Вот мой пример:

Замена 5 пробелов 1
Замена 4 пробелов 1
Замена 3 пробелов на 1
Замена 2 пробелов на 1
\r\n\r\n\r\n \r\n Замена 3 абзацев 1
\r\n\r\n \r\n Замена 2 Абзацев на 1
< # Замена < на #
# # Убирает лишний пробел
> Удаление
<Объяв ПЗ>Автомото (?sr-igmx)-модификаторы поиска ${E}-режим замены
\r\n \r\n<Объяв короткий> установка стиля Объяв короткий
<Объяв короткий># <Объяв выделенный> установка стиля Объяв Выделенный
<Объяв короткий>Продают <Объяв Заголовок>Продают Стиль Объяв заголовок для Продают
<Объяв короткий>Покупают <Объяв Заголовок>Покупают Стиль Объяв заголовок для Покупают
<Объяв короткий>Меняют <Объяв Заголовок>Меняют Стиль Объяв заголовок для Меняют
<Объяв короткий>Сдают <Объяв Заголовок>Сдают Стиль Объяв заголовок для Сдают
<Объяв короткий>Снимут <Объяв Заголовок>Снимут Стиль Объяв заголовок для Снимут
<Объяв короткий>Услуги <Объяв Заголовок>Услуги Стиль Объяв заголовок для Услуги
<Объяв короткий>Разное <Объяв Заголовок>Разное Стиль Объяв заголовок для Разное
<Объяв короткий>Требуются <Объяв Заголовок>Требуются Стиль Объяв заголовок для Требуются
<Объяв короткий>Благодарят <Объяв Заголовок>Благодарят Стиль Объяв заголовок для Благодарят
<Объяв короткий>Поздравляют <Объяв Заголовок>Поздравляют Стиль Объяв заголовок для Поздравляют
<Объяв короткий>Авто-мото <Объяв ПЗ>Автомото Стиль Объяв ПЗ для Автомото
<Объяв короткий>Автомото <Объяв ПЗ>Автомото Стиль Объяв ПЗ для Автомото
<Объяв короткий>З/части <Объяв ПЗ>Запчасти Стиль Объяв ПЗ для Запчасти
<Объяв короткий>Гаражи <Объяв ПЗ>Гаражи Стиль Объяв ПЗ для Гаражи
<Объяв короткий>Квартиры <Объяв ПЗ>Квартиры Стиль Объяв ПЗ для Квартиры
<Объяв короткий>Малосемейки <Объяв ПЗ>Малосемейки Стиль Объяв ПЗ для Малосемейки
<Объяв короткий>МАЛОСЕМЕЙКИ <Объяв ПЗ>Малосемейки Стиль Объяв ПЗ для Малосемейки
<Объяв короткий>Дома <Объяв ПЗ>Дома Стиль Объяв ПЗ для Дома
<Объяв короткий>Дачи, земучастки <Объяв ПЗ>Дачи, земучастки Стиль Объяв ПЗ для Дачи, Земучастки
<Объяв короткий>Одежда <Объяв ПЗ>Одежда Стиль Объяв ПЗ для Одежда
<Объяв короткий>Мебель <Объяв ПЗ>Мебель Стиль Объяв ПЗ для Мебель
<Объяв короткий>Животные <Объяв ПЗ>Животные Стиль Объяв ПЗ для Животные
<Объяв короткий>Бытовая техника <Объяв ПЗ>Бытовая техника Стиль Объяв ПЗ для Бытовая техника
<Объяв короткий>Всякая всячина <Объяв ПЗ>Всякая всячина Стиль Объяв ПЗ для Всякая всячина

«Сурф» «Toyota Surf» Исправляет марку автомобиля
«Тоwn-Асe» «Toyota Тоwn-Асe» Исправляет марку автомобиля
Т-Асе» Тоwn-Асe» Исправляет марку автомобиля
«Лит-Айс» «Toyota Lite-Ace» Исправляет марку автомобиля
«Сурф» «Toyota Surf» Исправляет марку автомобиля
Дюна» Dyna» Исправляет марку автомобиля
«Марк-II» «Toyota Mark II» Исправляет марку автомобиля
Камри» Camry» Исправляет марку автомобиля
«Корона» «Corona» Исправляет марку автомобиля

«М-Лансер» «Mitsubishi Lancer» Добавляет марку автомобиля Mitsubishi Lancer
«М-Кантер» «Mitsubishi Canter» Исправляет марку автомобиля
«Паджеро» «Mitsubishi Pajero» Исправляет марку автомобиля
«Делика» «Mitsubishi Delica» Исправляет марку автомобиля
«Мицубиси-Либеро» «Mitsubishi Libero» Исправляет марку автомобиля
«Fuso» «Mitsubishi Fuso» Исправляет марку автомобиля
«М-Паджеро» «Mitsubishi Pajero» Исправляет марку автомобиля
«М-Мираж» «Mitsubishi Mirage» Исправляет марку автомобиля
«ММС- «Mitsubishi Исправляет марку автомобиля
«Мицубиси-Паджеро» «Mitsubishi Pajero» Исправляет марку автомобиля

«М-Титан» «Mazda Titan» Исправляет марку автомобиля
«Мазда «Mazda Исправляет марку автомобиля
«Мазда-Титан» «Mazda Titan» Исправляет марку автомобиля
«М-Бонго» «Mazda Bongo» Исправляет марку автомобиля
Мазда-Титан Mazda Titan Исправляет марку автомобиля
«Субару-Легаси» «Subaru Legacy» Исправляет марку автомобиля
Субару Subaru Исправляет марку автомобиля
«И-Эльф» «Isuzu ELF» Исправляет марку автомобиля
Skuline» Skyline Исправляет марку автомобиля
Сузуки Suzuki Исправляет марку автомобиля

Ниссан Nissan Исправляет марку автомобиля


«Т- «Toyota Добавляет марку автомобиля Toyota
«T- «Toyota 2 Добавляет марку автомобиля Toyota
«N- «Nissan Добавляет марку автомобиля Nissan
«H- «Honda Добавляет марку автомобиля Honda

цв. Исправляет сокращения
цв/ цв. Исправляет сокращения
р-он р-н Исправляет сокращения
комн.ст.пл. комн. ст. пл. Исправляет сокращения
комн.нов.пл. комн. нов. пл. Исправляет сокращения


Моторола Motorolla Исправляет фирму
Панасоник Panasonic Исправляет фирму
Самсунг Samsung Исправляет фирму
Королла Corolla Исправляет фирму



P.S. ragman - отказался
P.S. 2 - 80 строк автозамены

 

[Natsvin]

Ответ: Ищу Скрипт Автозамены

Парни вы где все?
Я подумал и решил в режиме автозамена должно быть 3х колоночная таблица
1.) Найти
2.) Заменить на...
3.) Назначить стиль...

Т.е. Каждый чел. в соответствии со своими стилями в InDesign будет назначать их каждому абзацу

Вот!
Ребят, жду и надеюсь
У кого получится?
пишите в форум, на мыло и т.д.

 

[banIDit]

Ответ: Ищу Скрипт Автозамены

Оч. просто Ctrl D

Ладно, не хотите -- не надо, оставляю вас на растерзание собственному невежеству. Кто-то на этом хоть заработает.

 

[Natsvin]

Ответ: Ищу Скрипт Автозамены

Ещё раз привет
Нашёл то что искал!
Вопервых чтобы из обычного текста получить InDesign Tagged Text
нужно просто из InCopy CS2 "экспортировать" материал с настройкой "Unicode"
Внимательно расмотрел полученый текст
и добавил кой что в свой файл замен для AdvaSaR

Теперь объявления из 21000 символов чистятся и ставятся 2 секунды!
В Indesign вставляется всё с нужными мне стилями!
Красота да и только!


Кому интересно вот что вышло...

Замена 5 пробелов 1
Замена 4 пробелов 1
Замена 3 пробелов на 1
Замена 2 пробелов на 1
\r\n\r\n\r\n \r\n Замена 3 абзацев 1
\r\n\r\n \r\n Замена 2 Абзацев на 1
< # Замена < на #
# # Убирает лишний пробел
> Удаление
<ParaStyle:Объяв ПЗ>Автомото (?sr-igmx)-модификаторы поиска ${E}-режим замены
\r\n \r\n<ParaStyle:Объяв короткий> установка стиля Объяв короткий
<ParaStyle:Объяв короткий># <ParaStyle:Объяв выделенный> установка стиля Объяв Выделенный
<ParaStyle:Объяв короткий>Продают <ParaStyle:Объяв Заголовок>Продают Стиль Объяв заголовок для Продают
<ParaStyle:Объяв короткий>ПОКУПАЮТ <ParaStyle:Объяв Заголовок>Покупают Стиль Объяв заголовок для Покупают
<ParaStyle:Объяв короткий>Меняют <ParaStyle:Объяв Заголовок>Меняют Стиль Объяв заголовок для Меняют
<ParaStyle:Объяв короткий>Сдают <ParaStyle:Объяв Заголовок>Сдают Стиль Объяв заголовок для Сдают
<ParaStyle:Объяв короткий>Снимут <ParaStyle:Объяв Заголовок>Снимут Стиль Объяв заголовок для Снимут
<ParaStyle:Объяв короткий>Услуги <ParaStyle:Объяв Заголовок>Услуги Стиль Объяв заголовок для Услуги
<ParaStyle:Объяв короткий>Разное <ParaStyle:Объяв Заголовок>Разное Стиль Объяв заголовок для Разное
<ParaStyle:Объяв короткий>Требуются <ParaStyle:Объяв Заголовок>Требуются Стиль Объяв заголовок для Требуются
<ParaStyle:Объяв короткий>Благодарят <ParaStyle:Объяв Заголовок>Благодарят Стиль Объяв заголовок для Благодарят
<ParaStyle:Объяв короткий>Поздравляют <ParaStyle:Объяв Заголовок>Поздравляют Стиль Объяв заголовок для Поздравляют
<ParaStyle:Объяв короткий>Авто-мото <ParaStyle:Объяв ПЗ>Автомото Стиль Объяв ПЗ для Автомото
<ParaStyle:Объяв короткий>Автомото <ParaStyle:Объяв ПЗ>Автомото Стиль Объяв ПЗ для Автомото
<ParaStyle:Объяв короткий>З/части <ParaStyle:Объяв ПЗ>Запчасти Стиль Объяв ПЗ для Запчасти
<ParaStyle:Объяв короткий>Запчасти <ParaStyle:Объяв ПЗ>Запчасти Стиль Объяв ПЗ для Запчасти
<ParaStyle:Объяв короткий>Гаражи <ParaStyle:Объяв ПЗ>Гаражи Стиль Объяв ПЗ для Гаражи
<ParaStyle:Объяв короткий>Квартиры <ParaStyle:Объяв ПЗ>Квартиры Стиль Объяв ПЗ для Квартиры
<ParaStyle:Объяв короткий>Малосемейки <ParaStyle:Объяв ПЗ>Малосемейки Стиль Объяв ПЗ для Малосемейки
<ParaStyle:Объяв короткий>МАЛОСЕМЕЙКИ <ParaStyle:Объяв ПЗ>Малосемейки Стиль Объяв ПЗ для Малосемейки
<ParaStyle:Объяв короткий>Дома <ParaStyle:Объяв ПЗ>Дома Стиль Объяв ПЗ для Дома
<ParaStyle:Объяв короткий>Дачи, земучастки <ParaStyle:Объяв ПЗ>Дачи, земучастки Стиль Объяв ПЗ для Дачи, Земучастки
<ParaStyle:Объяв короткий>Одежда <ParaStyle:Объяв ПЗ>Одежда Стиль Объяв ПЗ для Одежда
<ParaStyle:Объяв короткий>Мебель <ParaStyle:Объяв ПЗ>Мебель Стиль Объяв ПЗ для Мебель
<ParaStyle:Объяв короткий>Животные <ParaStyle:Объяв ПЗ>Животные Стиль Объяв ПЗ для Животные
<ParaStyle:Объяв короткий>Бытовая техника <ParaStyle:Объяв ПЗ>Бытовая техника Стиль Объяв ПЗ для Бытовая техника
<ParaStyle:Объяв короткий>Всякая всячина <ParaStyle:Объяв ПЗ>Всякая всячина Стиль Объяв ПЗ для Всякая всячина

«Сурф» «Toyota Surf» Исправляет марку автомобиля
«Тоwn-Асe» «Toyota Тоwn-Асe» Исправляет марку автомобиля
Т-Асе» Тоwn-Асe» Исправляет марку автомобиля
«Лит-Айс» «Toyota Lite-Ace» Исправляет марку автомобиля
«Сурф» «Toyota Surf» Исправляет марку автомобиля
Дюна» Dyna» Исправляет марку автомобиля
«Марк-II» «Toyota Mark II» Исправляет марку автомобиля
Камри» Camry» Исправляет марку автомобиля
«Корона» «Corona» Исправляет марку автомобиля

«М-Лансер» «Mitsubishi Lancer» Добавляет марку автомобиля Mitsubishi Lancer
«М-Кантер» «Mitsubishi Canter» Исправляет марку автомобиля
«Паджеро» «Mitsubishi Pajero» Исправляет марку автомобиля
«Делика» «Mitsubishi Delica» Исправляет марку автомобиля
«Мицубиси-Либеро» «Mitsubishi Libero» Исправляет марку автомобиля
«Fuso» «Mitsubishi Fuso» Исправляет марку автомобиля
«М-Паджеро» «Mitsubishi Pajero» Исправляет марку автомобиля
«М-Мираж» «Mitsubishi Mirage» Исправляет марку автомобиля
«ММС- «Mitsubishi Исправляет марку автомобиля
«Мицубиси-Паджеро» «Mitsubishi Pajero» Исправляет марку автомобиля

«М-Титан» «Mazda Titan» Исправляет марку автомобиля
«Мазда «Mazda Исправляет марку автомобиля
«Мазда-Титан» «Mazda Titan» Исправляет марку автомобиля
«М-Бонго» «Mazda Bongo» Исправляет марку автомобиля
Мазда-Титан Mazda Titan Исправляет марку автомобиля
«Субару-Легаси» «Subaru Legacy» Исправляет марку автомобиля
Субару Subaru Исправляет марку автомобиля
«И-Эльф» «Isuzu ELF» Исправляет марку автомобиля
Skuline» Skyline Исправляет марку автомобиля
Сузуки Suzuki Исправляет марку автомобиля

Ниссан Nissan Исправляет марку автомобиля


«Т- «Toyota Добавляет марку автомобиля Toyota
«T- «Toyota 2 Добавляет марку автомобиля Toyota
«N- «Nissan Добавляет марку автомобиля Nissan
«H- «Honda Добавляет марку автомобиля Honda

цв. Исправляет сокращения
цв/ цв. Исправляет сокращения
р-он р-н Исправляет сокращения
комн.ст.пл. комн. ст. пл. Исправляет сокращения
комн.нов.пл. комн. нов. пл. Исправляет сокращения
Моторола Motorolla Исправляет фирму
Панасоник Panasonic Исправляет фирму
Самсунг Samsung Исправляет фирму
Королла Corolla Исправляет фирму





Объявления <UNICODE-WIN>\r\n<Version:4><FeatureSet:InDesign-Roman><ColorTable:=<Black:COLOR:CMYKrocess:0,0,0,1><Paper:COLOR:CMYKrocess:0,0,0,0>>\r\n<DefineParaStyle:Объяв Заголовок=<Nextstyle:Объяв Заголовок><cSize:15.000000><cCase:All Caps><pHyphenationLadderLimit:0><pAutoLeadPercent:1.130000><cLanguage:Russian><pHyphenationZone:34.000000><pSpaceBefore:5.650000><pSpaceAfter:2.850000><cFont:Arial Black><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pKeepLines:1><pRuleAboveColor:Black><pRuleAboveTint:100.000000><pRuleBelowColor:Black><pRuleBelowTint:100.000000><pTextAlignment:Center>>\r\n<DefineParaStyle:Объяв короткий=<cSize:6.800000><pHyphenationLadderLimit:0><pFirstLineIndent:11.350000><cLeading:7.000000><cLanguage:Russian><pHyphenationZone:34.000000><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pKeepLines:1><pRuleAboveColor:Black><pRuleAboveTint:100.000000><pRuleBelowColor:Black><pRuleBelowStroke:0.500000><pRuleBelowTint:65.000000><pRuleBelowOffset:0.900000><pRuleBelowOn:1><pTextAlignment:JustifyLeft>>\r\n<DefineParaStyle:Плашка=<Nextstyle:Плашка><cColoraper><cTypeface:Bold><pHyphenationLadderLimit:0><pAutoLeadPercent:1.130000><cLeading:12.000000><cLanguage:Russian><pHyphenationZone:34.000000><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pKeepLines:1><pRuleAboveColor:Black><pRuleAboveStroke:8.000000><pRuleAboveTint:100.000000><pRuleAboveOffset:2.267716><pRuleBelowColor:Black><pRuleBelowStroke:8.000000><pRuleBelowTint:100.000000><pRuleBelowOffset:-4.535434><pRuleAboveOn:1><pRuleBelowOn:1><pTextAlignment:Center>>\r\n<DefineParaStyle:TV-заголовок=<BasedOn:Плашка><Nextstyle:TV-заголовок><cSize:9.000000><cLeading:14.000000><pRuleAboveOffset:0.000000><pRuleBelowOffset:-6.519686>>\r\n<DefineParaStyle:Объяв ПЗ=<BasedOn:TV-заголовок><Nextstyle:Объяв ПЗ><cCase:All Caps><pSpaceBefore:5.650000><pSpaceAfter:2.850000>>\r\n<DefineParaStyle:Объяв выделенный=<BasedOn:Объяв короткий><Nextstyle:Объяв выделенный><cTypeface:Bold Italic>>\r\n

 

[lev]

Ответ: Ищу Скрипт Автозамены

Моторола Motorolla Исправляет фирму

после этой строки Вам надо теперь вставить еще строку
Motorolla Motorola Убирает лишнюю букву "l", вставленную скриптом

я не автомобилист и правильных написаний не знаю, но, на всякий случай, еще перепроверил бы строку
Дюна» Dyna»

 

[Natsvin]

Ответ: Ищу Скрипт Автозамены

ОК
Спасибо за Motorola

Если интересны марки японских авто-вот сайт
http://www.auto.vl.ru/catalog/

но Дюны там нет. Будем искать

 

[Natsvin]

Ответ: Ищу Скрипт Автозамены

Забыл написать
После AdvaSaR (обработки) нужно готовый файл открыть в Верд 2003 и сохранить как txt выбрав кодировку Unicod, а уж потом в Indesign

Экспортирую InDesign Tagged Text, Unicod а не ASCII потому-что пока неохото дописывать файл замены русских символов
<0x041C><0x043E><0x044F> <0x0431><0x043E><0x043B><0x044C><0x0448><0x0430><0x044F>
на эти коды
Если интересно напишите в InCopy русский алфавит и экспортируйте в InDesign Tagged Text, ASCII.

 

[Yurchick]

Ответ: Ищу Скрипт Автозамены

5 пробелов, 4 пробела - бред полнейший.
А с регулярными выражениями Вы знакомы?
Может проще будет так:

with(app){ // если курсор находится внутри Story
if ((selection[0].constructor.name == "InsertionPoint")&&(selection[0].parent.constructor.name == "Story")){
myStory = selection[0].parent;
with(myStory){
// меняем два или более пробела на один
contents = contents.replace (/  +/gm, " ");
// меняем один или более перевод строки или каретки на один перевод каретки
contents = contents.replace (/[\n\r]+/gm, "\r");
// меняем один пробел и перевод строки или каретки на один перевод каретки
contents = contents.replace (/ [\n\r]/gm, "\r");
// меняем пробел в начале строки на ничего
contents = contents.replace (/^ /gm, "");
// меняем сочетание "т. " на "т." + неразрывный_пробел
contents = contents.replace (/т\. +/gim, "т\.\u00A0");
// меняем что-то на что-то
contents = contents.replace ("Шило", "Мыло");
		}																	
	}	
}

 

[vbatushev]

Ответ: Ищу Скрипт Автозамены

Опасно вот так напрямую менять – слетают оформления в тексте.

 

[Yurchick]

Ответ: Ищу Скрипт Автозамены

Да Виталий! Про съезд выделений я забыл предупредить. Но судя по прыжкам типа верд адвасар и т.д. и т.п. об этом уже речь и не идет.

 

[Natsvin]

Ответ: Ищу Скрипт Автозамены

Еще проблема
Сделал файл автозамены для гороскопа
астролага Ремпеля
Вот. Вроде всё просто.
Но появилась заморока
Нужно выделять жирным числа с кокого по какое число конкретный знак зодиака - пример "(21 марта-20 апреля)."
У меня это выглядет так:
Искать Заменить на...
(21 марта-20 апреля). <ParaStyle:Основной><cTypeface:Bold>(21 марта-20 апреля).<cTypeface:>

Но после замены появляется две скобки и две точки вместо одной
((21 марта-20 апреля)..
Помогите пожалуйста разобраться.
Вот пример файла

Да, кстате, как в Адвасар обозначается точка.

Спасибо

Замена 5 пробелов 1
Замена 4 пробелов 1
Замена 3 пробелов на 1
Замена 2 пробелов на 1
\r\n Удаление Абзацев
ОВНЫ \r\nОвны\r\n
ТЕЛЬЦЫ \r\nТельцы\r\n
БЛИЗНЕЦЫ \r\nБлизнецы\r\n
РАКИ \r\nРаки\r\n
ЛЬВЫ \r\nЛьвы\r\n
ДЕВЫ \r\nДевы\r\n
ВЕСЫ \r\nВесы\r\n
СКОРПИОНЫ \r\nСкорпионы\r\n
СТРЕЛЬЦЫ \r\nСтрельцы\r\n
КОЗЕРОГИ \r\nКозероги\r\n
ВОДОЛЕИ \r\nВодолеи\r\n
РЫБЫ \r\nРыбы\r\n
\r\n \r\n
\r\n \r\n<ParaStyle:Основной> установка стиля Основной
<ParaStyle:Основной>Овны <ParaStyle:TV-заголовок>Овны
<ParaStyle:Основной>Тельцы <ParaStyle:TV-заголовок>Тельцы
<ParaStyle:Основной>Близнецы <ParaStyle:TV-заголовок>Близнецы
<ParaStyle:Основной>Раки <ParaStyle:TV-заголовок>Раки
<ParaStyle:Основной>Львы <ParaStyle:TV-заголовок>Львы
<ParaStyle:Основной>Девы <ParaStyle:TV-заголовок>Девы
<ParaStyle:Основной>Весы <ParaStyle:TV-заголовок>Весы
<ParaStyle:Основной>Скорпионы <ParaStyle:TV-заголовок>Скорпионы
<ParaStyle:Основной>Стрельцы <ParaStyle:TV-заголовок>Стрельцы
<ParaStyle:Основной>Козероги <ParaStyle:TV-заголовок>Козероги
<ParaStyle:Основной>Водолеи <ParaStyle:TV-заголовок>Водолеи
<ParaStyle:Основной>Рыбы <ParaStyle:TV-заголовок>Рыбы
Астролог \r\nАстролог
Астролог <ParaStyle:1 подпись> Астролог

(21 марта-20 апреля). <ParaStyle:Основной><cTypeface:Bold>(21 марта-20 апреля).<cTypeface:>
(21 апреля-21 мая). <ParaStyle:Основной><cTypeface:Bold>(21 апреля-21 мая).<cTypeface:>
(22 мая-21 июня). <ParaStyle:Основной><cTypeface:Bold>(22 мая-21 июня).<cTypeface:>
(22 июня-22 июля). <ParaStyle:Основной><cTypeface:Bold>(22 июня-22 июля).<cTypeface:>
(23 июля-22 августа). <ParaStyle:Основной><cTypeface:Bold>(23 июля-22 августа).<cTypeface:>
(23 августа-22 сентября). <ParaStyle:Основной><cTypeface:Bold>(23 августа-22 сентября).<cTypeface:>
(23 сентября-23 октября). <ParaStyle:Основной><cTypeface:Bold>(23 сентября-23 октября).<cTypeface:>
(24 октября-22 ноября). <ParaStyle:Основной><cTypeface:Bold>(24 октября-22 ноября).<cTypeface:>
(23 ноября-21 декабря). <ParaStyle:Основной><cTypeface:Bold>(23 ноября-21 декабря).<cTypeface:>
(22 декабря-18 января). <ParaStyle:Основной><cTypeface:Bold>(22 декабря-18 января).<cTypeface:>
(19 января-18 февраля). <ParaStyle:Основной><cTypeface:Bold>(19 января-18 февраля).<cTypeface:>
(19 февраля-20 марта). <ParaStyle:Основной><cTypeface:Bold>(19 февраля-20 марта).<cTypeface:>


Гороскоп <UNICODE-WIN>\r\n<Version:4><FeatureSet:InDesign-Roman><ColorTable:=<Paper:COLOR:CMYKrocess:0,0,0,0><Black:COLOR:CMYKrocess:0,0,0,1>>\r\n<DefineParaStyle:Плашка=<Nextstyle:Плашка><cColoraper><cTypeface:Bold><pHyphenationLadderLimit:0><pAutoLeadPercent:1.130000><cLeading:12.000000><cLanguage:Russian><pHyphenationZone:34.000000><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pKeepLines:1><pRuleAboveColor:Black><pRuleAboveStroke:8.000000><pRuleAboveTint:100.000000><pRuleAboveOffset:2.267716><pRuleBelowColor:Black><pRuleBelowStroke:8.000000><pRuleBelowTint:100.000000><pRuleBelowOffset:-4.535434><pRuleAboveOn:1><pRuleBelowOn:1><pTextAlignment:Center>>\r\n<DefineParaStyle:TV-заголовок=<BasedOn:Плашка><Nextstyle:TV-заголовок><cSize:9.000000><cLeading:14.000000><pRuleAboveOffset:0.000000><pRuleBelowOffset:-6.519686>>\r\n<DefineParaStyle:Основной=<Nextstyle:Основной><cSize:8.000000><pHyphenationLadderLimit:0><pFirstLineIndent:11.350000><cLeading:9.000000><cLanguage:Russian><pHyphenationZone:8.503937><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pRuleAboveColor:Black><pRuleAboveTint:100.000000><pRuleBelowColor:Black><pRuleBelowTint:100.000000><pTextAlignment:JustifyLeft>>\r\n<DefineParaStyle:1 подпись=<cTypeface:Bold Italic><cSize:8.000000><pHyphenationLadderLimit:0><pRightIndent:5.650000><pAutoLeadPercent:1.130000><cLanguage:Russian><pShortestWordHyphenated:3><pHyphenationZone:5.669291><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pKeepLines:1><pRuleAboveColor:Black><pRuleAboveStroke:0.500000><pRuleAboveTint:100.000000><pRuleBelowColor:Black><pRuleBelowTint:100.000000><pTextAlignment:Right>>\r\n

 

[Natsvin]

Ответ: Ищу Скрипт Автозамены

Привет всем
Я окончил свой файл автозамены Гороскопа для AdvaSaR
Теперь не нужно сохранять готовый файл в кодировке Юникод!!!
Сразу после обработки, файл вставляется в Indesign со стилями и т.д.и т.п.
Решил проблему со скобками и точками, Смотри вопрос выше
решил выделять жирным только число, а не скобки и точку и всё ОК

Кстати кому интересно в конце файла есть перекодировка русских символов в коды Adobe InDesign Tagged Text

Вот что собственно говоря вышло...


Замена 5 пробелов 1
Замена 4 пробелов 1
Замена 3 пробелов на 1
Замена 2 пробелов на 1
\r\n Удаление Абзацев
ОВНЫ \r\nОвны\r\n
ТЕЛЬЦЫ \r\nТельцы\r\n
БЛИЗНЕЦЫ \r\nБлизнецы\r\n
РАКИ \r\nРаки\r\n
ЛЬВЫ \r\nЛьвы\r\n
ДЕВЫ \r\nДевы\r\n
ВЕСЫ \r\nВесы\r\n
СКОРПИОНЫ \r\nСкорпионы\r\n
СТРЕЛЬЦЫ \r\nСтрельцы\r\n
КОЗЕРОГИ \r\nКозероги\r\n
ВОДОЛЕИ \r\nВодолеи\r\n
РЫБЫ \r\nРыбы\r\n
\r\n \r\n
\r\n \r\n<ParaStyle:Основной> установка стиля Основной
<ParaStyle:Основной>Овны <ParaStyle:TV-заголовок>Овны
<ParaStyle:Основной>Тельцы <ParaStyle:TV-заголовок>Тельцы
<ParaStyle:Основной>Близнецы <ParaStyle:TV-заголовок>Близнецы
<ParaStyle:Основной>Раки <ParaStyle:TV-заголовок>Раки
<ParaStyle:Основной>Львы <ParaStyle:TV-заголовок>Львы
<ParaStyle:Основной>Девы <ParaStyle:TV-заголовок>Девы
<ParaStyle:Основной>Весы <ParaStyle:TV-заголовок>Весы
<ParaStyle:Основной>Скорпионы <ParaStyle:TV-заголовок>Скорпионы
<ParaStyle:Основной>Стрельцы <ParaStyle:TV-заголовок>Стрельцы
<ParaStyle:Основной>Козероги <ParaStyle:TV-заголовок>Козероги
<ParaStyle:Основной>Водолеи <ParaStyle:TV-заголовок>Водолеи
<ParaStyle:Основной>Рыбы <ParaStyle:TV-заголовок>Рыбы
Астролог \r\nАстролог
Астролог <ParaStyle:1 подпись> Астролог

21 марта-20 апреля <ParaStyle:Основной><cTypeface:Bold>21 марта-20 апреля<cTypeface:>
21 апреля-21 мая <ParaStyle:Основной><cTypeface:Bold>21 апреля-21 мая<cTypeface:>
22 мая-21 июня <ParaStyle:Основной><cTypeface:Bold>22 мая-21 июня<cTypeface:>
22 июня-22 июля <ParaStyle:Основной><cTypeface:Bold>22 июня-22 июля<cTypeface:>
23 июля-22 августа <ParaStyle:Основной><cTypeface:Bold>23 июля-22 августа<cTypeface:>
23 августа-22 сентября <ParaStyle:Основной><cTypeface:Bold>23 августа-22 сентября<cTypeface:>
23 сентября-23 октября <ParaStyle:Основной><cTypeface:Bold>23 сентября-23 октября<cTypeface:>
24 октября-22 ноября <ParaStyle:Основной><cTypeface:Bold>24 октября-22 ноября<cTypeface:>
23 ноября-21 декабря <ParaStyle:Основной><cTypeface:Bold>23 ноября-21 декабря<cTypeface:>
22 декабря-18 января <ParaStyle:Основной><cTypeface:Bold>22 декабря-18 января<cTypeface:>
19 января-18 февраля <ParaStyle:Основной><cTypeface:Bold>19 января-18 февраля<cTypeface:>
19 февраля-20 марта <ParaStyle:Основной><cTypeface:Bold>19 февраля-20 марта<cTypeface:>

Гороскоп <ASCII-WIN>\r\n<Version:4><FeatureSet:InDesign-Roman><ColorTable:=<Paper:COLOR:CMYKrocess:0,0,0,0><Black:COLOR:CMYKrocess:0,0,0,1>>\r\n<DefineParaStyle:Плашка=<Nextstyle:Плашка><cColoraper><cTypeface:Bold><pHyphenationLadderLimit:0><pAutoLeadPercent:1.130000><cLeading:12.000000><cLanguage:Russian><pHyphenationZone:34.000000><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pKeepLines:1><pRuleAboveColor:Black><pRuleAboveStroke:8.000000><pRuleAboveTint:100.000000><pRuleAboveOffset:2.267716><pRuleBelowColor:Black><pRuleBelowStroke:8.000000><pRuleBelowTint:100.000000><pRuleBelowOffset:-4.535434><pRuleAboveOn:1><pRuleBelowOn:1><pTextAlignment:Center>>\r\n<DefineParaStyle:TV-заголовок=<BasedOn:Плашка><Nextstyle:TV-заголовок><cSize:9.000000><cLeading:14.000000><pRuleAboveOffset:0.000000><pRuleBelowOffset:-6.519686>>\r\n<DefineParaStyle:Основной=<Nextstyle:Основной><cSize:8.000000><pHyphenationLadderLimit:0><pFirstLineIndent:11.350000><cLeading:9.000000><cLanguage:Russian><pHyphenationZone:8.503937><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pRuleAboveColor:Black><pRuleAboveTint:100.000000><pRuleBelowColor:Black><pRuleBelowTint:100.000000><pTextAlignment:JustifyLeft>>\r\n<DefineParaStyle:1 подпись=<cTypeface:Bold Italic><cSize:8.000000><pHyphenationLadderLimit:0><pRightIndent:5.650000><pAutoLeadPercent:1.130000><cLanguage:Russian><pShortestWordHyphenated:3><pHyphenationZone:5.669291><cFont:Arial><pMaxWordSpace:1.500000><pMinWordSpace:0.750000><pMaxLetterspace:0.250000><pMinLetterspace:-0.050000><pKeepFirstNLines:1><pKeepLastNLines:1><pKeepLines:1><pRuleAboveColor:Black><pRuleAboveStroke:0.500000><pRuleAboveTint:100.000000><pRuleBelowColor:Black><pRuleBelowTint:100.000000><pTextAlignment:Right>>\r\n

А <0x0410>
Б <0x0411>
В <0x0412>
Г <0x0413>
Д <0x0414>
Е <0x0415>
Ё <0x0401>
Ж <0x0416>
З <0x0417>
И <0x0418>
Й <0x0419>
К <0x041A>
Л <0x041B>
М <0x041C>
Н <0x041D>
О <0x041E>
П <0x041F>
Р <0x0420>
С <0x0421>
Т <0x0422>
У <0x0423>
Ф <0x0424>
Х <0x0425>
Ц <0x0426>
Ч <0x0427>
Ш <0x0428>
Щ <0x0429>
Ъ <0x042A>
Ы <0x042B>
Ь <0x042C>
Э <0x042D>
Ю <0x042E>
Я <0x042F>
а <0x0430>
б <0x0431>
в <0x0432>
г <0x0433>
д <0x0434>
е <0x0435>
ё <0x0451>
ж <0x0436>
з <0x0437>
и <0x0438>
й <0x0439>
к <0x043A>
л <0x043B>
м <0x043C>
н <0x043D>
о <0x043E>
п <0x043F>
р <0x0440>
с <0x0441>
т <0x0442>
у <0x0443>
ф <0x0444>
х <0x0445>
ц <0x0446>
ч <0x0447>
ш <0x0448>
щ <0x0449>
ъ <0x044A>
ы <0x044B>
ь <0x044C>
э <0x044D>
ю <0x044E>
я <0x044F>

 

[Natsvin]

Ответ: Ищу Скрипт Автозамены

P.S.
Время на всю обработку в AdvaSaR - менее двух секунд!!!!!!!!!

 

[Yurchick]

Ответ: Ищу Скрипт Автозамены

А кто подскажет юникоды "\uXXXX" для "Nonbreaking Hyphen" (^~)
и других управляющих?
Оно конечно можно по-дубовому -> вставить -> скопировать куда-нибудь в FAR -> посмотреть в HEX mode, а так что бы с`писком :?)

 

[Yurchick]

Ответ: Ищу Скрипт Автозамены

Нашел с`писком !

Program Files\Common Files\Adobe\TypeSpt\Unicode\UniData\EastAsianWidth.txt
или
Program Files\Common Files\Adobe\TypeSpt\Unicode\UniData\UnicodeData.txt

Но транслитерация забавная:

[фрагмент EastAsianWidth.txt]
0423;A;CYRILLIC CAPITAL LETTER U
0424;A;CYRILLIC CAPITAL LETTER EF
0425;A;CYRILLIC CAPITAL LETTER HA
0426;A;CYRILLIC CAPITAL LETTER TSE
0427;A;CYRILLIC CAPITAL LETTER CHE
0428;A;CYRILLIC CAPITAL LETTER SHA
0429;A;CYRILLIC CAPITAL LETTER SHCHA // Если я бы читал это на английском то прочел бы Шча :?)
042A;A;CYRILLIC CAPITAL LETTER HARD SIGN
042B;A;CYRILLIC CAPITAL LETTER YERU // А здесь надо сильно лоб наморщить угадывая букву Ы :?)
042C;A;CYRILLIC CAPITAL LETTER SOFT SIGN
042D;A;CYRILLIC CAPITAL LETTER E
042E;A;CYRILLIC CAPITAL LETTER YU
042F;A;CYRILLIC CAPITAL LETTER YA
0430;A;CYRILLIC SMALL LETTER A
0431;A;CYRILLIC SMALL LETTER BE
0432;A;CYRILLIC SMALL LETTER VE
0433;A;CYRILLIC SMALL LETTER GHE
0434;A;CYRILLIC SMALL LETTER DE
0435;A;CYRILLIC SMALL LETTER IE
0436;A;CYRILLIC SMALL LETTER ZHE
0437;A;CYRILLIC SMALL LETTER ZE
0438;A;CYRILLIC SMALL LETTER I
0439;A;CYRILLIC SMALL LETTER SHORT I
043A;A;CYRILLIC SMALL LETTER KA

 

[vbatushev]

Ответ: Ищу Скрипт Автозамены

Charmap ближе, доступнее и нагляднее.

 

[Yurchick]

Ответ: Ищу Скрипт Автозамены

Charmap ближе, доступнее и нагляднее.

Он кажет только то что в шрифте.
Попробуй найти в нем Nonbreaking hyphen (\u2011 - то что я спрашивал двумя постами выше)

 

[niko1]

Ответ: Ищу Скрипт Автозамены

P.S.
Время на всю обработку в AdvaSaR - менее двух секунд!!!!!!!!!

не может быть , обычно занимает 3-4 секунды.

 

[Sanchos]

Ответ: Ищу Скрипт Автозамены

Прочитав этот топик наверное целый день хихикать буду))))
А вообще, по мойму, проще всякие там автозамены и подобную *** сделать в EmEditor, там тебе и макросы(все автозамены можно просто записать, кто не умеет ручками макросы писать!) и регексы поддерживаются и работает шустро, красота одним словом)))))

 

[vbatushev]

Ответ: Ищу Скрипт Автозамены

Он кажет только то что в шрифте.
Попробуй найти в нем Nonbreaking hyphen (\u2011 - то что я спрашивал двумя постами выше)

Легко. Смотрим аттач.