# This script reads the CPLD GPIOs set global_state_reg_base 0x3da0 set gpo_base 0x3d90 set gpi_base 0x3d80 set mp [lindex [get_service_paths master] 0] open_service master $mp puts "Reading GPOs..." puts [master_read_32 $mp $gpo_base 0x1] puts "Reading GPIs..." puts [master_read_32 $mp $gpi_base 0x1] close_service master $mp