Отсутствует последняя скобка и лишний end_if в подпрограмме sub(fndhnt)
lclick(1258+rnd(-15,15),129+rnd(-15,+15)
Так верно
sub(drinkburdfight) //проверка стат и питье бурдей
   getscreen
   if_pixel_in(588,200,635,205,109,66)
      lclick(1394,57)
      waitms(rnd(100,300))
      lclick(1090,177)
      waitms(rnd(100,300))
      lclick(1394,57)
      waitms(rnd(100,300))
      lclick(1090,198)
      waitms(rnd(100,300))
   end_if
end_sub
sub(fndhnt) //открытие охоты, переход на запад
   lclick(1258+rnd(-15,15),129+rnd(-15,+15))
   wait(2)
   lclick(351+rnd(-5,5),210+rnd(-5,5))
   wait(2)    
end_sub
sub(startwar) //поиск моба и нападение на него
   getscreen
   if_pixel_in(342,180,1147,816,535696,1331546,1653334,1519710,1914980,4416913)
      mouse_move($_return1,$_return2)
      waitms(100)
      lclick($_return1, $_return2)
      waitms(200)
      dblclick($_return1, $_return2)
      wait(rnd(7,9))
   else
      fndhnt()
   end_if
end_sub
sub(simplewar) //бой первым скилом     
   getscreen
   if_pixel_in(980,236,1153,503,163)
      mouse_move(619+rnd(-10,10),451+rnd(-10,10))
      lclick(619+rnd(-10,10),451+rnd(-10,10))
      $udar=$udar+1
      waitms(rnd(600,1000))
   else
      $wmob=0
   end_if
end_sub