Kód: Vybrat vše
sub krv()
var timeout=0
UO.Deletejournal()
UO.FindType("0x0f0c","0x0025")
if UO.FindCount()>0 then
UO.Count("0x0f0c","0x0025")
UO.UseType("0x0f0c","0x0025")
else
UO.FindType("0x1843","0x0025")
if UO.FindCount()>0 then
UO.UseType("0x1843","0x0025")
UO.WaitTargetType("0x0f0e")
timeout = 0
Repeat
timeout=timeout+100
wait(100)
Until uo.InJournal("You can't drink") or UO.InJournal("You put") or UO.InJournal("Pri praci") or UO.InJournal("battle.") or UO.InJournal("wait to perform") or timeout>2000
If UO.InJournal("Pri praci") or UO.InJournal("battle.") or UO.InJournal("wait to perform") then
UO.Exec('warmode 1')
wait(100)
UO.Exec('warmode 0')
goto pititmr2
UO.Exec('warmode 1')
end if
If timeout>=2000 then
Uo.concolor(0x002b)
uo.playwav("notify.wav")
UO.Print("!!! NENALILO time out !!!")
Uo.concolor(0x009A)
RETURN
end if
wait(400)
UO.Count("0x0f0c","0x0025")
UO.UseType("0x0f0c","0x0025")
end if
RETURN
end if
end sub
1: Kad musim mat v hlavnom bagli inak ju nenajde.
2: Potiony tiez musim mat v hlavnom bagli inak ich nevychlasta
Potrebujem radu:
Ako prerobit tento script nech to chlasta aj z inych baglov, popripade nalieva z inych baglov?