Hoi,

>I can type Ctrl I into the Execute Command window, copy it, and paste it
>into the string of the attached example. Is there a way to type a tab
>character into a string?

Isn't there a special key you can hold to type control chars into
string gadgets? I think there is an option in SYS:Prefs/Input but
I don't know if this will work in MUI.

cu, Bernd

Hello Robert,

On 18-Dic-2007, you wrote:
> I can type Ctrl I into the Execute Command window, copy it, and paste it
> into the string of the attached example. Is there a way to type a tab
> character into a string? In the example pressing the tab key in the
> string activates the next gadget. Clearing the Next Gadget Navigation
> string makes it do nothing. Typing Ctrl I into the string gives a space.
> Setting Tabs to Ignore, Spaces, 0, 1, or 2 makes no difference. Setting
> it to Disk reports "bad value". Is the attribute broken?

It would be difficoult in C too. There is no wasy way to overload standard
C key sequence. For that, you must use something that does that for you,
like a Texteditor object.

Ciao. Alfonso

I can type Ctrl I into the Execute Command window, copy it, and paste it
into the string of the attached example. Is there a way to type a tab
character into a string? In the example pressing the tab key in the string
activates the next gadget. Clearing the Next Gadget Navigation string
makes it do nothing. Typing Ctrl I into the string gives a space. Setting
Tabs to Ignore, Spaces, 0, 1, or 2 makes no difference. Setting it to Disk
reports "bad value". Is the attribute broken?

RxMUI 42.5, RMH 23.2, MUI 3.8, AmigaOS 3.9, A4000/040

Kind regards,
--
Robert A. Sisk
sisk637@...

/* $VER: DemoStringTab 1.0 (18.12.2007)
*/
App.Description='Demo'
App.Copyright  ='© 2007 by Robert A. Sisk'

App.Title=word(SourceLine(1),3)
App.Base=App.Title

call AddLib 'rmh.library',0,-30
if RMH_AddLibrary('rxmui.library')>0 then do
   call RMH_EasyRequest "Can't open" result,App.Title,'Exit'
   signal Exit
   end

App.Author=SubWord(App.Copyright,find(App.Copyright,'by')+1)
App.SingleTask=1
App.Version=SubWord(SourceLine(1),2)
App.SubWindow='MainWindow'
   MainWindow.ID='Main'
   MainWindow.Title=App.Title
     String.CycleChain=1
     String.RemainActive=1
     String.Tabs=2
     Cycle.CycleChain=1
   MainWindow.Contents=MakeObj(,'ColGroup',2,,
     label('_String'),string('String','s'),,
     label('_Cycle'),MakeObj('Cycle','Cycle','A|B|C','c'))
if NewObj('Application','App')>0 then
   signal Exit

SigBreakB_Ctrl_C=12
BreakCSignal=2**SigBreakB_Ctrl_C

call notify 'MainWindow','CloseRequest',1,'App','ReturnID','Quit'
call notify 'String','Acknowledge','EveryTime','App','Return','EnteredString'

call set 'MainWindow','Open',1
if ~xGet('App','Iconified') then
   if ~xGet('MainWindow','Open') then do
     call MUIRequest 'App',,App.Title,'_Exit',"Can't open main window"
     signal Exit
     end

do forever
   call NewHandle 'App','Event',BreakCSignal
   if RMH_And(Event.Signals,BreakCSignal)>0 then
     call Quit
   interpret 'call' Event.Event
   end

Quit:
Exit:
exit

EnteredString:
say 'EnteredString:' c2x(xGet('String','Contents'))
return

ciao Bernd,

> Wow, now that's an ARexx application :)
>
> Can't resist to take a look but my italian isn't that good (= non
> existant).
>
> Just some minor remarks:

thanks, I really need good suggestions to learn ever more.

> As you may have noticed I'm a little obsessed with date/time functions.

the 'date' procedure is totally disappeared from tubexx now since with GData API
is no longer needed.
But your advice remains valid regardless... :-)

bye,
paolo

Hoi Paolo,

> >> Robert is one of the last still actively using RxMUI.
> > Nhaa there is some other fool :)
> > Look at it http://www.webalice.it/pgermano/tubexx/main.html and going to be
> > ported to os4 :)
> but this is a very old stuff!! ;-)
> a new release, localized and GData based, is almost ready
> (around Christmas I hope)

Wow, now that's an ARexx application :)

Can't resist to take a look but my italian isn't that good (= non existant).

Just some minor remarks:

line 184 ff, you can use equations for calculations:
   g.date.y.1 = (s * (28 + ((a//4)=0) )) /* feb */

((a//4)=0) -> will be 0 or 1

And a little nitpicking:
    (year//4 = 0) & ((year//100 ~= 0) | (year//400 = 0))

would be the correct calculation for the leap-year. Of course this bug will not
show up until 2100 :)

so, I would do it like:

   leap = (a//4 = 0) & ((a//100 ~= 0) | (a//400 = 0))
   g.date.y.1 = (s * (28+leap)) /* feb */

And another optimisation, line 3229 ff:

/** secs2hhmmss */
secs2hhmmss: procedure expose g.

  parse arg ss

  hh = ss % 3600
  ss = ss // 3600
  mm = ss % 60
  ss = ss // 60

  time = right(mm, 2, "0") || ":" || right(ss, 2, "0")
  if hh > 0 then time = hh || ":" || time

return time
/**/

As you may have noticed I'm a little obsessed with date/time functions.

--
cu, Bernd

On 12/15/2007 Alfonso Ranieri <alforan@...> wrote:

> The function is res=SameLock(path1,path2) <path1>,<path2>

> res:
> - ERROR1
> - ERROR2
> - SAME
> - SAMEVOLUME
> - DIFFERENT
> - UNKNOWN (You never know with all this amiga oses around :-)

Thanks, Alfie. I trust you'll release this on Aminet, along with RxMUI
42.5.

Kind regards,
--
Robert A. Sisk
sisk637@...

Hello Robert,

> I'd like to request a new RMH/SameObject() function based on
> dos.library/SameLock(). It would return ERROR1, ERROR2, SAME, SAMEVOLUME,
> or DIFFERENT. The first two values would indicate that the lock on an
> argument failed and IOErr() would give the error code.

http://alfie.altervista.org/_altervista_ht/rmh.library

The function is res=SameLock(path1,path2) <path1>,<path2>

res:
- ERROR1
- ERROR2
- SAME
- SAMEVOLUME
- DIFFERENT
- UNKNOWN (You never know with all this amiga oses around :-)

Ciao. Alfonso

ciao Alfonso,

>> Robert is one of the last still actively using RxMUI.
> Nhaa there is some other fool :)
> Look at it http://www.webalice.it/pgermano/tubexx/main.html and going to be
> ported to os4 :)

but this is a very old stuff!! ;-)
a new release, localized and GData based, is almost ready
(around Christmas I hope)

bye,
paolo

Hello Bernd,

On 15-Dic-2007, you wrote:
> Hoi Alfonso & Robert,
> You (= Alfonso) are the developer, you don't count as user ;)
> But I'm very happy that you're still maintaining your code bases.
I am a "marrano" :)

> Robert is one of the last still actively using RxMUI.
Nhaa there is some other fool :)
Look at it http://www.webalice.it/pgermano/tubexx/main.html and going to be
ported to os4 :)

Ciao. Alfonso

Hoi Alfonso & Robert,

>> I'm beginning to think that you
>> and I are the only RxMUI (or ARexx) enthusiasts left!
> Hey dude, there is also me! :)

You (= Alfonso) are the developer, you don't count as user ;)
But I'm very happy that you're still maintaining your code bases.

Robert is one of the last still actively using RxMUI.

And I'm just an old ARexx lover which is occasional interrested in problem
solving.

> I think ARexx love went away as amigans disappered. [...]

The user base is shrinking. With no new hardware what do you expect?
Only the enthusiasts remains and many are on "spare flame" (meaning idling?).

> But, we love it. When I am at the amiga, as now, I am alway doing something
> with ARexx, like writing some small macro to do some text formatting. [...]

The same with me. On the PC side I'm using regina for fast prototyping or just
doing some small stuff very quickly.

--
cu, Bernd

Hello Robert,
> I'm beginning to think that you
> and I are the only RxMUI (or ARexx) enthusiasts left!

Hey dude, there is also me! :)

Yes, the shortcut menu problem is a well known MUI3.9 bug.

I think ARexx love went away as amigans disappered. That is all.
Also, while ARexx supports in new amigas oses is full, it is not seen as a
very important part of the system as before. Every day someone try to port
some new macro language, which is in most of the cases probably more
powerfull than ARexx, but, of course, not so "inside" as ARexx is.

But, we love it. When I am at the amiga, as now, I am alway doing something
with ARexx, like writing some small macro to do some text formatting. And
even when I am not at the Amiga, I think of it: today I finally have some
time to compile oorexx on gentoo. Great language it is. But a port, I mean
a real one, would require ages.

Ciao. Alfonso.

On 12/14/2007 Bernd Gollesch <bgollesch@...> wrote:

>> In the attached example, I use the Reject attribute to reject control
>> bytes in a string gadget. However, it lets me enter Ctrl A, Ctrl B, and
>> Ctrl C, and they show up as the hex string 010203. What am I doing
>> wrong?

> Change it from:
>    String.Reject=XRange(,'1f'x)XRange('7f'x,'9f'x)
> to:
>    String.Reject=XRange('01'x,'1f'x)XRange('7f'x,'9f'x)

> Otherwise the first char is '00'x which will terminate the string!

Your advice is right on the money. Thanks for your help, Bernd, and for
your input to my context menu problem. I'm beginning to think that you and
I are the only RxMUI (or ARexx) enthusiasts left!

Kind regards,
--
Robert A. Sisk
sisk637@...

Hoi Robert,

> In the attached example, with the mouse pointer over the list,
> pressing the menu item shortcut key combination presses the button
> instead of choosing the menu item. Why? Is this RxMUI's fault or
> MUI's? Without the context menu the symptom goes away.

If my memory serves me well that's an MUI bug. It doesn't happen here
(MUI3.9).

cu, Bernd

Hoi Robert,

> In the attached example, I use the Reject attribute to reject control
> bytes in a string gadget. However, it lets me enter Ctrl A, Ctrl B, and
> Ctrl C, and they show up as the hex string 010203. What am I doing wrong?
> Or is this attribute broken?

Change it from:
     String.Reject=XRange(,'1f'x)XRange('7f'x,'9f'x)
to:
     String.Reject=XRange('01'x,'1f'x)XRange('7f'x,'9f'x)

Otherwise the first char is '00'x which will terminate the string!

--
cu, Bernd

Hello, Alfie and RxMUI enthusiasts.

In the attached example, I use the Reject attribute to reject control
bytes in a string gadget. However, it lets me enter Ctrl A, Ctrl B, and
Ctrl C, and they show up as the hex string 010203. What am I doing wrong?
Or is this attribute broken?

RxMUI 42.5, MUI 3.8, AmigaOS 3.9, A4000/040

Kind regards,
--
Robert A. Sisk
sisk637@...

/* $VER: DemoStringReject 1.0 (14.12.2007)
*/
App.Description='Demo'
App.Copyright  ='© 2007 by Robert A. Sisk'

App.Title=word(SourceLine(1),3)
App.Base=App.Title

call AddLib 'rmh.library',0,-30
call RMH_MacroEnv 'MacroEnv','ProgDir CD'
if RMH_AddLibrary('rxmui.library')>0 then do
   call RMH_EasyRequest "Can't open" result,App.Title,'Exit'
   signal Exit
   end

App.Author=SubWord(App.Copyright,find(App.Copyright,'by')+1)
App.SingleTask=1
App.Version=SubWord(SourceLine(1),2)
App.SubWindow='MainWindow'
   MainWindow.ID='Main'
   MainWindow.Title=App.Title
     String.CycleChain=1
     String.RemainActive=1
     String.Reject=XRange(,'1f'x)XRange('7f'x,'9f'x)
   MainWindow.Contents=MakeObj(,'VGroup',string('String'))
if NewObj('Application','App')>0 then
   signal Exit

SigBreakB_Ctrl_C=12
BreakCSignal=2**SigBreakB_Ctrl_C

call notify 'MainWindow','CloseRequest',1,'App','ReturnID','Quit'
call notify
'String','NewContents','EveryTime','App','Return','EnteredString','TriggerAttr'

call set 'MainWindow','Open',1
if ~xGet('App','Iconified') then
   if ~xGet('MainWindow','Open') then do
     call MUIRequest 'App',,App.Title,'_Exit',"Can't open main window"
     signal Exit
     end

do forever
   call NewHandle 'App','Event',BreakCSignal
   if RMH_And(Event.Signals,BreakCSignal)>0 then
     call Quit
   interpret 'call' Event.Event
   end

Quit:
Exit:
exit

EnteredString:
say 'EnteredString: "'Event.NewContents'"' c2x(Event.NewContents)
return

Hello, Alfie.

I'd like to request a new RMH/SameObject() function based on
dos.library/SameLock(). It would return ERROR1, ERROR2, SAME, SAMEVOLUME,
or DIFFERENT. The first two values would indicate that the lock on an
argument failed and IOErr() would give the error code.

Kind regards,
--
Robert A. Sisk
sisk637@...

Hello, Alfie and RxMUIers.

In the attached example, with the mouse pointer over the list, pressing
the menu item shortcut key combination presses the button instead of
choosing the menu item. Why? Is this RxMUI's fault or MUI's? Without the
context menu the symptom goes away.

Kind regards,
--
Robert A. Sisk
sisk637@...

/* $VER: DemoCMenuBreaksMIKey 1.0 (13.12.2007)
*/
App.Description='Demo'
App.Copyright  ='© 2007 by Robert A. Sisk'

App.Title=word(SourceLine(1),3)
App.Base=App.Title

call AddLib 'rmh.library',0,-30
if RMH_AddLibrary('rxmui.library')>0 then do
   call RMH_EasyRequest "Can't open" result,App.Title,'Exit'
   signal Exit
   end

App.Author=SubWord(App.Copyright,find(App.Copyright,'by')+1)
App.Version=SubWord(SourceLine(1),2)
App.SubWindow='MainWindow'
   MainWindow.ID='Main'
   MainWindow.Title=App.Title
   MainWindow.MenuStrip=MakeObj(,'MenuStrip',,
     MakeObj(,'Menu','Edit',,
       MenuItem('ResetPrefs','D\Reset to Defaults')))
     Listview.List='List'
       List.ContextMenu=MakeObj(,'MenuStrip',,
         MakeObj(,'Menu','List',,
           MenuItem('ResetList','Reset to Default')))
   MainWindow.Contents=MakeObj(,'VGroup',,
     xNewObj('Listview','Listview'),,
     button('Down','_Down'))
if NewObj('Application','App')>0 then
   signal Exit

SigBreakB_Ctrl_C=12
BreakCSignal=2**SigBreakB_Ctrl_C

call notify 'ResetPrefs','MenuTrigger','EveryTime','App','ReturnID'
call notify 'MainWindow','CloseRequest',1,'App','ReturnID','Quit'
call notify 'Down','Pressed',0,'App','ReturnID'

call set 'MainWindow','Open',1
if ~xGet('App','Iconified') then
   if ~xGet('MainWindow','Open') then do
     call MUIRequest 'App',,App.Title,'_Exit',"Can't open main window"
     signal Exit
     end

do forever
   call NewHandle 'App','Event',BreakCSignal
   if RMH_And(Event.Signals,BreakCSignal)>0 then
     call Quit
   interpret 'call' Event.Event
   end

Quit:
Exit:
exit

ResetPrefs:
say 'menu item chosen'
return

Down:
say 'button pressed'
return

Hello, Alfie.

I'm sorry about my previous message. I just read in the TextEditor autodoc
that HasChanged isn't affected by Contents. So, never mind! :-/

Kind regards,
--
Robert A. Sisk
sisk637@...

Hello, Alfie.

In the attached example entering characters into the editor triggers
notification on HasChanged as expected. But setting the contents to null
using the pop-up menu fails to do so. Why? Is this RxMUI's fault or
TextEditor.mcc's?

Kind regards,
--
Robert A. Sisk
sisk637@...

/* $VER: DemoTEHasChanged 1.0 (23.11.2007)
*/
App.Description='Demo'
App.Copyright  ='© 2007 by Robert A. Sisk'

App.Title=word(SourceLine(1),3)
App.Base=App.Title

call AddLib 'rmh.library',0,-30
if RMH_AddLibrary('rxmui.library')>0 then do
   call RMH_EasyRequest "Can't open" result,App.Title,'Exit'
   signal Exit
   end

App.Author=SubWord(App.Copyright,find(App.Copyright,'by')+1)
App.SingleTask=1
App.Version=SubWord(SourceLine(1),2)
App.SubWindow='MainWindow'
   MainWindow.ID='Main'
   MainWindow.Title=App.Title
     EditorGroup.Spacing=0
       Editor.Slider=xNewObj('Scrollbar','EditorScroller')
       Editor.ControlChar='e'
       Editor.CycleChain=1
       Editor.ContextMenu=MakeObj(,'MenuStrip',,
         MakeObj(,'Menu','Editor',,
           MenuItem('ResetEditor','Reset to Default')))
   MainWindow.Contents=MakeObj(,'VGroup',,
     label('_Editor','Centered'),,
    
MakeObj('EditorGroup','HGroup',xNewObj('TextEditor','Editor'),'EditorScroller'))
if NewObj('Application','App')>0 then
   signal Exit

SigBreakB_Ctrl_C=12
BreakCSignal=2**SigBreakB_Ctrl_C

DefaultContents=''
call set 'ResetEditor','Enabled',0

call notify 'MainWindow','CloseRequest',1,'App','ReturnID','Quit'
call notify 'Editor','HasChanged',1,'App','Return','HasChanged'
call notify 'ResetEditor','MenuTrigger','EveryTime','App','ReturnID'

call set 'MainWindow','Open',1
if ~xGet('App','Iconified') then
   if ~xGet('MainWindow','Open') then do
     call MUIRequest 'App',,App.Title,'_Exit',"Can't open main window"
     signal Exit
     end

do forever
   call NewHandle 'App','Event',BreakCSignal
   if RMH_And(Event.Signals,BreakCSignal)>0 then
     call Quit
   interpret 'call' Event.Event
   end

Quit:
Exit:
exit

ResetEditor:
call set 'Editor','Contents',DefaultContents
return

HasChanged:
say 'HasChanged:'
call set 'Editor','HasChanged',0
call set 'ResetEditor','Enabled',xGet('Editor','Contents')~==DefaultContents
return

I forgot to write in the changes that till this version objects created by
the button() function are always in cyclechain. It is not needed to specify
"bt.cyclechain=1;...=button(bt,...)" now. If you don't want the button to be
in cyclechain do a "bt.cyclechain=0;...=button(bt,...)" or set cyclechain to
FALSE after object creation.

Ciao. Alfonso

Hello people from rxmuibiza.

RxMUI 42.5 is online. It mainly patch that annoying bug not making
label() and button() key visible in MUI4/MOS1.45. Some changes also in
HTMLview.

Ciao. Alfonso

Robert A. Sisk ha scritto:
> Hello, RxMUI enthusiasts.
>
> In my DemoHeightProblems example the height of the second PenDisplay is a
> couple of pixels greater than that of the first. Also, the height of the
> second slider above the bar is greater than that of the PenDisplay.
>
> In the DemoHeight example removing a group of two checkboxes higher in the
> window fixes the problems.
>
> Leaving aside the interesting semantic point that the term height has two
> meanings: vertical dimension, and distance above another object - why the
> height problems, and why does removing the group fix them?
>
> RxMUI 42.2, MUI 3.8, AmigaOS 3.9, A4000/040
>
> Kind regards,

Hello Robert, please be patience. I was only able to test it on mos/mui4
and there is no difference in size there. I have to test it on a classic.

Ciao. Alfonso

Hello, RxMUI enthusiasts.

In my DemoHeightProblems example the height of the second PenDisplay is a
couple of pixels greater than that of the first. Also, the height of the
second slider above the bar is greater than that of the PenDisplay.

In the DemoHeight example removing a group of two checkboxes higher in the
window fixes the problems.

Leaving aside the interesting semantic point that the term height has two
meanings: vertical dimension, and distance above another object - why the
height problems, and why does removing the group fix them?

RxMUI 42.2, MUI 3.8, AmigaOS 3.9, A4000/040

Kind regards,
--
Robert A. Sisk
sisk637@...

Robert A. Sisk ha scritto:
> I have an script where I need to get a color as RGB values but not a MUI
> pen or colormap value as in the three-tab PopPen. I'm using a ColorField
> button to open a window containing a ColorAdjust, but it lacks the slider
> labels and the preset pop-up - and of course I have to provide the window
> and the OK and Cancel buttons.
>
> The PSI palette buttons appear to be PopPen objects with only the RGB
> page. Is it possible to have that in RxMUI?

You must get:
http://alfie.altervista.org/specials/poppen.rxmec
http://alfie.altervista.org/specials/penadjust.rxmec

Then use:
- POMode=2 as init attributes of a poppen object
- PAMode=2 as init attributes of a penadjust object

Ciao. Alfonso

Hello, Alfie.

I have an script where I need to get a color as RGB values but not a MUI
pen or colormap value as in the three-tab PopPen. I'm using a ColorField
button to open a window containing a ColorAdjust, but it lacks the slider
labels and the preset pop-up - and of course I have to provide the window
and the OK and Cancel buttons.

The PSI palette buttons appear to be PopPen objects with only the RGB
page. Is it possible to have that in RxMUI?

Kind regards,
--
Robert A. Sisk
sisk637@...

Hello, Alfie.

The ColorField doc page's Parent link goes to Group instead of Area.

Kind regards,
--
Robert A. Sisk
sisk637@...

Sorry Robert, I have the email somewhere else so I will reply blindly.

Many bugs you are reporting are MUI ones. Try to do the same thing in a
MUI c application, f.e. in MUI preferences application and you will
probably have the very same behavior. That is why in TheBar.mcp for
Amiga Classic and MUI 3.8 I re wrote all the color selection classes.

Ciao. Alfonso

Hello, Alfie.

When I start the attached example, the color is white and the three
sliders each show 255. Pressing the Show button shows 8 Fs for each.
Now I move the red slider to 0 and press Show again. Red is zeros as
expected, but blue has changed to FFEDFFED. Why is the blue value
different?

RxMUI 42.2, MUI 3.8, AmigaOS 3.9, A4000/040

Kind regards,
--
Robert A. Sisk
sisk637@...

/* $VER: DemoColorAdjust 1.2 (26.10.2007)
*/
App.Description='Demo'
App.Copyright  ='© 2007 by Robert A. Sisk'

App.Title=word(SourceLine(1),3)
App.Base=App.Title

call AddLib 'rmh.library',0,-30
if RMH_AddLibrary('rxmui.library')>0 then do
   call RMH_EasyRequest "Can't open" result,App.Title,'Exit'
   signal Exit
   end

App.Author=SubWord(App.Copyright,find(App.Copyright,'by')+1)
App.SingleTask=1
App.Version=SubWord(SourceLine(1),2)
App.SubWindow='MainWindow'
   MainWindow.ID='Main'
   MainWindow.Title=App.Title
   MainWindow.Contents=MakeObj(,'VGroup',,
     xNewObj('ColorAdjust','Color'),,
     button('Show','_Show'))
if NewObj('Application','App')>0 then
   signal Exit

SigBreakB_Ctrl_C=12
BreakCSignal=2**SigBreakB_Ctrl_C

call notify 'MainWindow','CloseRequest',1,'App','ReturnID','Quit'
call notify 'Show','Pressed',0,'App','ReturnID'

call set 'MainWindow','Open',1

do forever
   call NewHandle 'App','Event',BreakCSignal
   if RMH_And(Event.Signals,BreakCSignal)>0 then
     call Quit
   interpret 'call' Event.Event
   end

Quit:
Exit:
exit

Show:
say c2x(xGet('Color','Red')) c2x(xGet('Color','Green'))
c2x(xGet('Color','Blue'))
return

Robert A. Sisk ha scritto:

> In the attached DemoColorAdjust example, dragging the wheel knob moves the
> sliders and changes the color bar. So far, so good.
>
> However, when I start the DemoColorAdjustWin example, press the button to
> open the other window, and drag its wheel knob, the sliders and the bar
> don't change. Why not?
>
> RxMUI 42.2, MUI 3.8, AmigaOS 3.9, A4000/040

I seem to recall that was a quite old MUI3.8 bug, where you have to play
in the vertical pendisplay gadget to make color wheel starting to notify
its changes.

Ciao. Alfonso

> In the attached example, pressing the button gets the PenDisplay object's
> PDSpec attribute, but the value shows up as a null string. Why?
>
> RxMUI 42.2/42.3, MUI 3.8, AmigaOS 3.9, A4000/040

PDSpec is not readable in MUI itself, so it should be not G.

Ciao. Alfonso