dots

Personal dotfiles
git clone git://git.gormless.xyz/dots.git
Log | Files | Refs

corner (487B)


      1 #!/bin/sh
      2 
      3 CUR=${2:-$(pfw)}
      4 ROOT=$(lswin -r)
      5 SW=$(wattr w $ROOT)
      6 SH=$(wattr h $ROOT)
      7 
      8 BW=$(wattr b $CUR)
      9 W=$(wattr w $CUR)
     10 H=$(wattr h $CUR)
     11 
     12 GAP=${GAP:-4}
     13 BAR=${BAR:-18}
     14 
     15 X=$GAP
     16 Y=$GAP
     17 
     18 case $1 in
     19         tl) Y=$((GAP + BAR)) ;;
     20 	tr) X=$((SW - W - GAP - BW*2))
     21 	    Y=$((GAP + BAR)) ;;
     22 	bl) Y=$((SH - H - GAP - BW*2)) ;;
     23 	br) X=$((SW - W - GAP - BW*2))
     24 	    Y=$((SH - H - GAP - BW*2)) ;;
     25 	md) X=$((SW/2 - W/2 - BW))
     26             Y=$((SH/2 - H/2 + BAR - BW));;
     27 esac
     28 
     29 wtp $X $Y $W $H $CUR