Bug with MUIRoyale and AREXX and additionally with OpenMusic

[amiga23]

As I understood the documentation any MUIRoyale application will automatically get an ARexx Port based on the application.base.

This seems not to work, at least not on MorphOS.

If I create another ARexx Port with

Code: Select all

CreateRexxPort("HOLLYAMP.55")

A ARexx port is created and I can use it.

BUT this leads to another bug with OpenMusic which may be related to my previous bug with running two Hollywood applications.

How to reproduce:
1. Add the following lines to the HollyAmp example before the WaitEvent loop:

Code: Select all

mui.CreateGUI("<?xml version=\"1.0\" encoding=\"iso-8859-1\"?>                                                                             \
        <application base=\"HOLLYAMP\" id=\"app\">                                                                      \
        <menustrip id=\"mymenustrip\">                                                                                                     \
              <menu title=\"Project\">                                                                                                     \
                 <item id=\"menabout\" notify=\"selected\">About...</item>                                                                 \
                 <item id=\"menaboutmui\" notify=\"selected\">About MUI...</item>                                                          \
                 <item id=\"menaboutmuiroyale\" notify=\"selected\">                                                                       \
                    About MUI Royale...</item>                                                                                             \
                 <item/>                                                                                                                   \
                 <item id=\"menquit\" notify=\"selected\" shortcut=\"Q\">Quit</item>                                                       \
              </menu>                                                                                                                      \
              <menu title=\"Settings\">                                                                                                    \
                 <item id=\"menmuiset\" notify=\"selected\">MUI...</item>                                                                  \
              </menu>                                                                                                                      \
           </menustrip>                                                                                                                    \
                                                                                                                                           \
           <window id=\"main\" title=\"SomeTitle\" muiid=\"MAIN\" notify=\"closerequest\"                                                  \
              menustrip=\"mymenustrip\">                                                                                                   \
                    <hgroup>                                                                                                               \
                       <text id=\"txt_module\" frame=\"text\"></text>                                                                      \
                       <button id=\"btn_time\" notify=\"pressed\" shorthelp=\"Time\" weight=\"20\" disabled=\"true\">_Time</button>        \
                    </hgroup>                                                                                                              \
           </window>                                                                                                                       \
        </application>"
)

CreateRexxPort("HOLLYAMP.55")

Function p_ARexxEventFunc(msg)
    Switch msg.action
        Case "OnARexx"
        Switch msg.command
        Case "OPEN"
            SystemRequest("AREXX","OPEN Command received","OK")
            Return(100)
        Default
            Local t = SplitStr(msg.args, "\0")
            DebugPrint(msg.command, "called with", msg.argc, "argument(s)")
            For Local k = 1 To msg.argc
                DebugPrint("Argument", k .. ":", t[k - 1])
            Next
        EndSwitch
    EndSwitch
EndFunction

InstallEventHandler({OnARexx = p_ARexxEventFunc})

SystemRequest("TEST","REXXPORT: ".. mui.Get("app","base"), "OK")

2. Run the application
3. Try to connect via ARexx script with portname "HOLLYAMP.1" -> no success
4. Try to connect via ARexx script with portname "HOLLYAMP.55" -> success
5. Try to open a MP3 -> ERROR

You will get the same error as described here: viewtopic.php?f=4&t=927
But this time even without running another Hollywood application in parallel.

My System: MorphOS 3.7 Hollywood 5.3

[airsoftsoftwair]

Actually, the documentation is wrong here. Your MUI application won't get an ARexx port automatically. I still need to add this for the future.

Concerning the OpenMusic() problem... it might be that Hollywood runs out of message ports. I'll check into this soon.

[amiga23]

OpenMusic issue is fixed in Hollwood 6 It is now possible to use MUIRoyale, AREXX and Sound at the same time.
Thank you very much.