Скрипты на заказ :)

[Sane]

От скуки - пишу сабж. <!--emo&:)--><!--endemo--> Условия - скрипт должен быт интересным и полезным. <!--emo&:)--><!--endemo-->

[Ergo]

А вот хотелось бы скрипт осуществляющий форматирование и разбиение на строки. Вводишь в текстовый редактор текст. А он идет весь в одну строку. Выполняем скрипт - а он разбивает эту строку на подстроки да так, что в каждой строке не более N символов. Ну и естественно форматирование по ширине вообще было бы супер <!--emo&:)--><!--endemo--> У меня что-то пока не получается <!--emo&:(--><!--endemo-->

[dAnIK SeNT]

Присоединяюсь - такой скрипт действительно очень нужен.

[Ergo]

2dAnIK SeNT
В EditPlus есть Ctrl+Shift+K и Ctrl+Shift+J. Типа разъединить и соединить. Но разъединять он будет по границе переноса. А она у меня для html-писем установлена на всю ширину. А надо мне всего 80 символов.

[Sane]

2Ergo
Текст только в одну строку? Выравнивание по ширине пробелами?
Отчего не поробовать. <!--emo&;)--><!--endemo-->

[Ergo]

2Sane
<!--QuoteBegin--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>QUOTE </td></tr><tr><td id='QUOTE'><!--QuoteEBegin-->Текст только в одну строку?<!--QuoteEnd--></td></tr></table><span class='postcolor'><!--QuoteEEnd-->
Отчего же. Может быть и в несколько строк. Ведь не сложно перед обработкой их соединить. Хотя с другой стороны выделив несколько строк... Впрочем это не главное. Тут уже изменить будет плевое дело.

<!--QuoteBegin--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>QUOTE </td></tr><tr><td id='QUOTE'><!--QuoteEBegin-->Выравнивание по ширине пробелами? <!--QuoteEnd--></td></tr></table><span class='postcolor'><!--QuoteEEnd-->
да

[Ergo]

2Sane
Возможно тебе пригодится функция .explode

Код: выделить все

;; stringexplode.txt - 25.01.2003 by Mockey
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Script that mimics the PHP-function explode() with PowerPro-vectors
;; vector-plugin (vec.dll) has to be installed
;; usage:
;; myArr = .stringexplode(separator, string)
;; creates a new vector by dividing a string into several elements
;; using a separator, returns a handle to that vector
;; i.e. .stringexplode("-", "test1-test2-test3")
;; returns vector with elements "test1", "test2", "test3"
;; important: the resulting vector should be destroyed after usage!
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



eText = arg(2)

v = vec.create(10, 10)

For (i = 0; i >= 0; i = i + 1)

   If (index(eText, arg(1)) do

 ePart = select(eText, index(eText, arg(1)) - 1)

 eText = remove(eText, index(eText, arg(1)) + length(arg(1)) - 1)

 vec.set(v, i, ePart)

   Else

 vec.set(v, i, eText)

 break

   EndIf

EndFor

Quit(v)



[Strateg]

Нужен скрипт... В общем, в основном сабже читал про скрипт, который при нажатии Esc выполняет различные действия для прог с различными заголовками. Удобно. Но мне пришлось от него отказаться, т.к. есть проги, которые нормально обрабатывают этот Esc своими средствами. Смысл в чем,
Вот этот скрипт:
if ((activewindow "Lister -*") or (activewindow "Поиск") or (activewindow "*Arm*") or (activewindow "Configure Windows PowerPro - *") or (activewindow "*EmEditor") or (activewindow "DBFViewer 2000*") or (activewindow "View64*")) Do
Window Close active
Elseif (activewindow "*Arm*")

Else
Window Min active
EndIf

Не могу понять, как в нем сделать игнор-лист прог, которые не будут попадать под влияние этого скрипта.
Заранее спасибо.

[Sane]

Я сделал так. Вроде как работает. Все те окна, которые здесь не прописаны - сами обрабатывают Esc.

Код: выделить все


if ((activewindow "=explorer")) Do

   Window Min active

Else

   if ((activewindow "*ACDSee v3.1,EditPlus - *") or (activewindow "=hh.exe")) Do

 Window Close Active

   Else

 keys {slow}{esc}

   Endif

Endif

[Ergo]

2Sane
Хм. Логично. Я до этого не додумался <!--emo&:)--><!--endemo-->

[Strateg]

А до меня не все дошло. Для чего нужно проверять <!--QuoteBegin--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>QUOTE </td></tr><tr><td id='QUOTE'><!--QuoteEBegin-->((activewindow "=explorer"))<!--QuoteEnd--></td></tr></table><span class='postcolor'><!--QuoteEEnd-->
?
И что с ним будет происходить?

[Sane]

На сколько я себя понимаю - смотрим, если окно эксплорера - то мы его сворачиваем. <!--emo&;)--><!--endemo-->

[Strateg]

Это ясно. Для чего его нужно сворачивать??

[Sane]

Блин. <!--emo&:)--><!--endemo--> Хочу - сворачиваю. <!--emo&:)--><!--endemo--> Не хочешь - убей эту строчку и не сворачивай. <!--emo&;)--><!--endemo-->

[Scalder]

2Sane
А можно так <a href='http://fileforum.ru/viewtopic.php?t=4842' target='_blank'>http://fileforum.ru/viewtopic.php?t=4842</a>