# @(#)windowrc	3.7 6/4/85
#
# Copyright (c) 1983 Regents of the University of California,
# All rights reserved.  Redistribution permitted subject to
# the terms of the Berkeley Software License Agreement.
#
# Configuration file example for window manager
# To be installed in ~/.windowrc
#
# Create two unequal sized windows of full screen width,
# and set up some useful aliases.
#

#
# Optional settings
#
# terse on			# set terse mode
# escape "^A"			# set escape character
# nline 100			# set default buffer size
				# initially, this is 48

#
# Make two windows
# The bottom one is MIN(24, total lines * 3 / 4) lines
# The top one is the rest of the screen.
#
three_fourth = $nrow - ((_ = $nrow * 3 / 4) > 24 ? 24 : $_)
unset _
window row = 0, nrow = $three_fourth - 1, label = "Top"
window row = $three_fourth, label = "Local"

#
# Useful aliases
#
#
# Standard window
#
alias std "window r = $three_fourth, l = $?1 ? $1 : ''"
#
# Sysline, add your own options
#
alias sysline "_ = select();" \
	"foreground window(r = 0, nr = 1, nc = $ncol + 1, nl = 0," \
		"l = sysline, pty = no, frame = no, sh = sysline \\-w), 1;" \
	"select $_; unset _"
#
# Rlogin
#
alias rlogin "window r = $three_fourth, l = $1, pty = no, mapnl = no," \
	"sh = sh \\-c 'echo $TERMCAP | rsh ' + $1 + ' \\'cat > .TERMCAP\\' ;" \
	"exec rlogin ' + $1"
alias rl rlogin \$1
#
# Two equal windows
#
alias two "window r = 1, nr = $nrow / 2 - 1, l = top;" \
	"window r = $nrow / 2 + 1, l = bottom"