I wrote:

> 
> 	fn HIViewAddSubview(button&( _cBead1 ),button&( _cPin1 )  )
> 

Just noticed that, in the above, you've got your buttons the wrong way round. Should be HIViewAddSubView( parent, child ):

	fn HIViewAddSubview( button&( _cPin1 ), button&( _cBead1 )  )

which means you'll have to change the bead rects.

Bernie