#!/bin/rc

scr=(`{cat /dev/draw/new >[2]/dev/null || status=''})
wid=$scr(11)
ht=$scr(12)

tmar=10
bmar=`{echo 'int('$ht'-10)'|hoc}
lmar=100
rmar=`{echo 'int('$wid'-120)'|hoc}

if (test -e $home/lib/wins/$wid^x^$ht)
	rc $home/lib/wins/$wid^x^$ht
if not if (test -e $home/lib/wins/rio.common)
	$home/lib/wins/rio.common