From 3e90bbfaec0953f2ef74fa2827ac41678ee11dee Mon Sep 17 00:00:00 2001 From: dakkar Date: Thu, 13 Aug 2009 21:37:24 +0200 Subject: importing Crystal config into git --- components/bindings/Desktop-dakkar | 4 ++ components/bindings/Music | 8 ++++ components/bindings/Numpad-Focus | 13 +++++++ components/bindings/PageSwitch-Square | 11 ++++++ components/bindings/Pager-Square | 36 ++++++++++++++++++ components/bindings/TheLauncher | 2 + components/bindings/Window-Basic | 10 +++++ components/bindings/Window-Control-Dakkar | 9 +++++ components/bindings/Window-List | 11 ++++++ components/decorations/Buttons-os2-MiniIcon | 45 +++++++++++++++++++++++ components/desktop/Keyboard | 17 +++++++++ components/desktop/dakkar_Preferences | 6 +++ components/functions/Mixer-amixer | 25 +++++++++++++ components/functions/Music-amarok | 49 +++++++++++++++++++++++++ components/functions/Notify | 12 ++++++ components/functions/Numpad | 57 +++++++++++++++++++++++++++++ components/functions/Screen-Menu | 11 ++++++ components/scripts/FvwmScript-Clock-dakkar | 38 +++++++++++++++++++ components/styles/Application-Icons-22-32 | 2 + components/styles/Applications | 15 ++++++++ 20 files changed, 381 insertions(+) create mode 100644 components/bindings/Desktop-dakkar create mode 100644 components/bindings/Music create mode 100644 components/bindings/Numpad-Focus create mode 100644 components/bindings/PageSwitch-Square create mode 100644 components/bindings/Pager-Square create mode 100644 components/bindings/TheLauncher create mode 100644 components/bindings/Window-Basic create mode 100644 components/bindings/Window-Control-Dakkar create mode 100644 components/bindings/Window-List create mode 100644 components/decorations/Buttons-os2-MiniIcon create mode 100644 components/desktop/Keyboard create mode 100644 components/desktop/dakkar_Preferences create mode 100644 components/functions/Mixer-amixer create mode 100644 components/functions/Music-amarok create mode 100644 components/functions/Notify create mode 100644 components/functions/Numpad create mode 100644 components/functions/Screen-Menu create mode 100755 components/scripts/FvwmScript-Clock-dakkar create mode 100644 components/styles/Application-Icons-22-32 create mode 100644 components/styles/Applications (limited to 'components') diff --git a/components/bindings/Desktop-dakkar b/components/bindings/Desktop-dakkar new file mode 100644 index 0000000..57836e4 --- /dev/null +++ b/components/bindings/Desktop-dakkar @@ -0,0 +1,4 @@ +# Open screen on Alt+RMB +Mouse 3 RI $[Mod1] Exec exec $[DefaultTerminal] -title local-screen -e screen -D -RR + +Key XF86SplitScreen A N Exec emacsclient -nc diff --git a/components/bindings/Music b/components/bindings/Music new file mode 100644 index 0000000..02d963d --- /dev/null +++ b/components/bindings/Music @@ -0,0 +1,8 @@ +Key XF86AudioLowerVolume A $[Mod0] Mixer-Volume-Down 5 +Key XF86AudioRaiseVolume A $[Mod0] Mixer-Volume-Up 5 +Key XF86AudioMute A $[Mod0] Mixer-GUI +Key XF86Eject A $[Mod0] Music-GUI + +Key XF86AudioPlay A $[Mod0] Music-PlayPause +Key XF86AudioNext A $[Mod] Music-Next +Key XF86AudioPrev A $[Mod] Music-Prev diff --git a/components/bindings/Numpad-Focus b/components/bindings/Numpad-Focus new file mode 100644 index 0000000..f09ddd9 --- /dev/null +++ b/components/bindings/Numpad-Focus @@ -0,0 +1,13 @@ +# Here are the bindings for focus-switching using the numpad +# This version only switches the focus +Key KP_Home A $[Mod1] Window-FocusInDirection NorthWest +Key KP_Left A $[Mod1] Window-FocusInDirection West +Key KP_End A $[Mod1] Window-FocusInDirection SouthWest +Key KP_Up A $[Mod1] Window-FocusInDirection North +Key KP_Down A $[Mod1] Window-FocusInDirection South +Key KP_Page_Up A $[Mod1] Window-FocusInDirection NorthEast +Key KP_Page_Down A $[Mod1] Window-FocusInDirection SouthEast +Key KP_Right A $[Mod1] Window-FocusInDirection East +Key KP_Begin A $[Mod1] Window-FocusInDirection Center + +# vim:ft=fvwm diff --git a/components/bindings/PageSwitch-Square b/components/bindings/PageSwitch-Square new file mode 100644 index 0000000..043a867 --- /dev/null +++ b/components/bindings/PageSwitch-Square @@ -0,0 +1,11 @@ +Key Left A $[Mod1] GotoPage -1p 0p +Key Right A $[Mod1] GotoPage +1p 0p +Key Up A $[Mod1] GotoPage 0p -1p +Key Down A $[Mod1] GotoPage 0p +1p + + +Key Left A $[Mod2] WarpToPage-Left +Key Right A $[Mod2] WarpToPage-Right +Key Up A $[Mod2] WarpToPage-Up +Key Down A $[Mod2] WarpToPage-Down + diff --git a/components/bindings/Pager-Square b/components/bindings/Pager-Square new file mode 100644 index 0000000..54943d0 --- /dev/null +++ b/components/bindings/Pager-Square @@ -0,0 +1,36 @@ +Key XF86MonBrightnessDown A M4 GotoPage 0 0 +Key XF86MonBrightnessUp A M4 GotoPage 1 0 +Key XF86SplitScreen A M4 GotoPage 2 0 +Key XF86TaskPane A M4 GotoPage 3 0 +Key F5 A M4 GotoPage 4 0 + +Key 1 A M4 GotoPage 0 1 +Key 2 A M4 GotoPage 1 1 +Key 3 A M4 GotoPage 2 1 +Key 4 A M4 GotoPage 3 1 +Key 5 A M4 GotoPage 4 1 + +Key apostrophe A M4 GotoPage 0 2 +Key comma A M4 GotoPage 1 2 +Key period A M4 GotoPage 2 2 +Key P A M4 GotoPage 3 2 +Key Y A M4 GotoPage 4 2 + +Key A A M4 GotoPage 0 3 +Key O A M4 GotoPage 1 3 +Key E A M4 GotoPage 2 3 +Key U A M4 GotoPage 3 3 +Key I A M4 GotoPage 4 3 + +Key semicolon A M4 GotoPage 0 4 +Key Q A M4 GotoPage 1 4 +Key J A M4 GotoPage 2 4 +Key K A M4 GotoPage 3 4 +Key X A M4 GotoPage 4 4 + +# Go to previouse page using Escape +Key Escape A $[Mod1] GotoPage prev + +# Move focused window to the last used page +Key Escape A $[Mod2] MoveToPage-Focus prev + diff --git a/components/bindings/TheLauncher b/components/bindings/TheLauncher new file mode 100644 index 0000000..ea0f170 --- /dev/null +++ b/components/bindings/TheLauncher @@ -0,0 +1,2 @@ +Key section A $[Mod1] Exec exec thelauncher +Style Thelauncher NoTitle, !Borders, WindowListSkip, CirculateSkip diff --git a/components/bindings/Window-Basic b/components/bindings/Window-Basic new file mode 100644 index 0000000..d67845b --- /dev/null +++ b/components/bindings/Window-Basic @@ -0,0 +1,10 @@ +# Basic window bindings + +Mouse 1 T $[Mod] Window-Raise-RaiseMove +Mouse 2 T $[Mod] Window-Shade-Resize +Mouse 3 T $[Mod] Window-Lower-Move + +Mouse 1 WT $[Mod1] Window-Raise-RaiseMove +Mouse 2 WT $[Mod1] Popup /Window-Menu Mouse -50m +5p +Mouse 3 WT $[Mod1] Window-Lower-Move + diff --git a/components/bindings/Window-Control-Dakkar b/components/bindings/Window-Control-Dakkar new file mode 100644 index 0000000..3080bfb --- /dev/null +++ b/components/bindings/Window-Control-Dakkar @@ -0,0 +1,9 @@ +Key W A $[Mod1] Close +Key M A $[Mod1] Window-Iconify +Key KP_Add A $[Mod1] Raise +Key KP_Subtract A $[Mod1] Lower +Key KP_Multiply A $[Mod1] PlaceAgain +Key KP_Equal A $[Mod1] Window-Shade toggle +Key KP_Up A $[Mod2] Maximize toggle 0 100 +Key KP_Right A $[Mod2] Maximize toggle 100 0 +Key KP_Begin A $[Mod2] Maximize toggle 100 100 diff --git a/components/bindings/Window-List b/components/bindings/Window-List new file mode 100644 index 0000000..9710532 --- /dev/null +++ b/components/bindings/Window-List @@ -0,0 +1,11 @@ +# Window list + +# Show only windows on current page +#Key Tab A $[Mod1] Window-List-Page "root c c" +# Show windows on all pages +Key Tab A $[Mod1] Window-List "root c c" + + +# This menu shows iconified windows +Key Tab A $[Mod2] Window-List-Icons "root c c" + diff --git a/components/decorations/Buttons-os2-MiniIcon b/components/decorations/Buttons-os2-MiniIcon new file mode 100644 index 0000000..798fe66 --- /dev/null +++ b/components/decorations/Buttons-os2-MiniIcon @@ -0,0 +1,45 @@ +# OS/2 Button Setup +# Written by Maciej Delmanowski +# +# This is the window titlebar button setup similar to the OS/2 +# buttons on the titlebar + +# 1st button - close +Mouse 1 1 $[Mod] Window-Button-Function Button1 /Window-Menu Close +Mouse 2 1 $[Mod] Window-Button-Function Button1 /Window-Menu Nop +Mouse 3 1 $[Mod] Window-Button-Function Button1 /Window-Menu Window-Iconify +Style * Button 1 + +# 2nd button - various ways to maximize a window +Mouse 1 2 $[Mod0] Window-Button-Function Button2 /Window-Menu-Maximize Maximize +Mouse 2 2 $[Mod0] Window-Button-Function Button2 /Window-Menu-Maximize Maximize 100 0 +Mouse 3 2 $[Mod0] Window-Button-Function Button2 /Window-Menu-Maximize Maximize 0 100 +Mouse 1 2 $[Mod1] Window-Button-Function Button2 /Window-Menu-Maximize Maximize grow grow +Mouse 2 2 $[Mod1] Window-Button-Function Button2 /Window-Menu-Maximize Maximize grow 0 +Mouse 3 2 $[Mod1] Window-Button-Function Button2 /Window-Menu-Maximize Maximize 0 grow +Style * Button 2 + +# MiniIcon +Mouse 1 3 $[Mod] Window-Raise-MoveRaise +Mouse 2 3 $[Mod] Window-Shade-Resize +Mouse 3 3 $[Mod] Window-Lower-Move +Style * Button 3 + +# 4th button - iconify +Mouse 1 4 $[Mod] Window-Button-Function Button4 /Window-Menu Window-Iconify +Mouse 2 4 $[Mod] Window-Button-Function Button4 /Window-Menu Nop +Mouse 3 4 $[Mod] Window-Button-Function Button4 /Window-Menu Nop +Style * Button 4 + +Style * NoButton 5 + +Style * NoButton 6 + +Style * NoButton 7 + +Style * NoButton 8 + +Style * NoButton 9 + +Style * NoButton 0 + diff --git a/components/desktop/Keyboard b/components/desktop/Keyboard new file mode 100644 index 0000000..84bd7d9 --- /dev/null +++ b/components/desktop/Keyboard @@ -0,0 +1,17 @@ +# Standard keyboard layout +# You need several functions to use all of the keybindings + +Include components/bindings/Music +Include components/bindings/Pager-Square +Include components/bindings/PageSwitch-Square +#Include components/bindings/Window-Control +Include components/bindings/Window-List +#Include components/bindings/Window-Rearrange +Include components/bindings/Misc-Keybindings +Include components/bindings/Window-Control-Dakkar +Include components/bindings/Numpad-Focus +Include components/bindings/TheLauncher + +Key apostrophe A $[Mod1] Menu /Applications root c c +Key quotedbl A $[Mod1] Menu /FVWM-Crystal root c c + diff --git a/components/desktop/dakkar_Preferences b/components/desktop/dakkar_Preferences new file mode 100644 index 0000000..b2d6254 --- /dev/null +++ b/components/desktop/dakkar_Preferences @@ -0,0 +1,6 @@ +AddToMenu /Preferences/Mixer +Test (x amixer) + '%22x22/apps/alsamixer.png%ALSA' SelectMixer amixer + +AddToMenu /Preferences/MusicPlayer +Test (x amarok) + '%22x22/apps/amarok.png%AmaroK' SelectMusicPlayer amarok + diff --git a/components/functions/Mixer-amixer b/components/functions/Mixer-amixer new file mode 100644 index 0000000..2f2d705 --- /dev/null +++ b/components/functions/Mixer-amixer @@ -0,0 +1,25 @@ +DestroyFunc Mixer-Volume +AddToFunc Mixer-Volume ++ I Exec amixer set PCM "$0"'%' > /dev/null + +DestroyFunc Mixer-Volume-Up +AddToFunc Mixer-Volume-Up ++ I Exec amixer set PCM "$0"'%+' > /dev/null + +DestroyFunc Mixer-Volume-Down +AddToFunc Mixer-Volume-Down ++ I Exec amixer set PCM "$0"'%-' > /dev/null + +DestroyFunc Mixer-GUI +AddToFunc Mixer-GUI ++ I Exec exec gamix > /dev/null + +# Mixer menu +DestroyMenu /Mixer +AddToMenu /Mixer ++ "100%%" Mixer-Volume 100 ++ "90%%" Mixer-Volume 90 ++ "80%%" Mixer-Volume 80 ++ "50%%" Mixer-Volume 50 ++ "30%%" Mixer-Volume 30 ++ "0%%" Mixer-Volume 0 diff --git a/components/functions/Music-amarok b/components/functions/Music-amarok new file mode 100644 index 0000000..8a5ab35 --- /dev/null +++ b/components/functions/Music-amarok @@ -0,0 +1,49 @@ +DestroyMenu /Music +AddToMenu /Music ++ DynamicPopupAction Function /Music-generator + +DestroyFunc /Music-generator +AddToFunc /Music-generator ++ I DestroyMenu recreate /Music ++ I AddToMenu /Music '$[gt.Toggle random]' Music-ToggleRandom ++ I AddToMenu /Music '$[gt.Toggle repeat]' Music-ToggleRepeat ++ I AddToMenu /Music "" Nop ++ I AddToMenu /Music '$[gt.Stop playback]' Music-Stop ++ I AddToMenu /Music '$[gt.Show/hide player]' Music-GUI ++ I AddToMenu /Music '$[gt.Play/Pause]' Music-PlayPause + +DestroyFunc Music-Play +AddToFunc Music-Play ++ I Exec exec dcop amarok player play 2>/dev/null + +DestroyFunc Music-Pause +AddToFunc Music-Pause ++ I Exec exec dcop amarok player pause 2>/dev/null + +DestroyFunc Music-Stop +AddToFunc Music-Stop ++ I Exec exec dcop amarok player stop 2>/dev/null + +DestroyFunc Music-PlayPause +AddToFunc Music-PlayPause ++ I Exec exec dcop amarok player playPause 2>/dev/null + +DestroyFunc Music-Next +AddToFunc Music-Next ++ I Exec exec dcop amarok player next 2>/dev/null + +DestroyFunc Music-Prev +AddToFunc Music-Prev ++ I Exec exec dcop amarok player prev 2>/dev/null + +DestroyFunc Music-ToggleRandom +AddToFunc Music-ToggleRandom ++ I Exec exec dcop amarok player enableRandomMode $( if [ $(dcop amarok player randomModeStatus) == false ]; then echo true; else echo false;fi) 2>/dev/null + +DestroyFunc Music-ToggleRepeat +AddToFunc Music-ToggleRepeat ++ I Exec exec dcop amarok player enableRepeatPlaylist $( if [ $(dcop amarok player repeatPlaylistStatus) == false ]; then echo true; else echo false;fi) 2>/dev/null + +DestroyFunc Music-GUI +AddToFunc Music-GUI ++ I Exec dcop amarok playlist togglePlaylist 2>/dev/null || amarok diff --git a/components/functions/Notify b/components/functions/Notify new file mode 100644 index 0000000..f0c2a55 --- /dev/null +++ b/components/functions/Notify @@ -0,0 +1,12 @@ +AddToFunc StartFunction ++ I ModuleSynchronous FvwmPerl NotifyPerl ++ I SendToModule NotifyPerl load FvwmNotify.pm + +DestroyFunc BubbleNotify +AddToFunc BubbleNotify ++ I SendToModule NotifyPerl eval FvwmNotify::notify(q{$0},q{$1},q{$2},q{$3},q{$4}) + +DestroyFunc UrgencyFunc +AddtoFunc UrgencyFunc ++ I BubbleNotify $[w.name] $[w.name] 'beep!' 2000 $[w.iconfile] + diff --git a/components/functions/Numpad b/components/functions/Numpad new file mode 100644 index 0000000..b694ee3 --- /dev/null +++ b/components/functions/Numpad @@ -0,0 +1,57 @@ +# Numpad + +# --------------------------------------------------------------------------- +# Focus functions +DestroyFunc Window-FocusInDirection +AddToFunc Window-FocusInDirection ++ I Direction $0 (CurrentPage, AnyScreen, AcceptsFocus, !Iconic) Focus + +DestroyFunc Window-FocusAndRaiseInDirection +AddToFunc Window-FocusAndRaiseInDirection ++ I Direction $0 (CurrentPage, AnyScreen, AcceptsFocus, !Iconic) Focus ++ I Current (Focused) Raise + +# --------------------------------------------------------------------------- +# Move functions +DestroyFunc Window-MPAnimatedMove +AddToFunc Window-MPAnimatedMove ++ I Current (HasPointer) AnimatedMove $0 $1 Warp ++ I TestRc (NoMatch) AnimatedMove $0 $1 + +DestroyFunc Window-Warp-CenterCenter +AddToFunc Window-Warp-CenterCenter ++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] / 2 - $[w.width] / 2`p `expr $[vp.height] / 2 - $[w.height] / 2`p' + +DestroyFunc Window-Warp-LeftCenter +AddToFunc Window-Warp-LeftCenter ++ I Current Piperead 'echo Window-MPAnimatedMove $[EWMH_BS_Panel_Left]p `expr $[vp.height] / 2 - $[w.height] / 2`p' + +DestroyFunc Window-Warp-LeftTop +AddToFunc Window-Warp-LeftTop ++ I Current Window-MPAnimatedMove $[EWMH_BS_Panel_Left]p $[EWMH_BS_Panel_Top]p + +DestroyFunc Window-Warp-CenterTop +AddToFunc Window-Warp-CenterTop ++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] / 2 - $[w.width] / 2`p $[EWMH_BS_Panel_Top]p' + +DestroyFunc Window-Warp-RightTop +AddToFunc Window-Warp-RightTop ++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] - $[EWMH_BS_Panel_Right] - $[w.width]`p $[EWMH_BS_Panel_Top]p' + +DestroyFunc Window-Warp-RightCenter +AddToFunc Window-Warp-RightCenter ++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] - $[EWMH_BS_Panel_Right] - $[w.width]`p `expr $[vp.height] / 2 - $[w.height] / 2`p' + +DestroyFunc Window-Warp-CenterBottom +AddToFunc Window-Warp-CenterBottom ++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] / 2 - $[w.width] / 2`p `expr $[vp.height] - $[EWMH_BS_Panel_Bottom] - $[w.height]`p' + +DestroyFunc Window-Warp-LeftBottom +AddToFunc Window-Warp-LeftBottom ++ I Current Piperead 'echo Window-MPAnimatedMove $[EWMH_BS_Panel_Left]p `expr $[vp.height] - $[EWMH_BS_Panel_Bottom] - $[w.height]`p' + +DestroyFunc Window-Warp-RightBottom +AddToFunc Window-Warp-RightBottom ++ I Current Piperead 'echo Window-MPAnimatedMove `expr $[vp.width] - $[EWMH_BS_Panel_Right] - $[w.width]`p `expr $[vp.height] - $[EWMH_BS_Panel_Bottom] - $[w.height]`p' + +# vim:ft=fvwm diff --git a/components/functions/Screen-Menu b/components/functions/Screen-Menu new file mode 100644 index 0000000..e32dc39 --- /dev/null +++ b/components/functions/Screen-Menu @@ -0,0 +1,11 @@ +DestroyMenu /Screens +AddToMenu /Screens ++ DynamicPopupAction Function BuildScreensMenu + +DestroyFunc BuildScreensMenu +AddToFunc BuildScreensMenu ++ I DestroyMenu recreate /Screens ++ I AddToMenu /Screens ++ I PipeRead $[FVWM_USERDIR]/scripts/fvwm-screen.pl + +Mouse 3 RI $[Mod1] Popup /Screens diff --git a/components/scripts/FvwmScript-Clock-dakkar b/components/scripts/FvwmScript-Clock-dakkar new file mode 100755 index 0000000..a298848 --- /dev/null +++ b/components/scripts/FvwmScript-Clock-dakkar @@ -0,0 +1,38 @@ +WindowTitle {FvwmScript-Clock} +WindowSize 165 20 +Font "xft:Tahoma:pixelsize=12:Bold" +Colorset 1 + +Init + Begin + + Set $tmp = (GetOutput {exec date "+%Y-%m-%d %a %H:%M"} 1 -1) + + ChangeTitle 1 $tmp +End + +PeriodicTasks + Begin + If (RemainderOfDiv (GetTime) 60)==0 Then + Begin + + Set $tmp = (GetOutput {exec date "+%Y-%m-%d %a %H:%M"} 1 -1) + + ChangeTitle 1 $tmp + End +End + +Widget 1 +Property + Position 0 -3 + Size 165 20 + Type ItemDraw + Flags NoReliefString + Title {} + Colorset 1 +Main + Case message of + SingleClic : + Begin + End +End diff --git a/components/styles/Application-Icons-22-32 b/components/styles/Application-Icons-22-32 new file mode 100644 index 0000000..8fc04c5 --- /dev/null +++ b/components/styles/Application-Icons-22-32 @@ -0,0 +1,2 @@ +Style xchat-2 MiniIcon 22x22/apps/xchat.png, Icon 32x32/apps/xchat.png +Style skype.bin MiniIcon 22x22/apps/skype.png, Icon 32x32/apps/skype.png diff --git a/components/styles/Applications b/components/styles/Applications new file mode 100644 index 0000000..9e0136e --- /dev/null +++ b/components/styles/Applications @@ -0,0 +1,15 @@ +Style xpad NoTitle, !Borders + +Style xine NoTitle, !Borders +Style "xine Video Window" Title, Borders +Style Xitk NoTitle, !Borders + +Style mwatch NoTitle, NoHandles, WindowListSkip, BorderWidth 0, \ + CirculateSkip, StaysOnBottom, \ + Sticky, StickyAcrossPages, StickyAcrossDesks, FixedPosition + +Style Firefox MiniIcon $[FVWM_USERDIR]/icons/$[Icon_Theme]/22x22/apps/firefox.png +Style Claws-mail MiniIcon $[FVWM_USERDIR]/icons/$[Icon_Theme]/22x22/apps/claws-mail.png +Style Pidgin MiniIcon $[FVWM_USERDIR]/icons/$[Icon_Theme]/22x22/apps/pidgin.png + + -- cgit v1.2.3