#!/bin/csh -f

onintr cleanup

unset noclobber

set loc = /pictures/display
set bin = /pictures/${hosttype}bin
set rand = $bin/rand
set log = /dev/null

if (-e $loc/files) then
set displaylist = (`cat $loc/files`)
set numpics = $#displaylist
else
echo "Can't find list of files to display." >> $log
echo "Exiting." >> $log
exit
endif

@ shownum = `$rand $numpics`
@ shownum++
set toshow = $displaylist[$shownum]

echo "Displaying $toshow"  >> $log
$bin/zcat $loc/$toshow | $bin/aspect | $bin/mpel_display -a

exit

cleanup:
	echo "Aborted" >> $log
	exit 1