#!/bin/rc
# 2020-06-18T22:25:37-04:00
# Open rio windows on left half of the screen.
rfork e
scr=(`{cat /dev/draw/new >[2]/dev/null})
w=$scr(11)
h=$scr(12)
fn versobig{
	if(~ $w 1278 1280 && ~ $h 798 800)
		r=(2 0 614 800)
	if(~ $w 136* 1376 && ~ $h 76*)
		r=(2 0 618 76)
	if(~ $w 1400 1408 && ~ $h 1050)
		r=(2 0 735 1049)
	if(~ $w 1600 && ~ $h 1200)
		r=(6 4 720 1194)
	if(~ $w 1920 1918 && ~ $h 1080 1078)
		r=(4 4 838 1073)
	if(~ $w 1920 1918 && ~ $h 1200 1198)
		r=(9 4 826 1196)
	if(~ $w 2880 2878 && ~ $h 1920 1918)
		r=(9 12 1204 1912)
	window -scroll -r $r 'label verso big; rc'
}
switch($1){
case *
	versobig
}