Author Topic: Удалить лишние пробелы из текста  (Read 1606 times)

0 Members and 1 Guest are viewing this topic.

vvm32

  • Зашел в гости
  • *
  • Posts: 2
    • View Profile
Есть текст такого вида:
Quote
Поршневые п р я м о х о д н ы е п р и в од ы д в у с т о р о н н е г о д ей ств и я с п ост у п а т ел ь н ы м д в и ж е н и е м в ы х о д н о г о ш т о к а
Поршневые п р и в од ы д в у с т о р о н н е г о д е й с т в и я с ф и к сац и ей к р а й н и х п о л о ж е н и й п о р ш н я
Поршневые п р и в од ы д в у с т о р о н н е г о д е й с т в и я с вращ ательн ы м д в и ж е н и е м в ы х о д н о го в а л а
Поршневые п р и в оды о д н о с т о р о н н е г о д е й с т в и я
Встроенные п о р ш н е в ы е п р и в о д ы

Я набросал скриптик на лету удалять пробелы через буфер обмена, здесь ничего сложного:

Code: (clickermann) [Select]
IF(iskeydown(#shift)=1)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#C)
   WAITMS (50)
   KEYUP (#C)
   KEYUP (#CTRL)
   $a= FROMCLIP()
   
  $b= STRFILTER($a, " ", 0)
   TOCLIP($b)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYDOWN (#V)
   WAITMS (50)
   KEYUP (#V)
   KEYUP (#CTRL)
   
   
   
END_IF


Но эту вручную приходится выделять каждое слово и жать шифт, для удаления пробелов. А можно ли подключить файл с базой слов, искать в нем, удаляя пробелы и сравнивая с эталонным словариком?

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Удалить лишние пробелы из текста
« Reply #1 on: May 13, 2017, 12:45:34 PM »
Сделал скрипт.

Работает так. Запускаешь кликер, выделяешь весь текст и жмешь Shift. Далее выскочит вопрос что делать. Если выбрать Да весь текст будет проверен по словарю, все совпавшие слова будут заменены.
Если выбрать Нет то перейдешь к добавлению слова в словарь, можно отказаться тогда ничего не будет.
Естественно перед добавлением нужно выделить конкретное слово а не весь текст!
« Last Edit: May 13, 2017, 12:48:11 PM by Oraven »