#!/bin/tcsh -f


set NUMMER = $#
while `expr $NUMMER != 0`
	echo $NUMMER
	nawk -f ~/PETC/NAWKBEFEHLEUSW/RASMOL_CHIME/nawk_QM_out $argv[1] > $argv[1]:r.pdb_1
	mv $argv[1]:r.pdb_1 $argv[1]:r.pdb
	shift
	set NUMMER = `expr $NUMMER - 1`
end
unset $NUMMER