From 7749734f319f73b5d93b5c5f72cf559ae63ce40d Mon Sep 17 00:00:00 2001 From: Mid Favila Date: Tue, 15 Jun 2021 19:25:01 -0300 Subject: [PATCH] Massive update. --- infra/funcrc | 2 +- infra/menurc | 2 +- infra/windrc | 2 + mainrc | 2 +- modules/monbars/README | 1 + modules/monbars/cpumon | 25 +++ modules/monbars/dskmon | 22 +++ modules/monbars/loadmon | 17 ++ modules/monbars/memmon | 18 ++ modules/monbars/netmon | 23 +++ modules/monbars/powmon | 20 +++ modules/pager | 6 +- modules/shelf | 197 +++++++++++++++++----- scripts/fvwmscript/FvwmScript-ConfirmQuit | 12 +- 14 files changed, 292 insertions(+), 57 deletions(-) create mode 100644 modules/monbars/README create mode 100644 modules/monbars/cpumon create mode 100644 modules/monbars/dskmon create mode 100644 modules/monbars/loadmon create mode 100644 modules/monbars/memmon create mode 100644 modules/monbars/netmon create mode 100644 modules/monbars/powmon diff --git a/infra/funcrc b/infra/funcrc index 118c3a2..98df9c7 100644 --- a/infra/funcrc +++ b/infra/funcrc @@ -2,7 +2,7 @@ DestroyFunc TestScrotFunc AddToFunc TestScrotFunc - + I Exec $[infostore.posix]/hunter -g + + I ThisWindow import -window # Load and restore preferences. DestroyFunc PrefFunc diff --git a/infra/menurc b/infra/menurc index 1ab3019..98fca74 100644 --- a/infra/menurc +++ b/infra/menurc @@ -20,7 +20,7 @@ AddToMenu WindowOps "$[gt. Window Operations ]" Title + "Close" Close + "Kill" Destroy + "" Nop - + "Scrape" Exec exec $[infostore.posix]/hunter -s + + "Scrape" Function Hunter DestroyMenu EditMenu AddToMenu EditMenu "$[gt. Editors ]" Title diff --git a/infra/windrc b/infra/windrc index 9848161..f9191c0 100644 --- a/infra/windrc +++ b/infra/windrc @@ -3,6 +3,8 @@ EwmhBaseStruts 0 136 0 0 ClickTime 250 MoveThreshold 2 +OpaqueMoveSize 0 +Style * ResizeOpaque Style * SloppyFocus Style * TileCascadePlacement diff --git a/mainrc b/mainrc index 1b35157..5b5a295 100644 --- a/mainrc +++ b/mainrc @@ -20,7 +20,7 @@ AddToFunc StartFunction + I Function PrefFunc + I Function ModuleFunc + I Schedule 250 Function DaemonFunc - + + I Module FvwmCommandS # This setting is useful if you have a multi-head system. EdgeScroll 0 0 diff --git a/modules/monbars/README b/modules/monbars/README new file mode 100644 index 0000000..b40296b --- /dev/null +++ b/modules/monbars/README @@ -0,0 +1 @@ +This directory includes preconfigured monitors using Xosview. Feel free to tinker. diff --git a/modules/monbars/cpumon b/modules/monbars/cpumon new file mode 100644 index 0000000..c0712f6 --- /dev/null +++ b/modules/monbars/cpumon @@ -0,0 +1,25 @@ +xosview \ + -xrm "xosview*cpuFreeColor: #$[infostore.cs_09_bg]" \ + -xrm "xosview*cpuUserColor: #00FFFF" \ + -xrm "xosview*cpuFormat: single" \ + -xrm "xosview*cpuFields: USED" \ + -xrm "xosview*cpuDecay: false" \ + -xrm "xosview*cpuGraph: false" \ + -xrm "xosview*captions: false" \ + -xrm "xosview*wireless: false" \ + -xrm "xosview*labels: false" \ + -xrm "xosview*title: cpumon" \ + -xrm "xosview*power: false" \ + -xrm "xosview*font: fixed" \ + -xrm "xosview*load: false" \ + -xrm "xosview*page: false" \ + -xrm "xosview*swap: false" \ + -xrm "xosview*disk: false" \ + -xrm "xosview*net: false" \ + -xrm "xosview*mem: false" \ + -xrm "xosview*cpu: true" + + + +Dump this into your RC to use the bar. +*Shelf: (Size 131x24, Frame 0, Swallow cpumon "exec xosview -xrm xosview*cpuFreeColor:#$[infostore.cs_09_bg] -xrm xosview*cpuUserColor:#00FFFF -xrm xosview*cpuFormat:single -xrm xosview*cpuFields:USED -xrm xosview*cpuDecay:false -xrm xosview*cpuGraph:false -xrm xosview*captions:false -xrm xosview*wireless:false -xrm xosview*labels:false -xrm xosview*title:cpumon -xrm xosview*power:false -xrm xosview*font:fixed -xrm xosview*load:false -xrm xosview*page:false -xrm xosview*swap:false -xrm xosview*disk:false -xrm xosview*net:false -xrm xosview*mem:false -xrm xosview*cpu:true") diff --git a/modules/monbars/dskmon b/modules/monbars/dskmon new file mode 100644 index 0000000..aa4dee7 --- /dev/null +++ b/modules/monbars/dskmon @@ -0,0 +1,22 @@ +xosview \ + -xrm "xosview*diskIdleColor: #$[infostore.cs_09_bg]" \ + -xrm "xosview*diskWriteColor: #A98C40" \ + -xrm "xosview*diskReadColor: #CBAE62" \ + -xrm "xosview*diskDecay: false" \ + -xrm "xosview*diskGraph: false" \ + -xrm "xosview*captions: false" \ + -xrm "xosview*diskPriority: 1" \ + -xrm "xosview*wireless: false" \ + -xrm "xosview*labels: false" \ + -xrm "xosview*power: false" \ + -xrm "xosview*title: dskmon" \ + -xrm "xosview*load: false" \ + -xrm "xosview*page: false" \ + -xrm "xosview*swap: false" \ + -xrm "xosview*font: fixed" \ + -xrm "xosview*cpu: false" \ + -xrm "xosview*net: false" \ + -xrm "xosview*disk: true" \ + -xrm "xosview*mem: false" + +*Shelf: (Size 131x24, Frame 0, Swallow cpumon "exec xosview -xrm xosview*diskIdleColor:#$[infostore.cs_09_bg] -xrm xosview*diskWriteColor:#A98C40 -xrm xosview*diskReadColor:#CBAE62 -xrm xosview*diskDecay:false -xrm xosview*diskGraph:false -xrm xosview*captions:false -xrm xosview*diskPriority:1 -xrm xosview*wireless:false -xrm xosview*labels:false -xrm xosview*power:false -xrm xosview*title:dskmon -xrm xosview*load:false -xrm xosview*page:false -xrm xosview*swap:false -xrm xosview*font:fixed -xrm xosview*cpu:false -xrm xosview*net:false -xrm xosview*disk:true -xrm xosview*mem:false") diff --git a/modules/monbars/loadmon b/modules/monbars/loadmon new file mode 100644 index 0000000..56c4771 --- /dev/null +++ b/modules/monbars/loadmon @@ -0,0 +1,17 @@ +xosview \ + -xrm "xosview*loadWarnColor: #FFFF00" \ + -xrm "xosview*loadProcColor: black" \ + -xrm "xosview*loadCritColor: red" \ + -xrm "xosview*captions: false" \ + -xrm "xosview*wireless: false" \ + -xrm "xosview*title: loadmon" \ + -xrm "xosview*labels: false" \ + -xrm "xosview*power: false" \ + -xrm "xosview*font: fixed" \ + -xrm "xosview*disk: false" \ + -xrm "xosview*page: false" \ + -xrm "xosview*swap: false" \ + -xrm "xosview*cpu: false" \ + -xrm "xosview*net: false" \ + -xrm "xosview*mem: false" \ + -xrm "xosview*load: true" diff --git a/modules/monbars/memmon b/modules/monbars/memmon new file mode 100644 index 0000000..b3ac255 --- /dev/null +++ b/modules/monbars/memmon @@ -0,0 +1,18 @@ +xosview \ + -xrm "xosview*memFreeColor: #$[infostore.cs_09_bg]" \ + -xrm "xosview*memUsedFormat: autoscale" \ + -xrm "xosview*memBufferColor: #05C4B0" \ + -xrm "xosview*captions: false" \ + -xrm "xosview*memDecay: false" \ + -xrm "xosview*wireless: false" \ + -xrm "xosview*labels: false" \ + -xrm "xosview*title: memmon" \ + -xrm "xosview*power: false" \ + -xrm "xosview*disk: false" \ + -xrm "xosview*load: false" \ + -xrm "xosview*page: false" \ + -xrm "xosview*swap: false" \ + -xrm "xosview*font: fixed" \ + -xrm "xosview*cpu: false" \ + -xrm "xosview*net: false" \ + -xrm "xosview*mem: true" diff --git a/modules/monbars/netmon b/modules/monbars/netmon new file mode 100644 index 0000000..313ed3d --- /dev/null +++ b/modules/monbars/netmon @@ -0,0 +1,23 @@ +xosview \ + -xrm "xosview*netBackground: #$[infostore.cs_09_bg]" \ + -xrm "xosview*UsedFormat: autoscale" \ + -xrm "xosview*netOutColor: #CC0000" \ + -xrm "xosview*netBandwidth: 30000" \ + -xrm "xosview*netInColor: #0000CC" \ + -xrm "xosview*netIface: $(...)" \ + -xrm "xosview*Wireless: $(...)" \ + -xrm "xosview*netGraph: false" \ + -xrm "xosview*wireless: false" \ + -xrm "xosview*netPriority: 1" \ + -xrm "xosview*labels: false" \ + -xrm "xosview*title: netmon" \ + -xrm "xosview*power: false" \ + -xrm "xosview*Decay: false" \ + -xrm "xosview*disk: false" \ + -xrm "xosview*font: fixed" \ + -xrm "xosview*load: false" \ + -xrm "xosview*page: false" \ + -xrm "xosview*swap: false" \ + -xrm "xosview*cpu: false" \ + -xrm "xosview*mem: false" \ + -xrm "xosview*net: true" diff --git a/modules/monbars/powmon b/modules/monbars/powmon new file mode 100644 index 0000000..2107116 --- /dev/null +++ b/modules/monbars/powmon @@ -0,0 +1,20 @@ +xosview \ + -xrm "xosview*batteryUsedColor: #$[infostore.cs_09_bg]" \ + -xrm "xosview*NoneColor: #$[infostore.cs_09_bg]" \ + -xrm "xosview*batteryChargeColor: #B0F800" \ + -xrm "xosview*batteryUsedFormat: percent" \ + -xrm "xosview*batteryCritColor: #FF0000" \ + -xrm "xosview*batteryFullColor: #00FF00" \ + -xrm "xosview*batteryLeftColor: #F6F8B0" \ + -xrm "xosview*batteryLowColor: #CC7722" \ + -xrm "xosview*wireless: false" \ + -xrm "xosview*battery: true" \ + -xrm "xosview*title: powmon" \ + -xrm "xosview*load: false" \ + -xrm "xosview*page: false" \ + -xrm "xosview*swap: false" \ + -xrm "xosview*disk: false" \ + -xrm "xosview*font: fixed" \ + -xrm "xosview*cpu: false" \ + -xrm "xosview*net: false" \ + -xrm "xosview*mem: false" diff --git a/modules/pager b/modules/pager index 70a0ce2..4f2f88c 100644 --- a/modules/pager +++ b/modules/pager @@ -9,10 +9,6 @@ DestroyModuleConfig ShelfPager *ShelfPager: Columns 1 *ShelfPager: Colorset * 13 *ShelfPager: HilightColorset * 14 -*ShelfPager: Back rgb:BE/BE/BE -*ShelfPager: WindowColors rgb:A5/A5/A5 \ - rgb:A5/A5/A5 \ - rgb:9B/A9/C9 \ - rgb:9B/A9/C9 + *ShelfPager: SolidSeparators *ShelfPager: Label * FXDE diff --git a/modules/shelf b/modules/shelf index 6659118..789f7f9 100644 --- a/modules/shelf +++ b/modules/shelf @@ -1,7 +1,7 @@ #Define the shelf. -Style "Shelf" NeverFocus, NoTitle, !Handles, !Borders, Sticky, FixedSize, \ - WindowListSkip, CirculateSkip, StaysOnBottom, FixedPosition,\ +Style "Shelf" NeverFocus, NoTitle, !Handles, !Borders, Sticky, FixedSize, \ + WindowListSkip, CirculateSkip, StaysOnBottom, FixedPosition, \ !Iconifiable, !Closable, !Maximizable DestroyModuleConfig Shelf @@ -9,7 +9,7 @@ DestroyModuleConfig Shelf *Shelf: Geometry 136x$[vp.height]-0-0@g *Shelf: Columns 136 *Shelf: Rows $[vp.height] -*Shelf: Frame 2 +*Shelf: Frame 3 *Shelf: Padding 2 2 *Shelf: Colorset 10 *Shelf: BoxSize fixed @@ -17,54 +17,165 @@ DestroyModuleConfig Shelf *Shelf: Colorset 9 *Shelf: PressColorset 10 -# Provide a bevel. -*Shelf: (Size 5x$[vp.height]) -*Shelf: (Size 131x5, ActiveColorset 10, PressColorset 10) +# Vertical bevel. +PipeRead 'echo "*Shelf: (Size 5x$(($[vp.height])), Colorset 9, \ + ActiveColorset 9)"' + +# Horizontal bevel. +*Shelf: (Size 131x6, Colorset 9, ActiveColorset 9) -*Shelf: (Size 131x30, Title (Right) Terminal, Action Exec exec $[infostore.term] -*Shelf: (Size 131x30, Title (Right) Editors , Action Menu EditMenu) -*Shelf: (Size 131x30, Title (Right) Files , Action Exec exec $[infostore.filer]) -*Shelf: (Size 131x30, Title (Right) Browsers , Action Menu BrowseMenu) -*Shelf: (Size 131x30, Title (Right) Comms , Action Menu CommsMenu) -*Shelf: (Size 131x30, Title (Right) Media , Action Menu MediaMenu) -*Shelf: (Size 131x30, Title (Right) Utilities , Action Menu UtilMenu) +# Start of command button block. -*Shelf: (Size 131x15, Frame 0) +*Shelf: (Size 131x30, Title (Right) Terminal , Action Exec \ + exec $[infostore.term] -*Shelf: (Size 131x30, Title (Right) Run , Action Module FvwmScript \ - $[infostore.fscript]/FvwmScript-Execute) -*Shelf: (Size 131x30, Title (Right) Configure , Action Module FvwmScript \ - $[infostore.fscript]/FXDE-ControlPanel) -*Shelf: (Size 131x30, Title (Right) Sysinfo , Action Menu InfoMenu) -*Shelf: (Size 131x30, Title (Right) Hide , Action Function ShowDeskFunc) -*Shelf: (Size 131x30, Title (Right) Lock , Action Exec exec xset s activate) -*Shelf: (Size 131x30, Title (Right) Logout , Action Module FvwmScript \ - $[infostore.fscript]/FvwmScript-ConfirmQuit) +*Shelf: (Size 131x30, Title (Right) Editors , Action Menu EditMenu) -PipeRead 'echo "*Shelf: (Size 131x$(((($[vp.height]/106)*1)))), Frame 0)"' +*Shelf: (Size 131x30, Title (Right) Files , Action Exec exec \ + $[infostore.filer]) -#*Shelf: (Size 64x64, Frame 0, Swallow wmifs, 'Exec exec wmifs', Frame 1) -#*Shelf: (Size 64x64, Frame 0, Swallow wmix, 'Exec exec wmix', Frame 1) +*Shelf: (Size 131x30, Title (Right) Browsers , Action Menu BrowseMenu) -#*Shelf: (Size 64x64, Frame 0, Swallow wmmon, 'Exec exec wmmon -l', Frame 1) -#*Shelf: (Size 64x64, Frame 0, Swallow wmmon, 'Exec exec wmmon -l -s -b', \ - Frame 1) +*Shelf: (Size 131x30, Title (Right) Comms , Action Menu CommsMenu) -#*Shelf: (Size 64x64, Frame 0, Swallow wmcalc, 'Exec exec wmcalc', Frame 1) -#*Shelf: (Size 64x64, Frame 0, Swallow wmmoonclock, 'Exec exec wmmoonclock', \ - Frame 1) +*Shelf: (Size 131x30, Title (Right) Media , Action Menu MediaMenu) -PipeRead 'echo "*Shelf: (Size 131x$(((($[vp.height]/53)*3)))), Frame 0, Swallow \ - xosview" ", \'Exec exec xosview\')"' +*Shelf: (Size 131x30, Title (Right) Utilities, Action Menu UtilMenu) -PipeRead 'echo "*Shelf: (Size 131x$(((($[vp.height]/53)*29)))), Frame 0)"' -*Shelf: (Size 131x60, Frame 0, Swallow stalonetray, 'Exec exec stalonetray \ - --kludges force_icons_size --icon-size 32 --icon-gravity SE \ - --geometry 4x2 --background "#BEBEBE"') -*Shelf: (Size 131x5, Frame 0) -*Shelf: (Action Exec exec xcalendar, Size 131x30, Frame 0, Swallow xclock,\ - 'Exec exec /usr/bin/xclock -digital -strftime "%a %H:%M:%S" \ - -update 1 -bg "#BEBEBE" -sharp -face "$[infostore.small_font]"') -*Shelf: (Size 131x130, Frame 0, Swallow ShelfPager) +*Shelf: (Size 131x15, Frame 1) + +*Shelf: (Size 131x30, Title (Right) Run , Action Module FvwmScript \ + $[infostore.fscript]/FvwmScript-Execute) + +*Shelf: (Size 131x30, Title (Right) Configure , Action Module FvwmScript \ + $[infostore.fscript]/FXDE-ControlPanel) + +*Shelf: (Size 131x30, Title (Right) Sysinfo , Action Menu InfoMenu) + +*Shelf: (Size 131x30, Title (Right) Hide , Action Function ShowDeskFunc) + +*Shelf: (Size 131x30, Title (Right) Lock , Action Exec exec xset s activate) + +*Shelf: (Size 131x30, Title (Right) Logout , Action Module FvwmScript \ + $[infostore.fscript]/FvwmScript-ConfirmQuit) + +# End of command button block. + + + + +PipeRead 'echo "*Shelf: (Size 131x$(((($[vp.height]/106)*1)))), Frame 1)"' + + +# Start of monitor widget block. + +# CPU monitor. +*Shelf: (Size 131x24, Frame 0, Swallow cpumon "exec xosview \ + -xrm xosview*borderWidth:0 -xrm xosview*foreground:#$[infostore.cs_09_bg] \ + -xrm xosview*background:#$[infostore.cs_09_bg] \ + -xrm xosview*cpuFreeColor:#$[infostore.cs_09_bg] \ + -xrm xosview*cpuUserColor:#00FFFF -xrm xosview*cpuFormat:single \ + -xrm xosview*cpuFields:USED -xrm xosview*cpuDecay:false \ + -xrm xosview*cpuGraph:false -xrm xosview*captions:false \ + -xrm xosview*wireless:false -xrm xosview*labels:false \ + -xrm xosview*title:cpumon -xrm xosview*power:false \ + -xrm xosview*font:fixed -xrm xosview*load:false -xrm xosview*page:false \ + -xrm xosview*swap:false -xrm xosview*disk:false -xrm xosview*net:false \ + -xrm xosview*mem:false -xrm xosview*cpu:true") +*Shelf: (Size 131x5, Frame 1) + +# Memory monitor. +*Shelf (Size 131x24, Frame 0, Swallow memmon "exec xosview \ + -xrm xosview*memFreeColor:#$[infostore.cs_09_bg]\ + -xrm xosview*memUsedFormat:percent \ + -xrm xosview*foreground:#$[infostore.cs_09_bg] \ + -xrm xosview*background:#$[infostore.cs_09_bg] \ + -xrm xosview*memUsedColor:#05C4B0 \ + -xrm xosview*memSharedColor:#05C4B0 \ + -xrm xosview*memBufferColor:#05C4B0 \ + -xrm xosview*memCacheColor:#02A2A0 \ + -xrm xosview*memFreeColor:#$[infostore.cs_09_bg] \ + -xrm xosview*memKernelColor:#05C4B0 \ + -xrm xosview*memSlabColor:#05C4B0 \ + -xrm xosview*memMapColor:#05C4B0 \ + -xrm xosview*memPriority:1 \ + -xrm xosview*captions:false \ + -xrm xosview*memDecay:false \ + -xrm xosview*wireless:false \ + -xrm xosview*labels:false \ + -xrm xosview*title:memmon \ + -xrm xosview*power:false \ + -xrm xosview*disk:false \ + -xrm xosview*load:false \ + -xrm xosview*page:false \ + -xrm xosview*swap:false \ + -xrm xosview*font:fixed \ + -xrm xosview*cpu:false \ + -xrm xosview*net:false \ + -xrm xosview*mem:true") +*Shelf: (Size 131x5, Frame 1) + + +# Disk monitor. +*Shelf: (Size 131x24, Frame 0, Swallow dskmon "exec xosview -xrm \ + xosview*borderWidth:0 -xrm xosview*foreground:#$[infostore.cs_09_bg] \ + -xrm xosview*background:#$[infostore.cs_09_bg] \ + -xrm xosview*diskIdleColor:#$[infostore.cs_09_bg] \ + -xrm xosview*diskWriteColor:#A98C40 -xrm xosview*diskReadColor:#CBAE62 \ + -xrm xosview*diskDecay:false -xrm xosview*diskGraph:false \ + -xrm xosview*captions:false -xrm xosview*diskPriority:1 \ + -xrm xosview*wireless:false -xrm xosview*labels:false \ + -xrm xosview*power:false -xrm xosview*title:dskmon -xrm xosview*load:false \ + -xrm xosview*page:false -xrm xosview*swap:false -xrm xosview*font:fixed \ + -xrm xosview*cpu:false -xrm xosview*net:false -xrm xosview*disk:true \ + -xrm xosview*mem:false") +*Shelf: (Size 131x5, Frame 1) + +# Network monitor. +*Shelf: (Size 131x24, Frame 0, Swallow netmon "exec xosview\ + -xrm xosview*background:#$[infostore.cs_09_bg] \ + -xrm xosview*foreground:#$[infostore.cs_09_bg] \ + -xrm xosview*netBackground:#$[infostore.cs_09_bg] \ + -xrm xosview*UsedFormat:autoscale \ + -xrm xosview*netOutColor:#CC0000 \ + -xrm xosview*netBandwidth:115875000 \ + -xrm xosview*netInColor:#0000CC \ + -xrm xosview*netIface:eno1 \ + -xrm xosview*netGraph:false \ + -xrm xosview*wireless:false \ + -xrm xosview*netPriority:1 \ + -xrm xosview*labels:false \ + -xrm xosview*title:netmon \ + -xrm xosview*power:false \ + -xrm xosview*netDecay:false \ + -xrm xosview*disk:false \ + -xrm xosview*font:fixed \ + -xrm xosview*load:false \ + -xrm xosview*page:false \ + -xrm xosview*swap:false \ + -xrm xosview*cpu:false \ + -xrm xosview*mem:false \ + -xrm xosview*net:true") + +# End of monitor widget block. + + +PipeRead 'echo "*Shelf: (Size 131x$(((($[vp.height]/53)*28)))), Frame 1)"' + + +# Start of auxiliary widget block. + +*Shelf: (Size 131x60, Frame 1, Swallow stalonetray, 'Exec exec stalonetray \ + --kludges force_icons_size --icon-size 32 --icon-gravity SE \ + --geometry 4x2 --background "#$[infostore.cs_09_bg]"') + +*Shelf: (Size 131x5, Frame 2) + +*Shelf: (Padding 5 0, Action Exec exec xcalendar, Size 131x30, Frame 2, \ + Swallow xclock, 'Exec exec /usr/bin/xclock -digital -strftime "%a %H:%M:%S"\ + -update 1 -bg "#$[infostore.cs_09_bg]" -sharp -face "$[infostore.small_font]"',\ + PressColorset 9) + +*Shelf: (Size 131x130, Frame 2, Swallow ShelfPager) diff --git a/scripts/fvwmscript/FvwmScript-ConfirmQuit b/scripts/fvwmscript/FvwmScript-ConfirmQuit index 9748da9..db9307a 100644 --- a/scripts/fvwmscript/FvwmScript-ConfirmQuit +++ b/scripts/fvwmscript/FvwmScript-ConfirmQuit @@ -62,7 +62,7 @@ Property Position 105 55 Type RadioButton Flags - Colorset 10 + Colorset 9 Value 1 Main Case message of @@ -82,7 +82,7 @@ Property Position 105 75 Type RadioButton Flags - Colorset 10 + Colorset 9 Value 0 Main Case message of @@ -103,7 +103,7 @@ Property Position 105 95 Type RadioButton Flags - Colorset 10 + Colorset 9 Value 0 Main Case message of @@ -124,7 +124,7 @@ Property Position 105 115 Type RadioButton Flags - Colorset 10 + Colorset 9 Value 0 Main Case message of @@ -142,7 +142,7 @@ Widget 10 Property Title {Ok} Size 71 28 - Colorset 13 + Colorset 9 Position 215 140 Flags NoReliefString Type PushButton @@ -186,7 +186,7 @@ Widget 11 Property Title {Cancel} Size 71 28 - Colorset 13 + Colorset 9 Position 286 140 Flags NoReliefString Type PushButton