Воскресенье, 05.05.2024, 19:21
Приветствую Вас Гость | RSS
Обитель неприкаянных душ
Главная | Каталог файлов | Регистрация | Вход
Меню сайта
Категории каталога
Скрипты [43]
Мини-чат
Главная » Файлы » Скрипты

Буф Кравт
[ ] 09.02.2010, 22:30
sub BowCraft()
repeat
uo.FindType('0x1bd4','0x0000','backpack')
put:
if uo.GetQuantity('finditem')<1 then
uo.FindType('0x1bd4','0x0000','0x40001988') ;Сериал сундука
uo.Grab('1','finditem')
wait(400)
end if
uo.FindType('0x1bd4','0x0000','backpack')
if uo.GetQuantity('finditem')<1 then
goto put
end if
uo.Usetype('0x1bd4')
uo.CancelMenu()
uo.WaitMenu('Select arrow type','bolt')
wait (1000)
uo.DeleteJournal()
while not (uo.InJournal("You put") or uo.InJournal("You fail"))
wait(300)
wend
uo.UnSetReceivingContainer()
wait(200)
until uo.Dead()
end sub
Категория: Скрипты | Добавил: NEO-New
Просмотров: 862 | Загрузок: 0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Форма входа
Поиск
Друзья сайта

    Статистика

    Онлайн всего: 1
    Гостей: 1
    Пользователей: 0

    Copyright MyCorp © 2024

    Бесплатный хостинг uCoz