my $fpga_addr = any2dec($settings{'FPGAtrbnetAddr'});
my $ram_addr = any2dec($settings{'RAMtrbnetAddr'});
my $cmd_reg_addr = any2dec($settings{'CMDreg_trbnetAddr'});
+ my $cmd_base_addr = any2dec($chain_settings{'CONFCommandBaseAddr'});
my $ram_base_addr = any2dec($settings{'RAMbase_trbnetAddr'});
my $data_reg_addr = any2dec($settings{'DATAreg_trbnetAddr'});
my @settingnames=();
push(@{$memhash->{$setting_name}},$crc1_rn & 0xFFFFFFFF);
}
}
- trb_register_write($fpga_addr ,$cmd_reg_addr,0x0000000A) or die trb_strerror();
- trb_register_write($fpga_addr ,$data_reg_addr,scalar @sensors) or die trb_strerror();
- trb_register_write($fpga_addr ,$cmd_reg_addr,0x00000033) or die trb_strerror();
+ trb_register_write($fpga_addr ,$cmd_base_addr+0x9,0x0) or die trb_strerror();
+# trb_register_write($fpga_addr ,$data_reg_addr,scalar @sensors) or die trb_strerror();
+ trb_register_write($fpga_addr ,$cmd_base_addr+0x33,scalar @sensors) or die trb_strerror();
for(my $i=0;$i<scalar @settingnames;$i++) {
# write RAM base pointer
}
- trb_register_write($fpga_addr, $cmd_reg_addr, 0x00000009) or die trb_strerror();
+ trb_register_write($fpga_addr, $cmd_base_addr+0x09, 0x1) or die trb_strerror();
if(not defined($opt_quiet)) { print "\n"; }
print "done.\n";