i try to write a little sort script (again

here a snippet
Code: Select all
sub SR()
uo.canceltarget()
uo.exec('addobject LootBeutel')
while uo.targeting()
wait(100)
Wend
uo.useobject('LootBeutel')
var tZirkel1 = '0x497F5633'
var tZirkel2 = '0x49E187B8'
var tZirkel3 = '0x49E187BF'
var tZirkel4 = '0x49E187D6'
var tZirkel5 = '0x49E187DE'
var tZirkel6 = '0x49E187E6'
var tZirkel7 = '0x49E187EF'
var tZirkel8 = '0x49E187F3'
var tMusik = '0x4875662D'
var tArtefakt = '0x40DB7717'
var ZeilenNummer
var ZeilenText
uo.FindType('-1','-1','LootBeutel')
while uo.FindCount()
uo.DeleteJournal()
if uo.FindCount() then
uo.Click('finditem')
wait(250)
ZeilenNummer = uo.InJournal('You see') - 1
if ZeilenNummer > 0 then
ZeilenText = Journal(ZeilenNummer)
if 'Essen' in ZeilenText then
uo.moveitem('finditem','all',tZirkel1)
else
uo.ignore('finditem')
end if
wait(750)
end if
end if
uo.FindType('-1','-1',container)
wend
end sub
but the line
Code: Select all
if 'Essen' in ZeilenText then
brings up an error.
Please can you help me?
thanks
taya