| Меню сайта |
|
|
 |
| Категории каталога |
|
|
| Мини-чат |
|
|
|
|
Прокачка БС на айрон дагерах
|
[
]
| 17.07.2008, 20:53 |
sub Blacksmithing()
var Exit=0, LastTimer
while Exit<>1
uo.DeleteJournal()
LastTimer=uo.Timer()
uo.WaitMenu('Blacksmithing','Weapons','Weapons','Swords','Swords','dagger')
uo.UseType('0x1BEF')
while not uo.InJournal('You put') and not uo.InJournal('You have failed')
wait(500)
wend
if uo.InJournal('You have failed') then
repeat
wait(100)
until uo.Timer()>=LastTimer+100
end if
repeat
UO.FindType('0x0F51',-1,'backpack')
If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x404A52A4) ;Forzha
wait(1250)
Endif
UO.FindType('0x0F51',-1,'backpack')
until not UO.GetQuantity('finditem')
uo.FindType('0x1BEF',-1,'backpack')
if uo.GetQuantity('finditem')<10 then
uo.FindType('0x1BEF','0x0000','0x400546E5') ;Cундук с ингами
wait(2000)
uo.Grab('500','finditem')
Endif
wait(1500)
wend
end sub
|
| Категория: Скрипты | Добавил: antaris
| Автор: Гайра |
| Просмотров: 1339 | Загрузок: 25
|
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ] |
|
| Форма входа |
|
|
| Поиск |
|
|
|
| Друзья сайта |
 |
|
| Статистика |
Онлайн всего: 1 Гостей: 1 Пользователей: 0 |
|
|
