$! Make a tape containing changed files.  System specific.
$!
$	inquire	date	"Copy files modified since"
$	inquire output	"Output device (should be zeroed)"
$	create 'output'51.txt
5,1	command:
$eod
$	@command:csince 'date' command: 'output'
$	create 'output'53.txt
5,3	comp:
$eod
$	@command:csince 'date' comp: 'output'
$	create 'output'54.txt
5,4	otscom:
$eod
$	@command:csince 'date' otscom: 'output'
$	create 'output'55.txt
5,5	otsio:
$eod
$	@command:csince 'date' otsio: 'output'
$	create 'output'56.txt
5,6	rsxlib:
$eod
$	@command:csince 'date' [decusc.rsxlib] 'output'
$	create 'output'57.txt
5,7	rstslb:
$eod
$	@command:csince 'date' [decusc.rstslb] 'output'
$	create 'output'61.txt
6,1	tools:
$eod
$	@command:csince 'date' tools: 'output'
$	create 'output'62.txt
6,2	misc:
$eod
$	@command:csince 'date' misc: 'output'
$	create 'output'63.txt
6,3	cross:
$eod
$	@command:csince 'date' [decusc.cross] 'output'
$	create 'output'64.txt
6,4	lex:
$eod
$	@command:csince 'date' [decusc.lex] 'output'
$	create 'output'66.txt
6,6	useful:
$eod
$	@command:csince 'date' [decusc.useful] 'output'
$	create 'output'67.txt
6,7	vaxlib:
$eod
$	@command:csince 'date' [decusc.vaxlib] 'output'
$exit