Ultima Online программы,советы,скрипты. Четверг, 03.07.2025, 13:00
Главная | Регистрация | Вход Приветствую Вас Гость | RSS
Меню сайта

Категории каталога
Скрипты [22]
Интересное Чтиво. (советы) [3]
Публикации пользователей [2]
Проверенные статьи переношу в основные разделы.

Главная » Статьи » Скрипты

Расшифровка карт.


sub eat()
Repeat
UO.UseType( '0x097B' ) ; n?aa aienaou oei aau
Wait( 6000*30 )
Until UO.Dead()
end sub


###########################################
############### Map_Decode ################
###########################################


sub Map_Decode()
var cc
uo.print('Выбери мешок с нерасшифрованными картами ')
uo.exec('addobject Bag0')
while uo.targeting()
wait(100)
wend
wait(100)
uo.print('Выбери мешок для 1 левела ')
uo.exec('addobject Bag1')
while uo.targeting()
wait(100)
wend
wait(100)
uo.print('Выбери мешок для 2 левела ')
uo.exec('addobject Bag2')
while uo.targeting()
wait(100)
wend
wait(100)
uo.print('Выбери мешок для 3 левела ')
uo.exec('addobject Bag3')
while uo.targeting()
wait(100)
wend
wait(100)
uo.print('Выбери мешок для 4 левела ')
uo.exec('addobject Bag4')
while uo.targeting()
wait(100)
wend
wait(100)
uo.print('Выбери мешок для 5 левела ')
uo.exec('addobject Bag5')
while uo.targeting()
wait(100)
wend
wait(100)

uo.useobject('Bag0')
wait(1000)

uo.findtype('0x14EB','0x0000','Bag0')
wait(200)
While uo.findcount()>0
uo.deletejournal()
uo.click('finditem')
repeat
wait(10)
until uo.injournal("treasure map")
if uo.injournal("Tattered treasure map") then
uo.moveitem('finditem','-1','backpack')
cc=0
while cc==0
wait(100)
cc=uo.count('0x14EB','0x0000')
wend
wait(200)
uo.deletejournal()
uo.useobject('finditem')
repeat
wait(10)
until uo.injournal("It's seems like that this map is level")

if uo.injournal("It's seems like that this map is level 1") then
uo.moveitem('finditem','-1','Bag1')
end if

if uo.injournal("It's seems like that this map is level 2") then
uo.moveitem('finditem','-1','Bag2')
end if

if uo.injournal("It's seems like that this map is level 3") then
uo.moveitem('finditem','-1','Bag3')
end if

if uo.injournal("It's seems like that this map is level 4") then
uo.moveitem('finditem','-1','Bag4')
end if

if uo.injournal("It's seems like that this map is level 5") then
uo.moveitem('finditem','-1','Bag5')
end if
wait(600)
if uo.injournal("Too many items in that container") then
uo.moveitem('finditem','-1','Bag0')
wait(500)
return
end if

else

if uo.injournal("(1 level)") then
uo.moveitem('finditem','-1','Bag1')
end if

if uo.injournal("(2 level)") then
uo.moveitem('finditem','-1','Bag2')
end if
if uo.injournal("(3 level)") then
uo.moveitem('finditem','-1','Bag3')
end if

if uo.injournal("(4 level)") then
uo.moveitem('finditem','-1','Bag4')
end if

if uo.injournal("(5 level)") then
uo.moveitem('finditem','-1','Bag5')
end if
wait(600)
if uo.injournal("Too many items in that container") then
uo.moveitem('finditem','-1','Bag0')
wait(500)
return
end if

end if
uo.findtype('0x14EB','0x0000','Bag0')
wait(200)
wend
end sub






Категория: Скрипты | Добавил: cornor (23.03.2008)
Просмотров: 1271 | Рейтинг: 0.0/0 |
Всего комментариев: 0
Форма входа

Поиск

Друзья сайта

Copyright MyCorp © 2025 Сделать бесплатный сайт с uCoz