| Меню сайта |
|
|
 |
| Категории каталога |
|
|
| Мини-чат |
|
|
|
|
Тинкер на отмычках...с 43
|
[
]
| 15.08.2008, 02:28 |
############################################################################################
#File info##################################################################################
############################################################################################
;Copiraten: by ICe aka ICeCREAm #
; Mail: Hoob@narod.ru писать с пометкой UO #
; Icq: 222228147 писать с пометкой UO #
; WWW: http://hoob.narod.ru > #
;[; plz not sale outside for russia,for all questions call #911 or (Hoob@narod.ru) ask me;]#
#############################################################(с) 2005 made in russia :) ####
sub Tinkering()
var c
while not uo.Dead()
uo.FindType('0x1BEF','0x0000','backpack')
if uo.GetQuantity('finditem')<=10 then
uo.FindType('0x14FB','0x0000','backpack')
if uo.GetQuantity('finditem')>0 Then
uo.SetReceivingContainer('0x4033BF94') ; Сундук куда бутылки складывать
wait(1000)
uo.Grab('all','finditem')
wait(1000)
uo.UnSetReceivingContainer()
end if
uo.FindType('0x1BEF','0x0000','0x4033BF94') ; Сундук где айрон лежит
wait(1000)
uo.Grab('200','finditem')
wait(1000)
end if
CheckLag()
uo.Exec("waitmenu 'Tinkering' 'Tools' 'Tools' 'lockpick'")
uo.UseType('0x1EBC') ; Тинковские Принадлы
while not uo.InJournal('You put') and not uo.InJournal('Tinkering failed')
wait(300)
wend
wend
end sub
sub CheckLag()
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub
|
| Категория: Скрипты | Добавил: antaris
|
| Просмотров: 1034 | Загрузок: 21
|
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ] |
|
| Форма входа |
|
|
| Поиск |
|
|
|
| Друзья сайта |
 |
|
| Статистика |
Онлайн всего: 1 Гостей: 1 Пользователей: 0 |
|
|
