VMD User

gistfile1.tcl

set mol [mol new {traj_fn}  waitfor all]
mol addfile {top_fn} waitfor all

# Open data file
set sel [atomselect $mol all]
set nf [molinfo $mol get numframes]
set fp [open {dat_fn} r]
set line ""

# Each line of the data file corresponds to a frame
for {set i 0} {$i < $nf} {incr i} {
   gets $fp line
   $sel frame $i
   $sel set user $line
}
close $fp
$sel delete