$set def b:[berry.denzo]
$SET VERIFY
$!DEF A USER8:[EARNEST.WORK]
$DEF I c:[berry.dat]
$!goto start
$!r user1:[berry.for]mx4slist
$r b:[berry.for]mx4
I:bc03_007.image
D
bc03_007.out
500 599 300 399
0 0
90.023 90.098 300 1.08
 30 
 20 
 10 
  7 
  6 
  5 
  4.5 
  4 
  0 

$exit