|
Как разложить шапки по мешкам?
|
|
| mont | Дата: Суббота, 2006-12-16, 11:49 PM | Сообщение # 1 |
|
Одмин.
Группа: Администраторы
Сообщений: 1051
Статус: Offline
| Как сделать, что-бы при переполнении мешка, он ставил сеткачбек на другой?:)
|
| |
| |
| PAR | Дата: Воскресенье, 2006-12-17, 0:16 AM | Сообщение # 2 |
 Великий Скриптор
Группа: Модераторы
Сообщений: 149
Статус: Offline
| Смотря в каком скрипте-) если на том, который на тейлоринг, то нада чтобы при кол-ве шкур > 7000, переменной SyndykSecure присвавалось значение ИД следующего контейнера найти кол-во шкур мона так:
| Code |
UO.FindType(Item,'0x0000',SyndykSecure)
wait(1000)
количество=UO.GetQuantity('finditem')
|
аднака в последней версии сего скриптега, это уже не актуально, т.к. там настравивается кол-во шкур, которое будет покупаться сверх нужного для шитья количества-) а ежель скриптег другой, тада выложи, глянем-з
Сообщение отредактировал mont - Пятница, 2007-06-01, 2:56 AM |
| |
| |
| mont | Дата: Воскресенье, 2006-12-17, 0:32 AM | Сообщение # 3 |
|
Одмин.
Группа: Администраторы
Сообщений: 1051
Статус: Offline
| Надо что-б простецки шил шапки, и раскладывал по мешкам, тоесть когда 1ый заполняется, заполняет 2ой... и так далее, до того, как кончатся шкуры. вот так)
|
| |
| |
| PAR | Дата: Воскресенье, 2006-12-17, 1:43 AM | Сообщение # 4 |
|
Великий Скриптор
Группа: Модераторы
Сообщений: 149
Статус: Offline
| Зачем тебе стока шапок?  лови..
| Code |
var ResolutionMode =640
var HidesContainer =0x62a55aaf
var LCapsContainer0=0x62a55aa0
var LCapsContainer1=0x62a55aa1
var LCapsContainer2=0x62a55aa2
var LCapsContainer3=0x62a55aa3
var LCapsContainer4=0x62a55aa4
var LCapsContainer5=0x62a55aa5
var LCapsContainer6=0x62a55aa6
var LCapsContainer7=0x62a55aa7
var LCapsContainer8=0x62a55aa8
var LCapsContainer9=0x62a55aa9
var LCapsContainer10=0x62a55aaa
var LCapsContainer11=0x62a55aab
var LCapsContainer12=0x62a55aac
var LCapsContainer13=0x62a55aad
var LCapsContainer14=0x62a55aae
var SewingKit =0x0f9d
var Hides =0x1078
var LeatherCap =0x1db9
var ScriptStatus =1
sub MakingCaps()
while ScriptStatus==1
Put(Hides,HidesContainer)
Take(Hides,'240',HidesContainer)
while UO.Count(Hides)>2 and UO.Count(LeatherCap)<120
UO.DeleteJournal()
UO.WaitMenu('Choose a category.','leather','What you you want to create?','Leather Cap - takes 2 hides')
UO.WaitTargetType(Hides)
UO.UseType(SewingKit)
while not UO.InJournal('create') and not UO.InJournal('destroy')
wait(10)
wend
if UO.InJournal('capabilities,') or UO.InJournal('Targetting') then
if ResolutionMode==0 then
UO.LClick(318,221) #640x480
endif
if ResolutionMode==1 then
UO.LClick(398,279) #800x600
endif
endif
wend
PutLCaps(LCapsContainer0)
PutLCaps(LCapsContainer1)
PutLCaps(LCapsContainer2)
PutLCaps(LCapsContainer3)
P utLCaps(LCapsContainer4)
PutLCaps(LCapsContainer5)
PutLCaps(LCapsContainer6)
PutLCaps(LCapsContainer7)
PutLCaps(LCapsContainer8)
PutLCa ps(LCapsContainer9)
PutLCaps(LCapsContainer10)
PutLCaps(LCapsContainer11)
PutLCaps(LCapsContainer12)
PutLCaps(LCapsContainer13)
PutLCap s(LCapsContainer14)
if UO.Count(LeatherCap)>0 then
ScriptStatus=0
endif
wend
end sub
sub PutLCaps(ContainerID)
UO.FindType(LeatherCap,'0x0000',ContainerID)
wait(1000)
if UO.GetQuantity('finditem')==0 Then
Put(LeatherCap,ContainerID)
endif
end sub
sub Put(Item,Syndyk)
while UO.Count(Item)>0
UO.FindType(Item)
UO.MoveItem('finditem','0',Syndyk)
wait(1000)
wend
end sub
sub Take(Item,Count,Syndyk)
var PrevItemCount=UO.Count(Item)
UO.FindType(Item,'0x0000',Syndyk)
wait(1000)
if UO.GetQuantity('finditem')>0 Then
wait(1000)
UO.MoveItem('finditem',Count,'backpack')
wait(1000)
endif
while PrevItemCount==UO.Count(Item)
wait(200)
if UO.GetQuantity('finditem')==0 Then
wait(1000)
PrevItemCount=-10
endif
wend
end sub
# @ PAR -) |
Сообщение отредактировал mont - Пятница, 2007-06-01, 2:56 AM |
| |
| |
| PAR | Дата: Воскресенье, 2006-12-17, 1:47 AM | Сообщение # 5 |
|
Великий Скриптор
Группа: Модераторы
Сообщений: 149
Статус: Offline
| ИД нужных контейнеров узнаем командой ,info и записываем в переменные:
| Code |
var HidesContainer =0x62a55aaf
var LCapsContainer0=0x62a55aa0
var LCapsContainer1=0x62a55aa1
var LCapsContainer2=0x62a55aa2
var LCapsContainer3=0x62a55aa3
var LCapsContainer4=0x62a55aa4
var LCapsContainer5=0x62a55aa5 |
Сообщение отредактировал mont - Пятница, 2007-06-01, 2:56 AM |
| |
| |
| mont | Дата: Пятница, 2008-07-04, 2:48 AM | Сообщение # 6 |
|
Одмин.
Группа: Администраторы
Сообщений: 1051
Статус: Offline
| чето не пашет он(((
|
| |
| |
