Page 1 of 1

Скрипт на плавку (что в нем не так?)

Posted: 2007-09-25 05:43:32
by Archy_87

Code: Select all

sub Smelth()
Var Ruda='0x19B7'
Var Bag='0x40024289'
Var Ore='0x19B9'

IF UO.Count( Ruda ) = 0 Then
   UO.FindType ( 'Ore', '-1', 'Bag' )
      If UO.FindCount() > 4 Then
         UO.MoveItem('finditem', '1')
         wait( 300 )
         UO.UseType( 'Ruda' )
         wait(300 )
      Else
         UO.Print( 'В мешке нет руды!' )
      Endif
Endif
Next
EndSub


У меня на сервере руда плавится дабл кликом на руду, вот я себе и написал скрипт, только он почемуто ошибку выдает в строке

UO.MoveItem('finditem', '1')

Я пробывал UO.Grab не помогает тоже самое... Подскажите что не так?

Posted: 2007-09-25 13:40:18
by Scripts Writer

Code: Select all

sub Smelth() 
Var Ruda='0x19B7'
Var Bag='0x40024289'
Var Ore='0x19B9'

uo.UseObject(Bag)
wait(1000)
UO.FindType ( 'Ore', '-1', 'Bag' )
if uo.FindCount() then
 repeat
  uo.moveitem('finditem','1')
  wait(500)
  uo.UseObject('finditem')
  wait(750)
  UO.FindType ( 'Ore', '-1', 'Bag' )
 until uo.FindCount() ==0
end if
uo.Print('there are no more ores to smelt.')
EndSub

Posted: 2007-09-25 15:29:24
by Archy_87
Ошибку пишет... UO.FINDCOUNT и указывает почемуто на строку где написанно Endsub

Posted: 2007-09-25 15:50:03
by Scripts Writer
Исправил

Posted: 2007-09-25 22:24:35
by Archy_87
Мешок открывается, и далее у меня в паке все вещи начинают перекладываться... А вот руда с мешка не берется...

Posted: 2007-09-26 04:01:00
by Scripts Writer
Мешок у тебя в бекпеке лежит?

Posted: 2007-09-26 08:29:37
by Archy_87
Нет наполу рядом с чаром... А нада в бекпаке?

Posted: 2007-09-26 10:54:29
by grundick
Пох где мешок.Вот так должно работать

Code: Select all

sub Smelth() 
Var Bag='0x4013C28D'
Var IronOre='0x19B9'

uo.UseObject(Bag)
wait(1000)
UO.FindType (IronOre,-1,Bag)
if uo.FindCount() then
 repeat
  uo.moveitem('finditem',1)
  wait(200)
  uo.UseObject('finditem')
  wait(200)
  UO.FindType ( IronOre, -1, Bag )
 until uo.FindCount() ==0
end if
uo.Print('there are no more ores to smelt.')
end sub

Posted: 2007-09-26 17:34:08
by Scripts Writer
Archy_87 wrote:Нет наполу рядом с чаром... А нада в бекпаке?


Найди нормальный скрипт на переплавку(В проверенных скриптах там Smelthing (by Gremlin если не ошибаюсь))

Posted: 2007-09-26 20:04:08
by Spirit
Там, где используются переменные, ковычки не нужны.