sub record_path()
var x
var y
var path=""
UO.DeleteJournal()
Repeat
x=UO.GetX()
y=UO.GetY()
if waitNewPos(x,y) then
path=path+extract_dir(x,y,UO.GetX(),UO.GetY())
endif
Until UO.InJournal("stop")
path = compressPath(path)
UO.TextClear()
UO.TextOpen()
UO.TextPrint("Votre chemin est:")
UO.TextPrint(path)
end sub
VAR x = uo.getx()
VAR y = uo.gety()
while 1
if x<>uo.getx() or y<>uo.gety() then
x = uo.getx()
y = uo.gety()
UO.TextOpen()
UO.TextPrint(x,' ',y)
endif
uo.click('backpack')
wait(20)
wend