--function Travel(RunebookID,Rune,Procedure,Delay)
--example Travel(RunebookID,Rune,3,True)
--Usage of Procedure: (1)Recall, (2)Gate, (3)Chivalry
--Usage of Delay : True = 5 Second Delay before jump back in Loop
function Travel(RID,n,m,D)
cx = UO.CharPosX
cy = UO.CharPosY,0
Page = {1,1,2,2,3,3,4,4,5,5,6,6,7,7,8,8}
PageCord = {}
PageCord[1] = {1,2,3,4,5,6,7,8} --Must be changed by Real Positions
PageCord[2] = {1,2,3,4,5,6,7,8} --Must be changed by Real Positions
seite = Page[1]
seitex = PageCord[1][seite]
seitey = PageCord[2][seite]
side = {1,2,1,2,1,2,1,2,1,2,1,2,1,2,1,2}
spell = {}
spell[1] = {}
spell[1][1] = {"xx","xy"} --Must be changed by Real Positions
spell[1][2] = {"xx","xy"} --Must be changed by Real Positions
spell[1][3] = {"xx","xy"} --Must be changed by Real Positions
spell[2] = {}
spell[2][1] = {"xx","xy"} --Must be changed by Real Positions
spell[2][2] = {"xx","xy"} --Must be changed by Real Positions
spell[2][3] = {"xx","xy"} --Must be changed by Real Positions
spellx = spell[side[Page[n]]][m][1]
spelly = spell[side[Page[n]]][m][2]
while cx == UO.CharPosX and cy == UO.CharPosY do
OpenContainer(n)
clickx = UO.ContPosX + seitex
clicky = UO.ContPosY + seitey
UO.Click(clickx,clicky,true,true,false,false,false)
wait(250)
clickx = UO.ContPosX + spellx
clicky = UO.ContPosY + spelly
UO.Click(clickx,clicky,true,true,false,false,false)
wait(1000)
if cx == UO.CharPosX and cy == UO.CharPosY and D = false then wait(5000) end
end
end