Update bitcoin.tcl