Yoko

Нде.. таблицы врут.. ) не могу я торчи делать.

ну как грится... такова селяви...

Теперь торчи умею делать, но скрипт всё равно не пашет, пишет:
"Line 137- Invalid Numbers of argument - Craft Torch"
Линия 137 - это end sub
Не понимаю в чём тут ошибка

всё, заработало ) сори, ступил. просто заменил Sub на sub
З,Ы, НУб я

мдямс... на самом деле нету тут разницы... если по аглицки писать...

народ а не подскажите скрипт на спаринг? на дрв...

я спарингуюсь с хелками, так чта сумлеваюсь что кому то это будет интересно, тем паче что скрипт пользую простой до безобразия.

Не такой он уж и безобразный !!!
Реальный скрипт !!!

_________________
Сделал дело - флуди смело !!!

Описание: Скрипт написан для просмотра товаров на вендоре. Забиваете его в хоткеи(не обязательно), запускаете, тыркаете на вендора, открывается лист покупки.
NB!! этот скрипт н и ч е г о не покупает.

sub marketbuy() 
   VAR vend, ven='vendor'   
   UO.Exec('addobject vend') 
   while uo.Targeting() 
      wait(200) 
   wend  
   UO.Click('vend') 
   ven=UO.GetName('vend')    
   UO.Say(ven + ' buy')
end sub

Описание: Скрипт на отсчитывание определённой суммы денег в отдельный мешочек. Перед запуском скрипта определяете необходимую сумму, т.е. задаёте необходимое значение переменной Summ, после запуска указываете мешки по очереди:
1. мешок с деньгами,
2. мешок под деньги.
Деньги в мешок укладываются по 50к, как бы они не были расфасованы в исходном мешке.
Особенности: Перекладывает суммы кратные 50к, если вы задали иную сумму, то перекладывает сумму уменьшенную до ближайшего кратного, и в итоге показывает сколько недоложено было в мешок.
При нехватке денег в исходном мешке перекладывает _все_ деньги, в том числе и не целую кучку, в мешок под деньги, и также выводить недостающую сумму до введённого значения.
В мешке под деньги не желательно наличие гп перед запуском скрипта, в противном случае я не ручаюсь за корректность работы скрипта.

sub CollectMany()
var Summ = 300000
var idMoneyFrom, idMoneyTo, t
   UO.Print('Откуда деньги тырим?')
   uo.addobject('objBag') 
   while uo.targeting() 
      wait(100) 
   wend 
   idMoneyFrom = UO.GetSerial('objBag')
   UO.Print('Куда отсчитываем?')
   uo.addobject('objBag') 
   while uo.targeting() 
      wait(100) 
   wend 
   idMoneyTo = UO.GetSerial('objBag')
   uo.UseObject(idMoneyFrom)
   uo.UseObject(idMoneyTo)
   CheckLag()
   UO.FindType('0x0EED', '0x0000', idMoneyFrom)
   while UO.FindCount()>1 and Summ > 50000      
      UO.MoveItem('finditem',-1,idMoneyTo)
      CheckLag()
      if UO.GetQuantity('finditem') <> 50000 then
         t = UO.GetQuantity('finditem')
         UO.FindType('0x0EED', '0x0000', idMoneyFrom)
         repeat            
            UO.MoveItem('finditem',str(50000-t),idMoneyTo)
            CheckLag()
            wait(1000)
            t = UO.GetQuantity('finditem')
            UO.FindType('0x0EED', '0x0000', idMoneyFrom)
         until UO.GetQuantity(t) == 50000 or UO.FindCount() < 1
         if UO.FindCount() < 1 then
            Summ = Summ-UO.GetQuantity(t)
         else
            Summ = Summ - 50000
         end if
      else
         Summ = Summ - 50000
         wait(1000)
      end if
      UO.FindType('0x0EED', '0x0000', idMoneyFrom)
   wend
   if Summ == 0 then
      UO.Print('Деньги перекинул в полном объёме.')
   else
      UO.Print('В пакетике не хватает ' + str(Summ) + 'гп до запрашиваемой суммы.')
   end if
end sub

sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(50) 
   until UO.InJournal('backpack') 
end sub

Скачал на этом сайте скрипт:

Code:

var tProduct = '0x1085' ;тип товара
var cProduct = '0x0000' ;цвет товара
var sellListName = 'Necklace' ;название листа продажи
var ms = 25 ;кол-во поскольку будем продавать
var addDealy = 500 ;если не успевает продавать, увеличьте эту цифру
var bd = ms*350+addDealy ;system. don't tuch
UO.Print('Кому продавать будем?')
UO.addobject('vend')
while uo.Targeting()
wait(200)
wend
if UO.GetSerial('vend') == UO.GetSerial('self') or UO.GetSerial('vend') == '0x00000000' or UO.GetSerial('vend') == UO.GetSerial('backpack') then
UO.Print('Промазал(а) - отключаюсь.')
end if
uo.set('maxsell',str(ms))
UO.UseObject('backpack')
uo.set('buydelay',str(bd))
CheckLag()
while UO.Count(tProduct,cProduct) > 0
if UO.Count(tProduct,cProduct) < ms then
bd = UO.Count(tProduct,cProduct)*350+addDealy
uo.set('buydelay',str(bd))
CheckLag()
end if
uo.sell(sellListName,UO.GetName('vend'))
CheckLag()
if UO.InJournal("You have nothing I'm interested in") then
return
end if
UO.Say('! <GUARDS> ')
wend
uo.set('buydelay','0')
end sub

sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
end sub


Всё вроде выставил правильно(Я продаю ожерелья) но ничего не продаётся(((Может Я не так создаю лист продажь???ПОМОГИТЕ!!!ЗАРАНИЕ СПАСИБО)))!

в смысле не продаётся? скрипт хоть как то реагирует?

ЗЫ. а разве у некласов тип не '0x1086'?
ЗЗЫ если некласы по мешкам разныканы... то их сперва открыть надо причём каждый...

Да скрипт пишет, что невозможно найти айтем.Проверил ещё раз, точно
'0x1085' попробовал даже '0x1086' тогда скрипт вообще слетает....даже ничего не написав.Неклс Я ща специально перестал убирать в сумки они у меня лежат прямо в бэкпаке.((((

проверь лист продажи.

и ещё раз спрошу:
скрипт хоть как то реагирует?

Лист продажи проверил.Вроде всё нормально...
Скрипт реагирует: примерно так 0 item found.Очень очень быстро всё это пишет, а потом спам детектед и всё по кругу.

лист продажи - там ошибка.

ЗЫ или не тому вендору втюхать хочешь...

Какая может быть ошибка в сел листе?Иногда кстати скрипт ещё пишет waito to wendor много много раз.....потом опять спам детектед(((

а какая ошибка может быть в скрипте которым я сам пользовался длительное время + ещё достаточно много народу + ты сам успешно юзал.
ищи ошибку на своём конце.
ЗЫ. и если приводишь какие либо сообщения приводи их дословно

Всё вроде заработало...Осталась одна проблемка даже если открыть сумку, он не хочет из неё продавать, только если выложить в бэкпак.И потому приходится каждый раз прописывать id каждой сумки

куда???