MenuTools OS 3.2 ToolsDaemon

[Octopus66]

I have been testing out MenuTools and can get it to launch programs without issue. Does anyone know if I can replicate the behavior of ToolsDaemon where you can click an icon and have a program interact with the selected file?

[daxb]

Yes, it is possible.

[Octopus66]

Do you have any clues how to script this? I am a bit lost. Thanks

[daxb]

I don't know where are the ARexx scripts placed. Maybe in S: directory? You can use this as a template if the script has "use-selected-icons" functionality. I think the new version of http://aminet.net/package/util/wb/EjectADF can be used as a template too. However, the Workbench ARexx port is documented if you want to read/learn.

[Octopus66]

Thanks for the link - I am struggling with this however.

I am receiving command returned 10.

My script is:
GETATTR WINDOW.ICONS.ALL.COUNT
SAY Result

Not following the error..??

Thanks

[daxb]

Sorry, that is not a valid Arexx script which starts always with a comment:

/**/

Then if you want to talk to the Workbench ARexx Port then you need to address it:

ADDRESS WORKBENCH

( https://wiki.amigaos.net/wiki/AmigaO...ctions#ADDRESS )

If you want/need to use the special variable RESULT then you need to "activate" it with:

OPTIONS RESULTS

( https://wiki.amigaos.net/wiki/AmigaO...ctions#OPTIONS )

Also check http://aminet.net/package/util/wb/THE2 and https://wiki.amigaos.net/wiki/AmigaOS_Manual:_ARexx and http://aminet.net/search?name=arexxguide2

[Octopus66]

Thanks for the pointers - great thread here too https://eab.abime.net/showthread.php?t=81558

Hopefully won't take me long to work this out now

[Octopus66]

I managed to replicate the behavior from ClassicWB where you can open a shell at a selected directory by clicking the folder "Dir->Shell" which I always found super useful.

AmigaDOS Script - S:OpenShell

.key DIR
cd "<DIR>"
Newshell WINDOW=CON:0/200//100/AmigaShell/CLOSE/

ARexx Script REXX: DirShell.rexx (copied and modified from thread linked above posted by Korodny)

/* $VER: DirShell */
ADDRESS WORKBENCH
OPTIONS RESULTS

GETATTR WINDOWS.ACTIVE

ActiveWin = result

GETATTR WINDOW.ICONS.SELECTED name ActiveWin stem ActiveWinIcons

SourceFile = ActiveWin
if right(SourceFile,1) ~= ":" then SourceFile = SourceFile || "/"
SourceFile = SourceFile || ActiveWinIcons.0.name

address command 'Execute S:Openshell "'SourceFile'"'

[Octopus66]

I have updated this script as the one above did not work with volumes or "root" directories.
Now also works for selected directory icons and directory windows without icons selected.
Should now only error when a file is selected rather than empty selection, or a directory.

/* $VER: DirShell v1.2 */
ADDRESS WORKBENCH
OPTIONS RESULTS

GETATTR WINDOWS.ACTIVE

ActiveWin = result

GETATTR WINDOW.ICONS.SELECTED name ActiveWin stem ActiveWinIcons

SourceFile = ActiveWin
if right(SourceFile,1) ~= ":" then SourceFile = SourceFile || "/"
SourceFile = SourceFile || ActiveWinIcons.0.name
if right(SourceFile,21) = "ACTIVEWINICONS.0.NAME" then SourceFile = DELSTR( SourceFile, LENGTH(SourceFile)-20, 21)
if left(SourceFile,4) = "root" then SourceFile = ActiveWinIcons.0.name || ":"
if SourceFile = "ACTIVEWINICONS.0.NAME:" then SourceFile = "Sys:"

address command 'Execute S:Openshell "'SourceFile'"'

[fgh]

Originally Posted by Octopus66

I have updated this script as the one above did not work with volumes or "root" directories.
Now also works for selected directory icons and directory windows without icons selected.
Should now only error when a file is selected rather than empty selection, or a directory.

Hey Octopus,

I found this script and use it with my 3.2.2.1 install. Awesome!

Not sure if you noticed, but it throws an error for empty drawers or drawers with spaces in their name if you enter the drawer first.

There is no error if you're in the parent drawer with the wanted drawer selected.

Anyway - it's very nice, thanks!