;b01.cpr To copy files from HI-SCAN into spider format
;written by Montserrat Samso, updated 3/16/99
md
set mem
(124)
do lb1 i=1,5
rr x55
116114,116116,120267,120275,120283

cp from raw
(16)
raw{******x55}
(3524,4300)
(342)
(1)
n
_1
ar
_1
full{******x55}
LOG(P1+1)
lb1
en