#!/bin/bash
################################################################################
#ident  "@(#)rterm.sh  1.0  randomly pick a line of xterm options - John S. Urban"
# could do with X11 resources instead of switches
################################################################################
xrdb -merge <<EOF
*VT100.allowWindowOps: true
*VT100.allowTitleOps: true
*VT100.allowFontOps: true
EOF
################################################################################
RCOLOR(){
RANDOM=$$
#(( A = $RANDOM * $CHOICES /32767 ))
# stays the same for several seconds on Solaris (SunOS 5.3) at least
#
COUNT=29 # CHANGE to the number of lines in the list of xterm options
let A=$RANDOM*COUNT/32767
#
A=${PICK:-$A}
# BACKGROUND FOREGROUND
(cat -n|tail --lines=+$A | head -1 ) <<EOF
black        white
white        black
black        yellow
navy         white
black        green
purple       yellow
gray         black
turquoise    black
seagreen     black
chartreuse   black
RosyBrown    black
lightsalmon  black
firebrick    white
maroon       white
DarkOrchid   white
bisque4      white
khaki        brown
white        gray70      9x15
cyan         #405080     9x15
white        gold        9x15
black        beige       9x15
pink         black       9x15
goldenrod4   white       9x15
gray70       white       9x15
#405080      cyan        9x15
gold         white       9x15
beige        black       9x15
black        pink        9x15
white        goldenrod4  9x15
EOF
}
################################################################################
RTERM(){
(
exec 2>&1 
PICK=$1
echo PICK $1
if [ "$PICK" = all ]
then
 NUMBER=1
 echo NUMBER $NUMBER
 while [ "$NUMBER" -le $COUNT ]
 do
    $0 $NUMBER &
    NUMBER=$(( NUMBER + 1))
 done
 exit
fi
[ "$PICK" != '' ] && shift
export PICK A HEAD
SHELL=${SHELL:-/bin/bash}
CMD=${*:-$SHELL}
#------------------------------------------------------------------------------#
RCOLOR|while read A BACK FORE FONT OTHER
do
  echo "BACK $BACK FORE $FORE"
  xterm \
     -bg $BACK \
     -fg $FORE \
     -cr red  \
     -sl 2500 \
     -sb  \
     -name XTerm  \
     -tm 'erase ^H kill ^U intr ^C eof ^D susp ^Z' \
     -xrm 'XTerm*VT100.translations: #override : select-end(PRIMARY,CLIPBOARD,CUT_BUFFER0)' \
     -title "rterm ${PICK:-$A}" \
     -e $CMD </dev/null >/dev/null
     STATUS=$?
  xrefresh
  PICK=$((PICK+1))
  exit $STATUS
done
) >>/dev/null &
}
################################################################################
while ! RTERM $*
do
echo STATUS $?
 :
 sleep 1
done >>/dev/null
echo LAST STATUS $?
################################################################################
exit
################################################################################

TERM=xterm; export TERM
tabs	
stty ixon ixoff tostop
set -o noclobber
set -o vi