require'tk'
require'tkmove2.rb'

c = TkCanvas.new.pack
f = TkFrame.new.pack
mv = TkMove.new(c, 'circle')

TkcOval.new(c, 70, 50, 90, 70, 'fill'=>'red').addtag('circle')

TkButton.new(f, 'text'=>'unbind', 'command'=>proc{ mv.unbind( c, 'circle') }).pack('side'=>'left')
TkButton.new(f, 'text'=>'bind', 'command'=>proc{ mv.bind( c, 'circle') }).pack('side'=>'left')
Tk.mainloop