Покупка недостающих регов ХЕЛП !!!

[matroskin]

чёт пашет но както странно
помогите плиз
можно зделать такую штуку
вобщем нужно 50 штук каждого
чтоб он отнимал от 50 остаток на момент проверки и покупал разницу
ото я зделал какуето глупость )

Code: Select all

sub SR()
UO.Print("SELECT VENDOR") 
UO.Exec('addobject Vendor')
While UO.Targeting() 
wait(500)
Wend
var name='Vendor'
UO.Click('Vendor')
wait(1500)
name=UO.GetName('Vendor')
   wait(1000) 
   if UO.Bm<50 then 
   UO.buy('bm','name') 
   wait(1000) 
   UO.Say(name + " buy") 
   UO.DeleteJournal() 
   end if     
   if UO.Bp<50 then 
   UO.buy('bp','name') 
   wait(1000)
   UO.Say("buy")  
   UO.DeleteJournal() 
   end if     
   if UO.Mr<50 then 
   UO.buy('mr','name') 
   wait(1000) 
   UO.Say("buy") 
   UO.DeleteJournal() 
   end if
    if UO.Ga<50 then 
   UO.buy('ga','name') 
   wait(1000) 
   UO.Say("buy") 
   UO.DeleteJournal() 
   end if
    if UO.Ns<50 then 
   UO.buy('ns','name') 
   wait(1000) 
   UO.Say("buy") 
   UO.DeleteJournal() 
   end if
    if UO.Sa<50 then 
   UO.buy('sa','name') 
   wait(1000) 
   UO.Say("buy") 
   UO.DeleteJournal() 
   end if
    if UO.Ss<50 then 
   UO.buy('ss','name') 
   wait(1000) 
   UO.Say("buy") 
   UO.DeleteJournal() 
   end if
   if UO.Gs<50 then 
   UO.buy('gi','name') 
   wait(1000) 
   UO.Say("buy") 
   UO.DeleteJournal() 
   end if
End sub

плиз хелп

[I'm]

вобщем нужно 50 штук каждого
чтоб он отнимал от 50 остаток на момент проверки и покупал разницу

Лист покупки статичен ты никак несможеш этого сделать тоесть если у тебя 37 регов а тебе надо чтобы их было 50 то придется покупать по 1 до тех пор пока их количество небудет равно 50.
Могу ошибаться но если неизменяет память то так все

[matroskin]

ясненько спасиб
а как постоянно обращатся к вендору по имени ??
ото после первой покупки он вместо имени пишет какуето бурду =(
помоему пофторяет слова вендора
какнеть чтоб он брал один раз имя вендора и юзал только его
а он у меня после каждой покупки обращается к вендору и заного берёт его имя
тоесть при покупки 8 видов регов он 8 раз смотрит имя =(
а оно там меняется
и иза етого пишет какуето бурду

[Destruction]

getname()