if Gang's suggestion doesn't work, you could try something like:
#!/bin/tcsh
set runs = yourNumberOfRuns
foreach f (`ls *1D`)
set c = 1
set stem = `echo $f | sed s/.1D//`
cat $f | head -$c | tail -1 > $stem.r0${c}.1D
@ c = $c + 1
end
end
I know it's not what you are looking for but I had had do this myself when I wanted to do an analysis of each run so I thought it would post it just in case it was useful--it's not anything complicated but hope it helps.
best
James