start:
  repeat
  onhotkey s    ;ryba niebieska
{
  gosub ryba1
}
     sleep 1
until #hits = 0

goto start

sub ryba1
{
  finditem UTS C
  set #lobjectid #findid
  event macro 17
wait 10
return
}