| Меню сайта |
|
|
 |
| Категории каталога |
|
|
| Мини-чат |
|
|
|
|
Карпентри
|
[
]
| 09.02.2010, 22:31 |
sub Carpentry()
var Exit=0, LastTimer
uo.Print('Выбери Сундук: ')
uo.Exec('addobject Chest')
while uo.Targeting()
wait(100)
wend
uo.Print('Выбери Помойку: ')
uo.Exec('addobject TrashCan')
while uo.Targeting()
wait(100)
wend
uo.Print('Выбери Инструмент: ')
uo.Exec('addobject Ins')
while uo.Targeting()
wait(100)
wend
while Exit<>1
uo.DeleteJournal()
uo.FindType('0x0E89','0x0000','backpack')
if uo.GetQuantity('finditem')>0 then
uo.SetReceivingContainer('TrashCan')
wait(1000)
uo.Grab('all','finditem')
wait(1000)
uo.UnSetReceivingContainer()
end if
uo.FindType('0x1BDD',-1,'backpack')
if uo.GetQuantity('finditem')<10 then
uo.FindType('0x1BDD','0x0000','Chest')
wait(1000)
uo.Grab('300','finditem')
wait(1000)
end if
LastTimer=uo.Timer()
uo.DeleteJournal()
uo.UseObject('Ins')
uo.WaitMenu ('Carpentry','Weapons & Tools','Weapons & Tools','quarter staff')
wait(12000)
wend
end sub
|
| Категория: Скрипты | Добавил: NEO-New
|
| Просмотров: 985 | Загрузок: 0
|
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ] |
|
| Форма входа |
|
|
| Поиск |
|
|
|
| Друзья сайта |
 |
|
| Статистика |
Онлайн всего: 1 Гостей: 1 Пользователей: 0 |
|
|
