
Veterinari
- Castian
- Undead Scriber
- Příspěvky: 752
- Registrován: 08.09.2006 13:05:10
- Bydliště: Blava
- Kontaktovat uživatele:
Veterinari
Ahojte nemate niekto dobry script na veterinu? nasiel som nejake na mrakoplashi, ale tie stoja za prdku, zbytocne spamuju a vobec nefunguju tak ako by mali. Ak mate mozete sa podelit
Vopred dakujem

[b]Save a horse, ride a tractor![/b]
- Night Storm
- Undead Scriber
- Příspěvky: 704
- Registrován: 08.07.2007 01:39:31
- Bydliště: Brno
- Kontaktovat uživatele:
-
- Paper Elemental
- Příspěvky: 392
- Registrován: 07.09.2006 20:00:03
- Bydliště: Blava
- Kontaktovat uživatele:
snad bude dobry
Kód: Vybrat vše
# ----
# Leceni Dvou Zvirat + Heal cekajici na Journal
# ----
sub heal2animals()
UO.Print('=> Heal Bandage Two Animals / Start')
var objekt1
var objekt2
uo.print('Zvol 1. cil pro leceni')
uo.addobject('objekt1')
While uo.targeting()
Wait(100)
Wend
uo.print('Zvol 2. cil pro leceni')
uo.addobject('objekt2')
While uo.targeting()
Wait(100)
Wend
While not uo.dead()
if UO.Count('0x0E21') < 10 then
UO.Msg("All Stop")
UO.Print('-> Dosli Bandy...Heal 2 Animals - End')
wait(1000)
uo.exec("terminate all")
endif
if UO.GetHP('objekt1') < 0.6*uo.getmaxhp('objekt1') then
UO.Msg("B Stop")
endif
if UO.GetHP('objekt1') < uo.getmaxhp('objekt1') then
uo.WaitTargetObject('objekt1') #ID zvirete 1
healjournal() #Heal zvirete 1
endif
if UO.GetHP('objekt1') == uo.getmaxhp('objekt1') then
UO.WaitTargetobject('objekt1') #ID zvirete 1
UO.Msg("B Kill")
wait(2000)
endif
if UO.GetHP('objekt2') < 0.6*uo.getmaxhp('objekt2') then
UO.Msg("A Stop")
endif
if UO.GetHP('objekt2') < uo.getmaxhp('objekt2') then
uo.WaitTargetObject('objekt2') #ID zvirete 2
healjournal() #Heal zvirete 2
endif
if UO.GetHP('objekt2') == uo.getmaxhp('objekt2') then
UO.WaitTargetobject('objekt2') #ID zvirete 2
UO.Msg("A Kill")
wait(2000)
endif
Wend
End sub
sub healjournal()
uo.deletejournal()
UO.UseType('0x0E21')
wait(100)
While not uo.injournal("You put|barely help|mumii|unexpected|cancelled")
Wait(200)
Wend
end sub