Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#!/bin/rc
2 
 
3 
scr=(`{cat /dev/draw/new >[2]/dev/null || status=''})
4 
wid=$scr(11)
5 
ht=$scr(12)
6 
 
7 
window 0,0,161,117 stats -lmisce
8 
window 161,0,560,117 faces -i
9 
 
10 
if(~ `{screensize} small)
11 
	dump=acme.dump.small
12 
if not
13 
	dump=acme.dump
14 
 
15 
a=`{echo $wid-35 | hoc }
16 
window 60,90,$a,$ht acme -l lib/$dump
17 
window 20,140,610,450 /usr/glenda/lib/first.window