Чисто под РУНУО(Нова) Стоим кормим животное (для бонда)

[Chico]

; Указываем по порядку бокс где лежит мясо, животное (оно у меня названо непотребно box2, ну и само мясо (рыбу, фрукты и тд))

Code: Select all

 sub korm()
var Kol, I, Tip 		; Количество
	uo.Exec('addobject Box1')
	while uo.Targeting()
	wait(100)
	wend 
	uo.Exec('addobject Box2')
	while uo.Targeting()
	wait(100)
	wend 
	uo.Exec('addobject obj')
	while uo.Targeting()
	wait(100)
	wend 
    Tip = uo.GetGraphic('obj')
	uo.findtype(Tip,'-1','Box1') 
    wait(300)
    kol =  uo.count(Tip)
    uo.print('naideno-' + str(kol))
    uo.setreceivingcontainer('Box2') 
repeat 
      uo.findtype(Tip,'-1','Box1') 
      wait(100)
      UO.GRAB('10','finditem')
      Wait(3600000) 
      uo.print('naideno-' + str(uo.count(Tip)))
until not uo.count(Tip)
end sub