aboutsummaryrefslogtreecommitdiff
path: root/XMonad
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad')
-rwxr-xr-xXMonad/baraction30
-rw-r--r--XMonad/xmonad.hs41
2 files changed, 28 insertions, 43 deletions
diff --git a/XMonad/baraction b/XMonad/baraction
index 72422d83..9cdbbbb2 100755
--- a/XMonad/baraction
+++ b/XMonad/baraction
@@ -1,8 +1,14 @@
#!/bin/zsh
+COLOR1="#130F23"
+COLOR2="#8D5BD0"
+A1="%{B"$COLOR2"}%{F"$COLOR1"}%{B"$COLOR1"}%{F-}"
+A2="%{B"$COLOR1"}%{F"$COLOR2"}%{B"$COLOR2"}%{F-}"
+
clock() {
datetime=$(date +"%d %b(%A) %H:%M")
- echo "%{B#6c71c4}%{F#f0f0f0} $datetime %{B-}%{F-}"
+ # echo "%{B#6c71c4}%{F#f0f0f0} $datetime %{B-}%{F-}"
+ echo $datetime
}
cpu_load() {
@@ -12,40 +18,32 @@ cpu_load() {
read cpu a b c idle rest < /proc/stat
total=$((a+b+c+idle))
cpu=$((100*( (total-prevtotal) - (idle-previdle) ) / (total-prevtotal) ))
- echo -e "%{B#ff0077}%{F#FCFCFC} CPU: $cpu% %{B-}%{F-}"
+ echo CPU:$cpu%
}
cpu_temp() {
CEL=$'\xc2\xb0C'
temp=$( cat /sys/devices/virtual/thermal/thermal_zone0/temp )
temp=`expr $temp / 1000`
- echo "%{B#135ef0}%{F#FCFCFC} TEMP: "$temp$CEL" %{B-}%{F-}"
+ echo TEMP:$temp$CEL
}
mem_usage() {
mem=$(free -m | grep Mem: | awk '{print$3 / $2 * 100}')
- echo "%{B#14eea0}%{F#232627}"
- printf " MEM: %.0f%% " $mem
- echo "%{B-}%{F-}"
-}
-
-weather() {
- echo "wttr.in"
- # echo $(</tmp/weather_stat)
+ # echo "%{B#14eea0}%{F#232627}"
+ printf "MEM: %.0f%%" $mem
}
volume() {
volume_level=$(pamixer --get-volume-human)
if [ $volume_level = "muted" ]; then
- echo "%{B#ef0222}%{F-} ""muted"" %{B-}%{F-}"
+ echo "%{F#ff0058}VOL: $(pamixer --get-volume)%{F-}"
else
- echo "%{B#ef5902}%{F#000000} VOL: $volume_level %{B-}%{F-}"
+ echo "VOL: $volume_level"
fi
}
-s=" " # spacing between modules
-
while :; do
- echo "%{r}"$(weather)$s$(volume)$s$(cpu_temp)$s$(cpu_load)$s$(mem_usage)$s$(clock)
+ echo "%{r}"$A2$A1$(volume)$A2$(cpu_temp)$A1$(cpu_load)$A2$(mem_usage)$A1$(clock)
sleep 3
done
diff --git a/XMonad/xmonad.hs b/XMonad/xmonad.hs
index 2f3ff01c..637fee8a 100644
--- a/XMonad/xmonad.hs
+++ b/XMonad/xmonad.hs
@@ -34,6 +34,7 @@ import XMonad.Layout.Spiral
import XMonad.Layout.ResizableTile
import XMonad.Layout.Maximize
import XMonad.Layout.Tabbed -- fix this it doesnt work
+import XMonad.Layout.NoBorders
-- hooks
import XMonad.Hooks.SetWMName
@@ -51,7 +52,7 @@ import XMonad.Util.NamedScratchpad
myStartupHook :: X ()
myStartupHook = do
- spawnOnce "/home/zt/.xmonad/baraction | lemonbar -b -g 500x21+800+0 -B '#171520' -F '#ffffff' -f 'Source Han Sans JP:size=10'"
+ --spawnOnce "/home/zt/.xmonad/baraction | lemonbar -b -g 500x21+800+0 -B '#171520' -F '#ffffff' -f 'Source Han Sans JP:size=10'"
-- spawnOnce "nitrogen --restore"
-- spawnOnce "startpage-server"
-- spawnOnce "picom"
@@ -123,7 +124,7 @@ fBorder = "#00ff85"
myBorderWidth = 1
sGap = 1 -- screen gap
-wGap = 1 -- window gap
+wGap = 2 -- window gap
myExtraWorkspaces = [(xK_0, " 十 ")] -- , (xK_comma, " 十一 "), (xK_period, " 十二 "), (xK_slash, " 十三 ")]
myWorkspaces = [" 一 "," 二 "," 三 "," 四 "," 五 "," 六 "," 七 "," 八 ", " 九 "] ++ (map snd myExtraWorkspaces)
@@ -160,17 +161,6 @@ myTSConfig = TS.TSConfig { TS.ts_hidechildren = False
, TS.ts_navigate = TS.defaultNavigation
}
--- myTreeMenu :: TS.TSConfig (X ()) -> X ()
--- myTreeMenu a = TS.treeselectAction a
--- [ Node (TS.TSNode "Hello" "displays hello" (spawn "xmessage hello!")) []
--- , Node (TS.TSNode "Shutdown" "Poweroff the system" (spawn "shutdown")) []
--- , Node (TS.TSNode "Brightness" "Sets screen brightness using xbacklight" (return ()))
--- [ Node (TS.TSNode "Bright" "FULL POWER!!" (spawn "xbacklight -set 100")) []
--- , Node (TS.TSNode "Normal" "Normal Brightness (50%)" (spawn "xbacklight -set 50")) []
--- , Node (TS.TSNode "Dim" "Quite dark" (spawn "xbacklight -set 10")) []
--- ]
--- ]
-
myPowerMenu :: TS.TSConfig (X ()) -> X ()
myPowerMenu a = TS.treeselectAction a
[Node (TS.TSNode "SHUTDOWN" "It's not like I'm gonna miss you, b- baka!" (spawn "shutdown now")) []
@@ -363,24 +353,20 @@ myTabTheme = def { fontName = "roboto"
-- layouts
-myGap = spacingRaw False (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True
-
+myGap = spacingRaw True (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True
-myLayouts = avoidStruts (
- renamed [R.Replace "BSP"] (maximize $ fullscreenFocus $ windowNavigation $ myGap $ emptyBSP)
- ||| renamed [R.Replace "ThreeCol Mid (1)"] (maximize $ fullscreenFocus $ windowNavigation $ myGap $ ThreeColMid 1 (3/100) (1/2))
- ||| renamed [R.Replace "ThreeCol Mid (2)"] (maximize $ fullscreenFocus $ windowNavigation $ myGap $ ThreeColMid 2 (3/100) (1/2))
- ||| renamed [R.Replace "Grid"] (maximize $ fullscreenFocus $ windowNavigation $ myGap $ Grid)
- ||| renamed [R.Replace "TwoPane"] (maximize $ fullscreenFocus $ windowNavigation $ myGap $ TwoPane (3/100) (1/2))
- ||| renamed [R.Replace "ThreeCol (1)"] (maximize $ fullscreenFocus $ windowNavigation $ myGap $ ThreeCol 1 (3/100) (1/2))
- ||| renamed [R.Replace "ThreeCol (2)"] (maximize $ fullscreenFocus $ windowNavigation $ myGap $ ThreeCol 2 (3/100) (1/2))
+myLayoutHook = avoidStruts (
+ renamed [R.Replace "BSP"] (maximize $ smartBorders $ fullscreenFocus $ windowNavigation $ myGap $ emptyBSP)
+ ||| renamed [R.Replace "ThreeCol Mid (1)"] (maximize $ smartBorders $ fullscreenFocus $ windowNavigation $ myGap $ ThreeColMid 1 (3/100) (1/2))
+ ||| renamed [R.Replace "ThreeCol Mid (2)"] (maximize $ smartBorders $ fullscreenFocus $ windowNavigation $ myGap $ ThreeColMid 2 (3/100) (1/2))
+ ||| renamed [R.Replace "Grid"] (maximize $ smartBorders $ fullscreenFocus $ windowNavigation $ myGap $ Grid)
+ ||| renamed [R.Replace "TwoPane"] (maximize $ smartBorders $ fullscreenFocus $ windowNavigation $ myGap $ TwoPane (3/100) (1/2))
+ ||| renamed [R.Replace "ThreeCol (1)"] (maximize $ smartBorders $ fullscreenFocus $ windowNavigation $ myGap $ ThreeCol 1 (3/100) (1/2))
+ ||| renamed [R.Replace "ThreeCol (2)"] (maximize $ smartBorders $ fullscreenFocus $ windowNavigation $ myGap $ ThreeCol 2 (3/100) (1/2))
||| tabbedRight shrinkText def
)
-myLayoutHook = myLayouts
-
-
myLemonbarPP = def {ppCurrent = wrap "%{B#d33682}" "%{B-}"
, ppWsSep = ""
, ppHidden = wrap "%{B#268bd2}" "%{B-}"
@@ -394,7 +380,8 @@ myLemonbarPP = def {ppCurrent = wrap "%{B#d33682}" "%{B-}"
}
main = do
- notXMobar <- spawnPipe "lemonbar -b -g 800x21+0+0 -B '#171520' -F '#ffffff' -f 'Source Han Sans JP:size=10' -o -3 -f 'RobotoMono Nerd Font:style=Regular:size=15' -f -n 'notXMobar' -o 0"
+ notXMobar <- spawnPipe "lemonbar -b -g 1366x21+0+0 -B '#130F23' -F '#ffffff' -f 'Source Han Sans JP:size=10' -o -3 -f 'RobotoMono Nerd Font:style=Regular:size=15' -f -n 'notXMobar' -o 0"
+ statusBar <- spawnPipe "/home/zt/.xmonad/baraction | lemonbar -g 1366x21+0+0 -B '#130F23' -F '#ffffff' -o -3 -f 'Source Han Sans JP:size=10' -o 0 -f 'RobotoMono Nerd Font:style=Regular:size=15'"
xmonad $ docks def
{
terminal = myTerminal,