Adding peek_poke TCL file to IP_gen directory