Сайт Антареса Сайт Антареса Форум Антарес
> >

Здравствуйте, гость ( Вход | Регистрация )


> > Автолут, кто может сделать >
Angel of vengeance
сообщение 25.4.2010, 18:35
Сообщение #1


Прохожий
Group Icon

Группа: Пользователи
Сообщений: 1
Регистрация: 16.4.2010
Пользователь №: 7 235
Спасибо сказали: 0 раз(а)
Класс: Вампир



Люди,кто сможет доделать скрипт,что бы лутал ещё и реги?
sub Loot()
# Грабим труп монстра
UO.FindType(0x0EED, -1,'lastcontainer')
if UO.FindCount() then
UO.MoveItem('finditem')
wait(300)
end if
UO.FindType(0x0E76, -1,'lastcontainer')
if UO.FindCount() then
UO.MoveItem('finditem')
wait(300)# можно увеличит до 600
end if
end sub
Пользователь в офлайнеКарточкаОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 
 
Ответить в эту темуОткрыть новую тему
> > Ответов(1 - 1) >
Alucard
сообщение 25.4.2010, 18:50
Сообщение #2


ДМ НТ
Group Icon

Группа: Пользователи
Сообщений: 4 801
Регистрация: 13.7.2006
Из: г. Иваново
Пользователь №: 3 276
Спасибо сказали: 351 раз(а)
Класс: Человек



1) предупреждение за неправильно оформленный скрипт
2) Поиск слова ЛУТ
3)
Код
sub Loot()
    # Грабим труп монстра
    UO.FindType('0x0EED', -1,'lastcontainer')
    if UO.FindCount() then
        UO.MoveItem('finditem')
        wait(300)
    end if
    UO.FindType('0x0E76', -1,'lastcontainer')
    if UO.FindCount() then
        UO.MoveItem('finditem')
        wait(300)# можно увеличит до 600
    end if

    UO.FindType('ТИП регов', -1,'lastcontainer')
    if UO.FindCount() then
        UO.MoveItem('finditem')
        wait(300)# можно увеличит до 600
    end if

    UO.FindType('ТИП регов', -1,'lastcontainer')
    if UO.FindCount() then
        UO.MoveItem('finditem')
        wait(300)# можно увеличит до 600
    end if

    UO.FindType('ТИП регов', -1,'lastcontainer')
    if UO.FindCount() then
        UO.MoveItem('finditem')
        wait(300)# можно увеличит до 600
    end if
#...и так далее....

end sub

при паузе в 300 так лутать не будет. Но имхо на вопрос я вроде ответил rev.gif


Спасибо сказали:
Пользователь в офлайнеКарточкаОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 

Ответить в эту темуОткрыть новую тему
> >
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия Сейчас: 24.10.2018, 2:44
Design: Fisana  © 2005-2006 IBR Team