Ищу вот такой скриптик)
Moderators: Murderator+, Murderator
Re: Ищу вот такой скриптик)
Не помогло
Теперь уже точно ошибка maxcol , а перед этим ругалось на "Item[0] = '0x1402' ; шапка" Так что я в замешательстве 
Re: Ищу вот такой скриптик)
MERFY wrote:Не помоглоТеперь уже точно ошибка maxcol , а перед этим ругалось на "Item[0] = '0x1402' ; шапка" Так что я в замешательстве
DIM Item[5] проверь это где 5 это количество строк с типами вещей
for j = 0 to 4 если и эту проверь
тоже проблема с maxcol дальше можно не рыпаться ищу варианты)
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
-
Juicy Fruit
- Posts: 820
- Joined: 2011-06-11 19:54:23
Re: Ищу вот такой скриптик)
Code: Select all
sub SortItem()
var AlchBox,TypeP,ColorP,x,y,i,col,j
i=5 ; шаг
x=50 ; координата X первого предмета
y=50 ; координата Y первого предмета
col=0
var maxcol=5
var box1 = '0x012345678' ; откуда перекладываем
var box2 = '0x012345678' ; куда перекладываем
DIM Item[5]
Item[0] = '0x0123' ; шапка
Item[1] = '0x0123' ; шея
Item[2] = '0x0123' ; пузо
Item[3] = '0x0123' ; руки
Item[4] = '0x0123' ; ноги
for j = 0 to 4
repeat
UO.FindType(Item[j],-1,box1)
if UO.findcount()>0 then
UO.MoveItem('finditem','1',box2,x,y,'0')
else
return
end if
wait(500)
x=x+i
col=col+1
Until UO.Count(Item[j],-1,box1)<1 or col>=maxcol
x=50
y=y+i
next
End subАгась
Re: Ищу вот такой скриптик)
Code: Select all
sub SortItem()
var AlchBox,TypeP,ColorP,x,y,i,col,j,maxcol
i=5 ; шаг
x=50 ; координата X первого предмета
y=50 ; координата Y первого предмета
col=0
maxcol=5
var box1 = '0x012345678' ; откуда перекладываем
var box2 = '0x012345678' ; куда перекладываем
DIM Item[5]
Item[0] = '0x0123' ; шапка
Item[1] = '0x0123' ; шея
Item[2] = '0x0123' ; пузо
Item[3] = '0x0123' ; руки
Item[4] = '0x0123' ; ноги
for j = 0 to 4
repeat
UO.FindType(Item[j],-1,box1)
if UO.findcount()>0 then
UO.MoveItem('finditem','1',box2,x,y,'0')
else
return
end if
wait(500)
x=x+i
col=col+1
Until UO.Count(Item[j],-1,box1)<1 or col>=maxcol
x=50
y=y+i
next
End subОпередили((
Агась
Не быть жадным - уже богатство, не быть расточительным – доход.
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
TylllKaH
YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Re: Ищу вот такой скриптик)
А как вообще узнать координаты предмета в сумке? О_О
-
Juicy Fruit
- Posts: 820
- Joined: 2011-06-11 19:54:23
Re: Ищу вот такой скриптик)
,info и таргетом на предмет в сумке