Yoko
http://forum.yoko.com.ua/

Скрипт на плавку (что в нем не так?)
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12511		 Page 1 of 1
Author:  Archy_87 [ 2007-09-25 05:43:32 ]
Post subject:  Скрипт на плавку (что в нем не так?)
Code:
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 не помогает тоже самое... Подскажите что не так?
Author:  Scripts Writer [ 2007-09-25 13:40:18 ]
Post subject: 
Code:
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
Author:  Archy_87 [ 2007-09-25 15:29:24 ]
Post subject: 
Ошибку пишет... UO.FINDCOUNT и указывает почемуто на строку где написанно Endsub
Author:  Scripts Writer [ 2007-09-25 15:50:03 ]
Post subject: 
Исправил
Author:  Archy_87 [ 2007-09-25 22:24:35 ]
Post subject: 
Мешок открывается, и далее у меня в паке все вещи начинают перекладываться... А вот руда с мешка не берется...
Author:  Scripts Writer [ 2007-09-26 04:01:00 ]
Post subject: 
Мешок у тебя в бекпеке лежит?
Author:  Archy_87 [ 2007-09-26 08:29:37 ]
Post subject: 
Нет наполу рядом с чаром... А нада в бекпаке?
Author:  grundick [ 2007-09-26 10:54:29 ]
Post subject: 
Пох где мешок.Вот так должно работать
Code:
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
Author:  Scripts Writer [ 2007-09-26 17:34:08 ]
Post subject: 
Archy_87 wrote:
Нет наполу рядом с чаром... А нада в бекпаке?


Найди нормальный скрипт на переплавку(В проверенных скриптах там Smelthing (by Gremlin если не ошибаюсь))
Author:  Spirit [ 2007-09-26 20:04:08 ]
Post subject: 
Там, где используются переменные, ковычки не нужны.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/