Dagger Sell plizz help !!!

[SomeOne]

Narod mne nuzhen script 6tobe prodavatj daggeri katorije v back packe razkidani jest u kavota scrit help pliz

[Leks]

Narod mne nuzhen script 6tobe prodavatj daggeri katorije v back packe razkidani jest u kavota scrit help pliz

)) Лови и радуйся (ентот скрипт под ДРВ, у нас с задержками траблы):

Code: Select all

sub Sell() 
uo.DeleteJournal() 
var num=0,numb=0 
var stroka 
uo.set('injectecho','1');чтобы в журнале отображались сообщения инжекта 
uo.set('buydelay',0);продаем без задержки, чтобы узнать кол-во вещей на продажу 
uo.set('maxsell','99');тут к сожалению 'особенность' - не больше 99 вещей 
uo.sell('Daggers','Vendor') 
repeat 
  wait(50) 
until uo.InJournal('For sold') 

stroka=right(left(uo.journal(uo.injournal('For sold:')-1),12),2) 
;'обрезали' строку журнала до нужного числа продаваемых вещей 
RTrim(stroka); если вещей <10 то в конце строки будет стоять пробел (удаляем его) 
num=VAL(stroka);переводим в численное значение 
numb=(num)*420 ;получаем общую задержку 
uo.set('buydelay',STR(numb)) ;продаем 
uo.sell('Daggers','Vendor') 
end sub 

Создаеш лист продаж в Buy/Sell на закладке Main с названием Daggers