Přesun všech věcí z kontejneru jinam

[Lara Craft]

Další moje praktická udělávka. Vyberte 'odkud' -jeden kontejner (ptlík, bedničku nebo truhlu) do jiného kontejneru 'kam'.

Kód: Vybrat vše

#---------------------------------------------------------------
sub presun()
#---------------------------------------------------------------
var pauza=1000
UO.Addobject('odkud')
While UO.targeting()
wait(300)
wend
if UO.GetGraphic('odkud')=='0x0000' then
return
endif
if UO.GetGraphic('odkud')=='0x2006' then
pauza=3500
endif
UO.deleteJournal()
UO.Addobject('kam')
While UO.targeting()
wait(300)
wend

if UO.GetGraphic('kam')<>'0x0000' then
UO.SetCatchbag('kam')
else
return
endif
UO.UseObject('odkud')
wait(3000)
repeat
UO.Findtype('-1','-1','odkud')
UO.Moveitem('finditem','1000','kam')
wait(pauza)
UO.DeleteJournal()
Until UO.findCount()==0 OR UO.InJournal('cancelled')
UO.UnsetCatchbag()
end sub
#---------------------------------------------------------------