Magery, прокачка

Frozen
30 декабря 2010 12:22
Сообщение #1

Переодически скрипт просто вырубается, надо поправить

 

всё, вроде норм

sub main()
While UO.WEIGHT < 30000
if UO.Mana >99 then
UO.Exec("cast 'Night Sight'")
UO.Exec("waittargetself")
wait(2000);
else
while UO.Mana<UO.Int
UO.UseSkill("Meditation");
wait(1000);
repeat
until uo.InJournal('You are') or uo.InJournal('You lose')
uo.DeleteJournal()
wait(10)
wend
endif
wend
end sub


Гости
Сообщений: 195
Рег. 15.10.2012
30 декабря 2010 18:28
Сообщение #2
sub Magery()
VAR SA='0x0F8C'; SA
VAR SS='0x0F8D'; SS
VAR Sunduk='0x406BDD8B'; ID сундука с регами
VAR Kolvo=100; Сколько регов будем брать
While NOT UO.Dead()
While UO.Mana>=9 AND UO.SA>0 and UO.SS>0
UO.DeleteJournal()
UO.Cast('Night Sight', 'self')
wait(1800)
wend
If UO.Mana<9 Then
While UO.Mana<UO.Int
UO.DeleteJournal()
wait(1000)
UO.Useskill('Meditation')
Repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose")
Wend
Endif
If UO.SA == 0 Then
UO.FindType(SA, '-1', Sunduk)
UO.Grab(str(Kolvo), 'finditem')
repeat
wait(100)
until UO.SA>0
Endif
If UO.SS == 0 Then
UO.FindType(SS, '-1', Sunduk)
UO.Grab(str(Kolvo), 'finditem')
repeat
wait(100)
until UO.SS>0
Endif
Wend
end sub

Старший Прапорщик (2486554)14 лет
Druid
Сообщений: 457
Рег. 25.04.2010
1 января 2011 03:29
Сообщение #3
зачем так упираться, можно веть и на дереве качнуть без проблем)

Frozen
1 января 2011 04:38
Сообщение #4
Боюсь тебя огорчить... мы с тобой на разных серверах играем)
Старший Прапорщик (2486554)14 лет
Druid
Сообщений: 457
Рег. 25.04.2010
4 января 2011 00:02
Сообщение #5
Сочувствую. Милости просим к нам!

Frozen
4 января 2011 06:24
Сообщение #6
Проктолог что-то написал, а потом постыдился и стёр :D...
Последние посетители (0):

 
Сейчас: 2 мая 2024 14:58