» Windows PowerPro

Updated Windows PowerPro 4.7.02 is available at
http://powerpro.webeddie.com/download/ppro4702.zip

Fixed problem with continuation and changed powerpro.exe version to
4.7.02a

Windows PowerPro 4.7.03
http://powerpro.webeddie.com/download/ppro4703.zip

One more itch. var[n] syntax can be used to access or change nth character in string. (If n is a non-integer string, it is still a regular expression call).

Zero-based indexing is used, so I provided zero-based find and revfind and slice and deprecated index and revindex and select (which means they still work the same but are not documented as fully).

Also improved error messages to show call stack.

You can use the syntax var[n] to reference a character in the string held by the variable and var[n,m] to represent an inclusive range.
Here n and m represent any expression yielding an integer. The first character is numbered 0. For negative integers, -n is equivalent to length(var)-n (so –1 is the last character). You can use

var[n] = expr

to replace the nth character in the string by the expr, which can be any length (including 0). Samples:

local var="abcde"
var[0] // yields "a"
var[2,3] // yields "cd"
var[-5,-2] // yields "abcd"
var[3]="*" // sets var to abc*e
var[3]="123" // sets var to abc123e
var[1,4]="" // sets var to "a"

кто может подсказать или направить в нужную сторону?
в статье от Вахмурки о PowerPro, есть следующее:
Существуют, в частности, панели (bars), к которым можно даже составлять свои скины или использовать готовые, и исполнять разные команды не только левой, но и правой и даже средней кнопками крысы. Кроме того, панели PowerPro поддерживают drag-n-drop.

соответственно вопрос:
как сделать в total commander выпадающее меню по типу TCMenu с поддержкой скинов и drag-n-drop? причем с акцентом именно на drag-n-drop

и сразу второй вопрос: можно будет чтобы в это меню с помощью drag-n-drop передавалась команда на открытие сразу нескольких (выделенных) файлов?

если есть возможность, был бы крайне признателен увидеть пример такого меню, которое работало бы из TC

Посоветуйте, пожалуйста, лучшее решение по нескольким вопросам.

1) При запуске любой программы из панели/меню PowerPro в списке последних открытых документов меню "Пуск" записывается ссылка на нее. Меню разбухает, приходится несколько раз за день чистить, но при этом пропадают и ссылки на документы, чего хотелось бы избежать. Ссылки на использованные программы не создаются, если запускать их не указанием полного имени, а через конструкцию Do(), но тогда в PowerPro не срабатывает указание "Switch to if active".

2) Панель определена как постоянно видимая в верхней части экрана. В PowerPro можно задать показывать панели для определенных окон *Format Context. Интересует обратная возможность: скрывать панель для определенных окон. Причем не делать невидимой (в этом случае место на экране не освобождается), а закрывать, если определенное окно выходит на первый план, и при этом иметь возможность отобразить панель по горячим клавишам.
Думаю, для этого нужен скрипт, но после нескольких тяжелых зависаний в результате опытов с HookWindowEvents я уж и боюсь пробовать. Может у кого есть подобное решение?

Подскажите кто-нибудь, пожалуйста, можно-ли повесить на горячую клавишу выполнение пункта контекстного меню проводника, точнее, пункта, вставленного туда какой-нибудь программой. В частности меня интересует Unlocker. И вообще, не даст ли кто ссылочку, где посмотреть, какая команда выполняется в Винде при нажатии пункта контекстного меню. Конечно, если этот пункт связан с ключом реестра "shell", то тут все понятно, а вот если "shellex", то как это работает, нигде не могу найти. Заранее благодарен.

Вот уж не знаю про пункты меню проводника, а повесить Unlocker на клавишу - как два байта отослать . Он поддерживает командную строку, если вы не в курсе. Запустите Unlocker -H, и увидите сообщение со списком доступных команд. Дальше - дело техники...

Добавлено:
Скачал версию 4,7,0,3 а там написано повсюду что это 4.8... Это как понимать?

Windows PowerPro 4.7.05
http://powerpro.webeddie.com/download/ppro4705.zip

- added classes and objects
- added exec scripttrace
- quit (x) no longer frees x if x is vector or map
- imports (path) vvv now makes vvv static, not local

Запускаю outlook из сабжа, активна switch if active.
Но при повторном клике на баре запускается вторая копия...
Как бороть?

iNSiDE2007
Нельзя ли поподробнее про Unlocker? Справку-то я почитал, попробовап по-разному, но что-то ни фига не получается.

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

Цитата:

Так вот в ней панельки открываются только если на краю экрана нажать правую клавишу. Нельзя ли такую же штуковину проделать и с PowerPro?

Хм... по правой клавише наскоком не получилось, а вот можно с зажатым Ctrl легко....

Обновлен русификатор до версии 4.7.05. http://ledsoft.narod.ru

shurik109

Цитата:

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

Не трудно: зайди в клавиши/мышь повесь на right anywhere, а там где написано для определенных окон вставь/выбери @right.

все.


Добавлено:
Забыл, для команд, конечно же вставь: *Bar Show имя_панели

Windows PowerPro 4.7.06
http://powerpro.webeddie.com/download/ppro4706.zip

brucexs:
- Added structures
- updated pcre.dll, pcreposix.dll, regex.chm
Upcoming I hope: a plugin version

Знающие люди. Подскажите пожалуйста.

Есть скрипт называеться Tags.txt :

If ((activewindow "EditPlus - *") or (activewindow "*BRED*")) Do
Clip Text &(arg(1))
Clip.Paste
Keys {left &(arg(2))}
Endif

при создании хоткея вводяться параметры:

.Tags("<HTML>'n<HEAD>'n</HEAD>'n<BODY>'n</BODY>'n</HTML>","16")

При нажатии хоткея скрипт должен написать все эти теги и поставить курсор после тега BODY, но он не работает. Строки не переносяться.
Подскажите пожалуйста как исправить скрипт или посоветуйте какой-либо другой.

Windows PowerPro 4.7.07
http://powerpro.webeddie.com/download/ppro4707.zip

- added mousegesture plugin
- added shutdown monitor

Updated beta 4.7.07 to add a couple of features to mouse gesture.
- you can specify a modifier key like ctrl to disable
- you can specify a command separator
- you can specify a max time for stroke

Установил последнею версию сабжа, все пока хорошо, но обнаружил одно ложку дегтя:
в панели задач, то и дело начинают мигать задачи (как обычно бывает, когда в этой задаче что-то произошло, например получено новое icq сообщение). Это баг или фича? Тут многие говорили, что диспетчер задач можно смело убирать, тогда обратный вопрос: когда действительно приложение должно мигать, это будет видно?

Andrei45
Не было такого никогда, а версия 4.7.07?



Добавлено:
Кстати как там управлять mousegesture plugin?

А есть плагин для вставки html-тэгов? Помню был плагин для вставки форумных тэгов, но он уже давно не работает с новыми версиями PP.

Petrik Pyatochkin
А что именно делал плагин?
Возможно имеется в виду скрипт, а не плаг.

Напиши, если это скрипт, то написать его не сложно

У меня два вопроса.
Первый:
нашол в инете пример скрипта


Цитата:

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

Можно сделать чтобы на Ctrl-A вставлялся тег <A HREF=>, на Alt-A закрывающий </A>, а на Ctrl-Alt-A и открывающий, и закрывающий, а курсор встанет между ними <A HREF=></A>. У себя я сделал горячие клавиши для тегов <A href=></A>, <B></B>, <CENTER></CENTER>, <BR>, <FONT COLOR=></FONT>, а также вставку такой конструкции:

<HTML>
<HEAD>
</HEAD>
<BODY bgcolor=>

</BODY>
</HTML>

и помещение курсора после тега <BODY>. Эта конструкция у меня вставляется нажатием Ctrl-Alt-H.

Поле Enter more commands... :
.Tags("<HTML>'n<HEAD>'n</HEAD>'n<BODY>'n</BODY>'n</HTML>","16")



Для того чтобы символы 'n воспринимались, как перевод на новую строку, необходимо поставить галочку
Advanced Setup | Characters | Use quote ' for escape in expression strings.

так вот я скачал последнюю версию powerpro и там галочка (Advanced Setup | Characters | Use quote ' for escape in expression strings.) неактивна и когда я нажимаю этот скрипт он мне пишет его слитно, тоесть вот так:


Цитата:

<HTML>'n<HEAD>'n</HEAD>'n<BODY bgcolor=>'n</BODY>'n</HTML>

подскажите плс как сделать так чтобы powerpro переносил строки.


Вопрос номер два:

Есть скрипт:

Цитата:

my_tag=inputcancel("Введите TAG")
Clip Copy
my_tag="<" ++ my_tag ++ ">" ++ Clip ++ "</" ++ my_tag ++ ">"
Clip Text &(my_tag)
Clip Paste

при выделении какого либо текста и нажатии забинденной клавиши выскакивает окошко и когда туда вписываеш тег он автоматически обрамляет выделенный текст. Очень удобно. Но есть одна проблема, обрамляет текст есть только выделено не больше одной строки.
Тоесть если выделить вот такой текст:


Цитата:

111
222
333

и нажать ОК - то он обрамит тегом только первую строку:



Цитата:

<b>111</b>

подскажите пожалуйста решение етих двух проблем.
Или подскажите какой-либо скриптик.
Было бы очень неплохо если бы был такой скрипт который при выделенном тексте и нажатии допустим комбинации alt+b обрамлял <b>текст</b>
при нажатии alt+p - <p>текст</p>
и так далее. Если такой скрипт есть буду очень благодарен.

По тупому вставлять теги
Цитата:

<b>текст</b>

Можно повесив на нужную клавишу (в поле больше команд, нум-лок должен быть включен):


*Clip Copy
*Wait 1
*Keys {alt}{n1}{n7}{alt}{alt}{n9}{n8}{alt}{alt}{n1}{n1}{alt}
*Wait 1
*Clip Paste
*Wait 1
*Keys {alt}{n1}{n7}{alt}{alt}{n4}{n7}{alt}{alt}{n9}{n8}{alt}{alt}{n1}{n1}{alt}



Ну а
Цитата:

<p>текст</p>

, соответственно

*Clip Copy
*Wait 1
*Keys {alt}{n1}{n7}{alt}{alt}{n1}{n1}{n2}{alt}{alt}{n1}{n1}{alt}
*Wait 1
*Clip Paste
*Wait 1
*Keys {alt}{n1}{n7}{alt}{alt}{n4}{n7}{alt}{alt}{n1}{n1}{n2}{alt}{alt}{n1}{n1}{alt}

Медленно и буфер засоряется, но это можно исправить

loat
rrsi
Ребята, однозначно, чтобы не было проблем с буфером обмена (да еще с криллистическими символами, обязательно должен быть запущен майкрософтоский
C:\WINDOWS\system32\ctfmon.exe

apexfmm

Это ты зачем?

Добавлено:
В смысле ты его специально убиваешь?

Цитата:

В смысле ты его специально убиваешь

лично я убил его раз и навсегда - мне Ninja вполне хватает

loat

Цитата:

Или подскажите какой-либо скриптик.
Было бы очень неплохо если бы был такой скрипт который при выделенном тексте и нажатии допустим комбинации alt+b обрамлял <b>текст</b>
при нажатии alt+p - <p>текст</p>

Есть такой скрипт дпя вставки BB кодов


Код: Clip.IgnoreNext
*Clip Copy
*Wait for 100
if (arg(2)=="") Do
Local begintag = "[" ++ arg(1) ++ "]"
Else
Local begintag = "[" ++ arg(1) ++ "=" ++ arg(2) ++ "]"
EndIf
clip.IgnoreNext
clip.setPaste(begintag ++ clip.get ++ "[/" ++ arg(1) ++ "]")

HNK

Цитата:

создать список HookWindowEvents и оттуда вызывать скрипт

Код:
Local hh=win.handle("c=КлассОкна")
if(activewindow(hh))do
*Bar Close имя_панели
endif
Quit

Вопрос не в том, чтобы только автоматически закрывать панель при активизации определенного окна, но чтобы показать при переходе в другое окно.

Получился такой скрипт:

/*
BarHider

Скрытие/отображение панель для отдельных программ.
Панель не скрывается для программ, окно которых не развёрнуто максимально.
*/


// Если панель выключена вручную никаких действий не выполняется

If ( PProFlag( 0 ) == 0 ) Do

Local hWnd = Win.Handle( "=FireFox" )

If ( ActiveWindow( hWnd ) == 0 ) Do
Jump BarShow
Else

// Отловлено окно требуемой программы и это окно не развёрнуто
// во весь экран

If ( Win.Maxxed( hWnd ) ) Do
If ( cl.GetBarHandle( "(Top)" ) != "" ) Do
cl.Close( "(Top)" )
Endif
Else
Jump BarShow
Endif

Endif

Endif

Quit


// Включить панель при её отсутствии

@BarShow

If ( cl.GetBarHandle( "(Top)" ) == "" ) Do
cl.Show( "(Top)" )
Endif

Quit


// Ручное выключение/ включение панели

Function Visible
If ( cl.getBarHandle( "(Top)" ) == "" ) Do
cl.Show( "(Top)" )
Flag clear 0 0
Else
cl.Close( "(Top)" )
// Отметка "Панель выключена вручную"
Flag set 0 0
EndIf

Quit

В HookWindowEvents вставляется вызов .BarHider, дополнительно на горячую клавишу навешивается .BarHider@Visible для ручного управления.

to Uldamir
Так проблема решена, тот скрипт что вы привели работает?

HNK

Цитата:

Так проблема решена, тот скрипт что вы привели работает?

В данный момент он у меня включен и пока ничего страшного не произошло.
В качестве комментариев:
"(Top)" - это, конечно, имя контролируемой панели
Win.Handle( "=FireFox" ) - скрытие в окне Firefox. Но можна указать и несколько программ Win.Handle( "=FireFox, =Bred2r" )

Есть командный список в котором командами являются *Menu Folder
Список отформатирован (командами *Format) так, чтобы папки раскрывались автоматически. Для этого же в окне настороек *Menu Folder format отмечена галочка "Embed *Menu Folder in outer menu". Для каждой папки, при выборе файла, назначены различные команды. На пальцах долго объяснять, в качестве примера можете импортировать и посмотреть нижеприведенный список, запускать его как меню. команды там для примера, просто выводят в окно debug window различные часть пути к файлу.

Код:
[MenuOfFolderMenu:Properties]
Format1 = IconSize: 16 Position: Floating
Format2 = MaxText: 531
Format3 = Flat
Format4 = TopMost Border AllVDesks 3DFrame TextCenter BarSize

[1]
Label = path
LCmd1 = *Format
LParam1 = StartSubmenu
MCmd1 = (none)
RCmd1 = (none)

[2]
Label = path
LCmd1 = *Menu
LParam1 = Folder C:\Program Files\PowerPro\plugins
LWork1 = embed tiptext tooltips Maxtext 32 cmd "win.debug(_file_)"
MCmd1 = (none)
RCmd1 = (none)

[3]
LCmd1 = *Format
LParam1 = EndSubmenu
MCmd1 = (none)
RCmd1 = (none)

[4]
Label = file.name
LCmd1 = *Format
LParam1 = StartSubmenu
MCmd1 = (none)
RCmd1 = (none)

[5]
Label = file.name
LCmd1 = *Menu
LParam1 = Folder C:\Program Files\PowerPro\clip
LWork1 = embed tiptext tooltips Maxtext 32 cmd "win.debug(file.name(_file_))"
MCmd1 = (none)
RCmd1 = (none)

[6]
LCmd1 = *Format
LParam1 = EndSubmenu
MCmd1 = (none)
RCmd1 = (none)

[7]
Label = file.type
LCmd1 = *Format
LParam1 = StartSubmenu
MCmd1 = (none)
RCmd1 = (none)

[8]
Label = file.type
LCmd1 = *Menu
LParam1 = Folder C:\Program Files\PowerPro\scripts\
LWork1 = embed tiptext tooltips Maxtext 32 cmd "win.debug(file.type(_file_))"
MCmd1 = (none)
RCmd1 = (none)

[9]
LCmd1 = *Format
LParam1 = EndSubmenu
MCmd1 = (none)
RCmd1 = (none)