EBAZ4205(3):JTAG2AXI tcl命令

记录一下调试时候会用到的JTAG2AXI tcl命令

参考https://www.cnblogs.com/aslmer/p/9440233.html
但是不知道为啥复制的有问题还是咋地，下划线要改改

稍微改下：

// An highlighted block
proc ReadReg { Addr } {
puts "Start reading operation"
set address [format "0x%08X" $Addr]
set len 1
create_hw_axi_txn read_txn -force [get_hw_axis hw_axi_1] -type read \
-address $address -len $len
run_hw_axi [get_hw_axi_txns read_txn]
set read_proc [list [report_hw_axi_txn [get_hw_axi_txns read_txn]]];
set read_status_value [lindex $read_proc 0 1]
delete_hw_axi_txn [get_hw_axi_txns read_txn]
return $read_status_value;
}

proc WriteReg { Addr data} {
set len 1
set address [format "0x%08X" $Addr]
set data [format "0x%08X" $data]
create_hw_axi_txn -force write_txn [get_hw_axis hw_axi_1] -type write \
-address $address -len $len -data $data
run_hw_axi [get_hw_axi_txns write_txn]
delete_hw_axi_txn [get_hw_axi_txns write_txn]
}

调用的时候

// An highlighted block
WriteReg 0 0
WriteReg 0 1
ReadReg  0x0

建好工程把jtag2axi 和axi reg连到一起，下载，效果杠杠滴