sub Teleportation()
VAR a, b, c
VAR d = uo.getx('self')
repeat
while uo.mana < 11
uo.warmode('0')
uo.useskill('Meditation')
wait(1000)
wend
a = 0
if uo.injournal('GM') or uo.injournal('Admin') or uo.injournal('Seer') or uo.injournal('Counselor') or uo.injournal('Developer') then
uo.usetype('0x0F08')
uo.closeuo()
else
wait(50)
endif
uo.deletejournal()
if val(uo.getglobal('recal')) == 1 then
uo.waittargetobject('mine1')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 2 then
uo.waittargetobject('mine2')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 3 then
uo.waittargetobject('mine3')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 4 then
uo.waittargetobject('mine4')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 5 then
uo.waittargetobject('mine5')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 6 then
uo.waittargetobject('mine6')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 7 then
uo.waittargetobject('mine7')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 8 then
uo.waittargetobject('mine8')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 9 then
uo.waittargetobject('mine9')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 10 then
uo.waittargetobject('mine10')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 10 then
uo.waittargetobject('mine10')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 11 then
uo.waittargetobject('mine11')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 12 then
uo.waittargetobject('mine12')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 13 then
uo.waittargetobject('mine13')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 14 then
uo.waittargetobject('mine14')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 15 then
uo.waittargetobject('mine15')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 16 then
uo.waittargetobject('mine16')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 17 then
uo.waittargetobject('mine17')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 18 then
uo.waittargetobject('mine18')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 20 then
uo.waittargetobject('mine20')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 21 then
uo.waittargetobject('mine21')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 22 then
uo.waittargetobject('mine22')
uo.cast('Recall')
else
wait(50)
endif
if val(uo.getglobal('recal')) == 23 then
uo.waittargetobject('mine23')
uo.cast('Recall')
else
wait(50)
endif
repeat
wait(100)
a = a + 1
until a > 35 or d <> uo.getx('self') or uo.injournal('The spell fizzles.')
wait(500)
until not uo.injournal('The spell fizzles.')
b = val(uo.getglobal('recal')) + 1
uo.setglobal('recal', str(b))
if val(uo.getglobal('recal')) > 23 then
uo.setglobal('recal', '1')
endif
uo.set('finddistance', '7')
uo.findtype('0x000E', '-1', '1') #тип элементаля#
if uo.findcount() > 0 then
uo.usetype('0x0F08')
uo.exec('exec Teleportation')
return
endif
if val(uo.getglobal('back')) == 0 then
uo.exec('exec CheckingPlayers')
uo.setglobal('place', '1')
uo.setglobal('circle', '1')
uo.exec('exec Obkopka')
else
uo.setglobal('back', '0')
endif
end sub
