Поиск
Вход на сайт
Наш опрос
Оцените мой сайт
Всего ответов: 81
Статистика
[ Обновленные темы · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Camping
MaG1StR_YodaДата: Пятница, 26.06.2020, 19:27 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 1026
Статус: Оффлайн
Ставим айдишку сумки с щепками и врубаем скрипт ( 1 раз выкинет )
------------------------------------------------------------
sub Camping() 
   var Sunduk='0x430D1867'  # айди сумки с щепками
   var mx=uo.getx(),my=uo.gety(),x,y 
   uo.set('finddistance','5') 
   uo.useobject(Sunduk) 
   wait(200) 
   uo.DeleteJournal() 
   while 1==1 
      for x=mx-2 to mx+2 
         for y=my-3 to my+3 
            if uo.count('0x0DE1','0x0000')<10 then 
               UO.FindType('0x0DE1','0x0000',Sunduk) 
               wait(200) 
               UO.Grab('100','finditem') 
               wait(200) 
            end if 
            if (uo.count('0x0DE1','0x0000')==0) or (uo.skillval('Camping',1)==1000) then 
               uo.closeuo() 
            end if 
            uo.findtype('0x0DE1','0x0000','ground') 
            wait(200) 
            if UO.FindCount()<>0 then 
               uo.useobject('finditem') 
               wait(1100) 
            else 
               uo.findtype('0x0DE1','0x0000','backpack') 
               wait(200) 
               uo.drop('1',STR(x),STR(y),STR(uo.getz()),'finditem') 
               wait(700) 
               uo.findtype('0x0DE1','0x0000','ground') 
               wait(200) 
               uo.useobject('finditem') 
               wait(1500) 
            end if 
         next 
      next 
   wend 
end sub
 
  • Страница 1 из 1
  • 1
Поиск: