Page 1 of 1
Где ступил ткните носом.
Posted: 2004-06-26 20:52:18
by AlexMidRus
sub vet()
part1:
uo.waittargetobject("Horse")
uo.cast('Magic Arrow')
wait (3000)
uo.say("all come")
wait (600)
uo.say (",warmode flip")
wait (300)
uo.say (",warmode flip")
uo.DeleteJournal()
part2:
wait (600)
uo.waittargetobject("Horse")
Uo.Usetype ("0x0e21")
Wait (5000)
if uo.InJournal ("but they barely help.") then
uo.DeleteJournal()
goto part2
else
goto part1
endif
end sub
Вот скрипт только есть проблема когда в журнале появляется фраза but they barely help. скрипт начинается заново, хотя по задумке должен начинаться с part2. В чем моя ошибка?
Posted: 2004-06-27 00:55:28
by Yoko
возможно скрипт выполняется не на верхнем уровне а запущен из другого скрипта. начиная с какого-то уровня вложености я наблюдал глюки в работе goto.
может тут и чтото другое но я с первого взгляда не вижу.
Posted: 2004-06-27 10:18:36
by AlexMidRus
Yoko wrote:возможно скрипт выполняется не на верхнем уровне а запущен из другого скрипта. начиная с какого-то уровня вложености я наблюдал глюки в работе goto.
может тут и чтото другое но я с первого взгляда не вижу.
Он запушен из автозагрузки и там много мелких скриптов около 15.
Posted: 2004-06-27 14:37:36
by Edred
Попробуй переделать его без гоуту, вот так, например:
Code: Select all
sub vet()
while TRUE
uo.waittargetobject("Horse")
uo.cast('Magic Arrow')
wait (3000)
uo.say("all come")
wait (600)
uo.say (",warmode flip")
wait (300)
uo.say (",warmode flip")
uo.DeleteJournal()
repeat
wait (600)
uo.waittargetobject("Horse")
Uo.Usetype ("0x0e21")
Wait (5000)
until NOT uo.InJournal ("but they barely help")
wend
end sub
ЗЫ: Я не изменял команды самого скрипта, только убрал переходы по метке
Posted: 2004-06-28 17:46:45
by AlexMidRus
Нашел я свою ошибку. Действительно ступил забыл что RunUo использует Cliloc в этом и была проблема.
Code: Select all
sub vet1()
dam:
uo.waittargetobject("Horse")
uo.cast('Magic Arrow')
wait (2300)
uo.say("all come")
wait (300)
uo.say (",warmode flip")
wait (300)
uo.say (",warmode flip")
uo.DeleteJournal()
vet:
wait (600)
uo.waittargetobject("Horse")
Uo.Usetype ("0x0e21")
Wait (5000)
if uo.InJournal ("cliloc# 0xA4E8") then
uo.DeleteJournal()
goto vet
else
goto dam
endif
end sub
Posted: 2004-06-28 19:05:19
by Mguai
а что это за скрипт такой ? что он тварит *?
Posted: 2004-06-28 19:07:28
by BETEPAH
Mguai wrote:а что это за скрипт такой ? что он тварит *?
Это скритп на прокачку Ветеринарии ....
Вот скрипт дла прокачки оной на ДРВ
Code: Select all
sub Wet()
VAR Count
UO.CancelMenu()
UO.AutoMenu('What do','Daemon')
while NOT UO.Dead()
UO.DeleteJournal()
If UO.Mana>=50 then
UO.Cast('Polymorph')
while NOT UO.InJournal("spell fizzles")
wait(1000)
goto Med
Endif
while UO.Life<UO.GetMaxHP()
UO.DeleteJournal()
UO.BandageSelf()
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You apply the bandages")
wait(500)
wend
Med:
UO.DeleteJournal()
while UO.Mana<UO.Int
UO.UseSkill('Meditation')
while NOT UO.InJournal("You are") AND NOT UO.InJournal("You lose")
wait(2000)
wend
wend
end sub
Posted: 2004-06-28 19:15:43
by Mguai
яа я то думаю голову ламаю ! Спамибо что сказал
Posted: 2004-06-29 08:01:17
by AlexMidRus
Вот скрипт дла прокачки оной на ДРВ
Code: Select all
UO.Cast('Polymorph')
while NOT UO.InJournal("spell fizzles")
wait(1000)
goto Med
Endif
while UO.Life<UO.GetMaxHP()
UO.DeleteJournal()
UO.BandageSelf()
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You apply the bandages")
Чет я не понял, тут получается что после полиморфа, юзаеш на себя бинты, и че растет??. Неужто ветеринария???
Posted: 2004-06-29 09:41:31
by Daioh
AlexMidRus wrote:Чет я не понял, тут получается что после полиморфа, юзаеш на себя бинты, и че растет??. Неужто ветеринария???
Да. В любом морфе в животных(демон тоже животное) при бандажировани себя растет ветеренария.
Posted: 2004-06-29 11:47:46
by Edred
Daioh wrote:AlexMidRus wrote:Чет я не понял, тут получается что после полиморфа, юзаеш на себя бинты, и че растет??. Неужто ветеринария???
Да. В любом морфе в животных(демон тоже животное) при бандажировани себя растет ветеренария.
Это зависит от шарда... На каких-то шардах и стрелкой в себя парринг растет... И резист можно качать на стенках, которые сам поставил...