Messages

1

Прочее / Re: Простое тестовое задание. Алгоритм Луна

« on: June 03, 2017, 06:46:07 AM »

Кстати, приятно, что винт сослался на мою тему(кликермен) с задачками. Я сейчас для одного сайта с книгами пишу скриптики для выкладывания файлов, и так далее. Все игры забросил. Кому будут нужны книги или баллы на twirpx.com - обращайтесь)

2

Общие вопросы / Удалить лишние пробелы из текста

« on: May 13, 2017, 11:14:17 AM »

Есть текст такого вида:

Поршневые п р я м о х о д н ы е п р и в од ы д в у с т о р о н н е г о д ей ств и я с п ост у п а т ел ь н ы м д в и ж е н и е м в ы х о д н о г о ш т о к а
Поршневые п р и в од ы д в у с т о р о н н е г о д е й с т в и я с ф и к сац и ей к р а й н и х п о л о ж е н и й п о р ш н я
Поршневые п р и в од ы д в у с т о р о н н е г о д е й с т в и я с вращ ательн ы м д в и ж е н и е м в ы х о д н о го в а л а
Поршневые п р и в оды о д н о с т о р о н н е г о д е й с т в и я
Встроенные п о р ш н е в ы е п р и в о д ы

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

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


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