horizontal bar

2 files changed, 68 insertions, 0 deletions

diff --git a/fvwm/.fvwm/fvwmscript/FvwmScript-ACPIStatus-Horizontal b/fvwm/.fvwm/fvwmscript/FvwmScript-ACPIStatus-Horizontal
new file mode 100644
index 0000000..aff94a6
--- /dev/null
+++ b/fvwm/.fvwm/fvwmscript/FvwmScript-ACPIStatus-Horizontal
@@ -0,0 +1,35 @@
+WindowTitle {ACPIStatus}
+WindowSize  120 35
+Font "xft:Iosevka Comfy:size=14"
+
+Init
+ Begin
+  Set $Battery = (GetOutput {exec acpi | sed -e 's/^.*, \([0-9]*\)%.*$/\1%/g'} 1 -1)
+
+  ChangeTitle 1 $Battery
+End
+
+PeriodicTasks
+ Begin
+  If (RemainderOfDiv (GetTime) 60)==0 Then
+  Begin
+   Set $Battery = (GetOutput {exec acpi | sed -e 's/^.*, \([0-9]*\)%.*$/\1%/g'} 1 -1)
+
+   ChangeTitle 1 $Battery
+  End
+End
+
+Widget 1
+Property
+ Position 0 -5
+ Size 40 35
+ Font "xft:Iosevka Comfy:size=14"
+ Type ItemDraw
+ Flags NoReliefString
+ Title {}
+Main
+ Case message of
+  SingleClic :
+  Begin
+  End
+End
diff --git a/fvwm/.fvwm/fvwmscript/FvwmScript-DateTime-Horizontal b/fvwm/.fvwm/fvwmscript/FvwmScript-DateTime-Horizontal
new file mode 100644
index 0000000..6f3e260
--- /dev/null
+++ b/fvwm/.fvwm/fvwmscript/FvwmScript-DateTime-Horizontal
@@ -0,0 +1,33 @@
+WindowTitle {DateTime}
+WindowSize  160 35
+Font "xft:Iosevka Comfy:size=14"
+
+Init
+ Begin
+  Set $Time = (GetOutput {exec date "+%Y-%m-%d %H:%M"} 1 -1)
+  ChangeTitle 1 $Time
+End
+
+PeriodicTasks
+ Begin
+  If (RemainderOfDiv (GetTime) 15)==0 Then
+  Begin
+   Set $Time = (GetOutput {exec date "+%Y-%m-%d %H:%M"} 1 -1)
+   ChangeTitle 1 $Time
+  End
+End
+
+Widget 1
+Property
+ Position 0 -5
+ Size 160 35
+ Font "xft:Iosevka Comfy:size=14"
+ Type ItemDraw
+ Flags NoReliefString
+ Title {}
+Main
+ Case message of
+  SingleClic :
+  Begin
+  End
+End
\ No newline at end of file