#!/bin/rc
scr=(`{cat /dev/draw/new >[2]/dev/null || status=''})
wid=$scr(11)
ht=$scr(12)
if(~ $pitft only) {
window -r 10 5 480 320 acme -f /lib/font/bit/lucidasans/unicode.6.font -F $font
window -r 0 5 470 320
}
if not {
window -r 0 0 161 117 stats -lmisce
window -r 161 0 560 117 faces -i
window -scroll -r 560 0 $wid 117 '
label console
echo ''Console output (/dev/kprint):''
cat /dev/kprint'
if(~ `{screensize} small)
dump=acme.dump.small
if not
dump=acme.dump
a=`{echo $wid-35 | hoc }
rm /tmp/*glenacme
window -r 60 90 $a $ht acme -l lib/$dump
window -r 20 140 610 450 /usr/glenda/lib/first.window
}
|