# 2024-03-17T17:12:23-04:00
DISPLAY=:0
aiju=(◔ ◡ ◔)
d00d=0xd00000000000000d
fish='<o)))><|'
goodday=(добрый день)
gopher=(ʕ◔ϖ◔ʔ)
heart=♥
ku=く
lol=ЛУЛ
meow=мяу
nine=➈
phone=☎
rg=▼
shr='#σc'
sl=sℓ
ss=ᛋᛋ
scr=(`{cat /dev/draw/new >[2]/dev/null})
w=$scr(11)
h=$scr(12)
font=/lib/font/bit/vga/unicode.font
if(! test -x /boot/factotum)
	service=unix
if(~ $service unix){
	hostname=`{hostname -s}
	os=`{uname}
	PLAN9=/usr/local/plan9
	PLAN9FRONT=/usr/local/plan9front
	path=($HOME/bin $PLAN9FRONT/bin $PLAN9/bin /bin /sbin /usr/bin /usr/sbin /usr/X11R6/bin /usr/local/bin /usr/local/sbin /usr/games $HOME/go/bin .)
	font=$HOME/lib/font/lucm/unicode.9.font
	prompt=$hostname^'; '
	fn $hostname {}
	GOPATH=$HOME/go
	GOROOT=/usr/local/go
	GO111MODULE=off
	GOTELEMETRY=off
}
if not{
	bind / /n/$sysname
	GOPATH=$home/go
	GOROOT=/usr/local/go
	GO111MODULE=off
	GOTELEMETRY=off
	bind -c /usr/local/$cputype/go /usr/local/go
	bind -c $home/go/$cputype/bin $home/go/bin
	bind -b $GOROOT/bin /bin
	bind -b $GOPATH/bin /bin
	if(~ $sysname reform)
		9fs dos
	comics=/n/rachael/home/sl/who/sl/comics
	if(test -d /n/dos/comics)
		bind -c /n/dos/comics $home/comics
	if not
		bind -c /shr/sdU0f4d8/comics $home/comics
	if(test -d /n/dos/mac)
		bind -c /n/dos/mac $home/mac
	if not
		bind -c /shr/sdU0f4d8/mac $home/mac
	if(test -d /sys/man.old)
		bind $home/empty /sys/man.old
	path=(/bin .)
	upasname=sl@stanleylieber.com
	9frontwww=/n/9front/usr/sl/www
	9frontwerc=$9frontwww/werc
	authwww=/n/auth/usr/sl/www
	authwerc=$authwww/werc
	catvwww=/n/catv/usr/sl/www
	catvwerc=$catvwww/werc
	fswww=/n/fs/usr/sl/www
	fswerc=$fswww/werc
	gaffwww=/n/gaff/usr/sl/www
	gaffwerc=$gaffwww/werc
	osunywww=/n/osuny/usr/sl/www
	osunywerc=$osunywww/werc
	www=/usr/sl/www
	werc=$www/werc
	_=$gaffwerc/sites/massivefictions.com/_
	51nb=$gaffwerc/sites/51nb.stanleylieber.com
	9front=$9frontwerc/sites/9front.org
	9p=$catvwerc/sites/9p.cat-v.org
	1f300=$gaffwerc/sites/1f300.com
	1oct1993=$gaffwerc/sites/1oct1993.com
	acme=$catvwerc/sites/acme.cat-v.org
	audio=$gaffwerc/sites/audio.stanleylieber.com
	bb=$gaffwerc/sites/bb.stanleylieber.com
	bg=$gaffwerc/sites/bg.stanleylieber.com
	bl=$catvwerc/sites/bell-labs.co
	bugs=$9frontwerc/sites/bugs.9front.org
	catv=$catvwerc/sites/cat-v.org
	cerebus=$gaffwerc/sites/cerebus.stanleylieber.com
	co=$catvwerc/sites/co.bell-labs.co
	dms100=$gaffwerc/sites/dms100.inri.net
	doc=$catvwerc/sites/doc.cat-v.org
	docs=$9frontwerc/sites/docs.9front.org
	drawterm=$9frontwerc/sites/drawterm.9front.org
	flamesgif=$gaffwerc/sites/flamesgif.com
	flesh=$gaffwerc/sites/flesh.stanleylieber.com
	fqa=$9frontwerc/sites/fqa.9front.org
	freebsd=$gaffwerc/sites/freebsd.stanleylieber.com
	harmful=$catvwerc/sites/harmful.cat-v.org
	harmless=$catvwerc/sites/harmless.cat-v.org
	helpful=$catvwerc/sites/helpful.cat-v.org
	img=$gaffwerc/sites/img.stanleylieber.com
	inri=$gaffwerc/sites/inri.net
	linux=$gaffwerc/sites/linux.stanleylieber.com
	lists=$9frontwerc/sites/lists.9front.org
	mf=$gaffwerc/sites/massivefictions.com
	mnt=$gaffwerc/sites/mnt.stanleylieber.com
	ninetimes=$catvwerc/sites/ninetimes.cat-v.org
	notreally=$gaffwerc/sites/notreally.info
	nsacom=$gaffwerc/sites/nsacom.net
	okturing=$gaffwerc/sites/okturing.com
	onyx=$gaffwerc/sites/onyx.stanleylieber.com
	openbsd=$gaffwerc/sites/openbsd.stanleylieber.com
	osuny=$osunywerc/sites/osuny.bell-labs.co
	other=$gaffwerc/sites/other.stanleylieber.com
	plan9=$gaffwerc/sites/plan9.stanleylieber.com
	hardware=$plan9/hardware
	thinkpad=$hardware/thinkpad
	pp=$gaffwerc/sites/pp.inri.net
	qcl=$gaffwerc/sites/qualitycountrylyrics.com
	rag=$notreally/transport/spacecraft/ragnarok
	ragnarok=$gaffwerc/sites/ragnarok.massivefictions.com
	read=$gaffwerc/sites/read.stanleylieber.com
	rm=$gaffwerc/sites/rm.stanleylieber.com
	rf=$gaffwerc/sites/rf.stanleylieber.com
	sam=$catvwerc/sites/sam.cat-v.org
	sl=$gaffwerc/sites/stanleylieber.com
	tst=$catvwerc/sites/tst.cat-v.org
	uh=$gaffwerc/sites/uh.stanleylieber.com
	url=$gaffwerc/sites/url.stanleylieber.com
	volksutils=$gaffwerc/sites/volksutils.com
	vr=$osunywerc/sites/vr.stanleylieber.com
	wiki=$9frontwerc/sites/wiki.9front.org
	pkg=$plan9/pkg
	bind -b $home/bin/rc /bin
	bind -b $home/bin/$cputype /bin
	fn nntp{ nntpfs -a news.eternal-september.org }
}
switch($service){
case terminal
	# MNT Reform CTRL (bottom)
	#for(i in `{seq 0 9}){ echo $i 97 61463 } >> /dev/kbmap
	# MNT Reform ...
	#for(i in `{seq 0 9}){ echo $i 126 61463 } >> /dev/kbmap
	# MNT Reform HYPER
	#for(i in `{seq 0 9}){ echo $i 127 61463 } >> /dev/kbmap
	# ThinkPad X*t bezel Esc -> Del
	echo 0 107 127 >>/dev/kbmap
	# ThinkPad X*t bezel Rotate -> PgUp
	echo 0 108 61455 >>/dev/kbmap
	# ThinkPad X*t bezel ??? -> PgDn
	echo 0 104 61459 >>/dev/kbmap
	# ThinkPad X*t bezel Up -> Right
	echo 0 113 61458 >>/dev/kbmap
	# ThinkPad X*t bezel Down -> Left
	echo 0 111 61457 >>/dev/kbmap
	# ThinkPad X*t bezel Left -> Up
	echo 0 110 61454 >>/dev/kbmap
	# ThinkPad X*t bezel Right -> Down
	echo 0 109 63488 >>/dev/kbmap
	plumber
	#echo -n accelerated 0 > '#m/mousectl'
	accel 9
	echo -n res 3 > '#m/mousectl'
	editor=(sam -d)
	prompt='; '
case cpu
	fn `{cat /dev/sysname} {}
	editor=(sam -d)
	pager='p -10'
	if(test -e /mnt/term/dev/wsys){	# rio already running
		editor=(sam -d)
		wsys=/mnt/term^`{cat /mnt/term/env/wsys}
		bind -a /mnt/term/dev/wsys /dev
	}
	bind /mnt/term/dev/cons /dev/cons
	bind /mnt/term/dev/consctl /dev/consctl
	bind -a /mnt/term/dev /dev
	bind /mnt/term/mnt/factotum /mnt/factotum
	bind /mnt/term/mnt/plumb /mnt/plumb
	prompt=`{cat /dev/sysname}^'; '
	cat /lib/ascii/$sysname
	fortune
case con
	prompt=`{cat /dev/sysname}^'; '
}