sub WaitForChange()
   var msg1='no logs here|reach this|too far away'
   var msg2='but fail|to produce|any useable wood|ou put'
   var msg1='Ent|OOPS'
   for var i=0 to 200
      if UO.InJournal(msg1 + "|" + msg3) then
         if UO.InJournal(msg3) then
            uo.PlayWav(DisturbingSound)
            wait(900000) 
         end if
         return 1
      end if
      if UO.InJournal(msg2) then
         return 0
      end if
      wait(50)
   next
   return 0
end sub