Forum Index
 » 
User Forums
 » 
General Discussion
Force change view of an Ambient window in command line
  • Paladin of the Pegasos
    Paladin of the Pegasos
    Papiosaur
    Posts: 1955 from 2003/4/10
    From: France
    Hello,

    For Easy2Install, i use "open" command to open a drawer in an Ambient window.

    I would like to change (force) view mode : list view (all files) for shell commands or icon mode (all files) to show icons (sometimes drawers containing icons don't have icon...)

    Is it possible to force view mode (by lister, by icon view mode) in command line with Arexx or LUA or maybe news options for "open" command in a future version of MorphOS?

    Thanks for your answer.
    Easy2Install
    www.meta-morphos.org
    www.morphos-storage.net
  • »06.10.23 - 15:10
    Profile Visit Website
  • ghh
  • Caterpillar
    Caterpillar
    ghh
    Posts: 40 from 2017/7/16
    From: Prague
    Look at sys:MorphOS/Ambient/arexx/showam.rexx
  • »06.10.23 - 15:38
    Profile Visit Website
  • Paladin of the Pegasos
    Paladin of the Pegasos
    Papiosaur
    Posts: 1955 from 2003/4/10
    From: France
    Quote:

    ghh a écrit :
    Look at sys:MorphOS/Ambient/arexx/showam.rexx


    Cool! i think it could help me ;-)

    Thanks a lot!

    I will try to understand the script now :-D

    [EDIT] Work perfectly ;-)

    Maybe i could adapt this AREXX script to Hollywood or LUA langage with arguments to have only one script?
    Easy2Install
    www.meta-morphos.org
    www.morphos-storage.net
  • »06.10.23 - 16:04
    Profile Visit Website
  • jPV
  • Paladin of the Pegasos
    Paladin of the Pegasos
    jPV
    Posts: 1999 from 2003/2/24
    From: po-RNO
    I'm in a hurry now, but made quickly couple examples how you could convert the script into Hollywood. Not sure if I got everything right, but I'll check after couple days ;)

    Code:
    ; This function uses Hollywood's ARexx support functions, but requires 68k rexxsyslib.library installed
    Function p_OpenAmbientARexx(location$, view$, mode$, left, top, width, height)
        Local params$ = "?view=" .. view$ .. "&mode=" .. mode$ .. "&top=" .. top .. "&left=" .. left .. "&width=" .. width .. "&height=" .. height
        Local rexx$ = "ADDRESS AMBIENT;'LoadURI \"file://" .. location$ .. params$ .. "\" newwin'"
        RunRexxScript(rexx$, True)
    EndFunction


    ; This function uses the RXCmd shell command and works out of the box on MorphOS, but doesn't work on other operating systems
    Function p_OpenAmbientShell(location$, view$, mode$, left, top, width, height)
        Local params$ = "?view=" .. view$ .. "&mode=" .. mode$ .. "&top=" .. top .. "&left=" .. left .. "&width=" .. width .. "&height=" .. height
        Local args$ = "AMBIENT \"LoadURI *\"file://" .. location$ .. params$ .. "*\" newwin\""
        Execute("MOSSYS:C/RXCmd", args$)
    EndFunction


    ; Example 1
    p_OpenAmbientARexx("Ram Disk:", "list", "thumbs", 50, 50, 440, 320)

    ; Example 2
    p_OpenAmbientShell("Ram Disk:", "list", "thumbs", 600, 50, 440, 320)

    The wiki based MorphOS Library - Your starting point for MorphOS
    jPV's MorphOS pages
  • »07.10.23 - 05:26
    Profile Visit Website