repeat

%%clipboardtext2 = %%clipboardtext1
list create,1
list paste,1
%%clipboardtext1 = @text(1)
list close,1

if @not(@equal(%%clipboardtext2,%%clipboardtext1))
  clipboard set,%%clipboardtext1
  end

wait 1

until @equal(@event(),CLOSE)
exit