#!/bin/rc
. seg.rc
a=0
while(test $a -le 1024) {
	echo -n 'gr '$a': '
	gr $a
	echo -n 'vr '$a': '
	vr $a
	a=`{echo $a + 4 | bc}
}