Пытался переделать..
Posted: 2006-08-28 17:35:45
Скрипт писал в файл все что в сумке, хотел переделать его так, чтоб я указывал на сундук и он писал что в сундуке. Но он всеравно пишет из бэкпака.
Code: Select all
sub informer()
var a
var b
var f=file('c:/test.txt')
var sunduk = 'kont'
UO.Print('ukajite konteiner???')
UO.AddObject('konteiner_dlya_proverki')
while UO.Targeting()
wait(50)
wend
endif
f.open()
f.Create()
uo.ignorereset()
uo.FindType(-1, -1, 'kont')
while uo.FindCount()
uo.click('finditem')
a=uo.GetGraphic('finditem')
b=uo.GetColor('finditem')
wait(500)
uo.print(uo.GetName('finditem'))
uo.Print('|Kolicestvo '+str(uo.Count(a,b))+' v konteinere|')
uo.print('######################')
f.WriteLn(uo.GetName('finditem')+'| Kol.----> |'+str(uo.Count(a,b)))
wait(2000)
uo.Ignore('finditem')
uo.FindType(-1, -1, 'kont')
wend
uo.ignorereset()
f.close()
end sub