namespace path {::tcl::mathop ::tcl::mathfunc}
set ramloc 3221225472
delete_hw_axi -quiet rd_txn0
set outFile [open myFile1.txt w]
set i 0
puts $i
set x 0
puts $x
set p 0
set test ""
set_property OUTPUT_VALUE 1 [get_hw_probes dac_stim_i/vio_0_probe_out0 -of_objects [get_hw_vios hw_vio_1]]
commit_hw_vio [get_hw_probes {dac_stim_i/vio_0_probe_out0} -of_objects [get_hw_vios hw_vio_1]]
puts {collecting data}
for {set x 0} {$x < 8208} {incr x 16} {
set readaddress [format %x [expr {$ramloc + $x}]]
create_hw_axi_txn rd_txn0 [get_hw_axis hw_axi_1] -address $readaddress -len 4 -size 32 -type read
run_hw_axi -quiet rd_txn0
set datawordshex [get_property DATA [get_hw_axi_txn rd_txn0]]
set sample [string range $datawordshex 28 31]
append test [scan $sample %lx]
append test "\n"
set sample [string range $datawordshex 24 27]
append test [scan $sample %lx]
append test "\n"
set sample [string range $datawordshex 20 23]
append test [scan $sample %lx]
append test "\n"
set sample [string range $datawordshex 16 19]
append test [scan $sample %lx]
append test "\n"
set sample [string range $datawordshex 12 15]
append test [scan $sample %lx]
append test "\n"
set sample [string range $datawordshex 8 11]
append test [scan $sample %lx]
append test "\n"
set sample [string range $datawordshex 4 7]
append test [scan $sample %lx]
append test "\n"
set sample [string range $datawordshex 0 3]
append test [scan $sample %lx]
puts $outFile "$test"
unset test
set i [expr $i+2]
delete_hw_axi rd_txn0
}
puts {finished}
close $outFile
set_property OUTPUT_VALUE 0 [get_hw_probes dac_stim_i/vio_0_probe_out0 -of_objects [get_hw_vios hw_vio_1]]
commit_hw_vio [get_hw_probes {dac_stim_i/vio_0_probe_out0} -of_objects [get_hw_vios hw_vio_1]]