Page 1 of 1
Tailoring(поправка)
Posted: 2007-04-22 13:09:39
by Squoll
Народ помогите исправить скрипт чтоб он брал из сундука ткань а потом готовую продукцию скалдывал в другой сундук...вот скрипт
Code: Select all
var Cont='0x09b0' ##ID ñóíäóêà ñ òêàíüþ, òàê æå òóäà áóäóò ñêëàäûâàòñÿ áèíòû
var Creat='0x1515' ##Òèï òîãî, ÷òî ñøèëè
sub Tailoring()
#¤Leo¤#
while NOT UO.Dead()
ToHide()
UO.FindType('0x1515','0x0000',Cont)
wait(1000)
UO.Grab('600','finditem')
wait(1000)
endif
CheckLag()
UO.WaitMenu('Cloth','Shirts','Shirts','cloak')
UO.WaitTargetType('0x175D')
UO.UseType('0x0F9D')
UO.DeleteJournal()
wait(1000)
repeat
wait(100)
until UO.InJournal('fail') or UO.InJournal('put')
UO.DeleteJournal()
wait(500)
UO.WaitTargetType(Creat)
CheckLag()
wait(500)
wend
endsub
Sub ToHide()
while NOT UO.Hidden()
UO.DeleteJournal()
UO.Exec('warmode 0')
UO.UseSkill('Stealth')
repeat
wait(50)
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied')
wend
end sub
Sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
Posted: 2007-04-22 14:01:52
by Rivory
что у тебя в переменной creat ?
Posted: 2007-04-22 22:00:52
by Squoll
В переменной стоит код той веши которая создаётся то есть cloak
Posted: 2007-04-23 19:38:20
by Squoll
Кто нибудь помочь может?
Posted: 2007-04-23 20:53:35
by Rivory
короче в начало скрипта пропиши
Code: Select all
var cont2='0x0000' #Тип контейнера с готовыми плащами
а потом куданить после слов
Вставь такие строчки
Code: Select all
if UO.Weight>300 then
while uo.count('0x0000') > 0 #Сюда влепи тип плащиков
uo.findtype('0x0000',-1,'backpack') #и сюда
uo.moveitem('finditem',-1,'cont2')
wait(200)
wend
end if
Posted: 2007-04-24 07:15:45
by Squoll
Спасибо а какой код надо написать чтоб он ещё и брал ткань когда она кончается?
Posted: 2007-04-24 16:05:14
by Squoll
Вот я сделал
Code: Select all
var Cont='0x09b0' ##ID сундука с тканью, так же туда будут складыватся бинты
var Creat='0x1515' ##Тип того, что сшили
VAR CT='0x175d' ; Тип Cloth
VAR Sunduk='0x09b0' ; Сериал(ID) Сундука.
VAR Kolvo=3500 ; Количество регов, которое чар берёт из сундука..
sub Tailoring()
#¤Leo¤#
while NOT UO.Dead()
ToHide()
UO.FindType('0x1515','0x0000',Cont)
wait(1000)
While UO.CT>0
UO.Grab('600','finditem')
wait(1000)
endif
CheckLag()
UO.WaitMenu('Cloth','Shirts','Shirts','cloak')
UO.WaitTargetType('0x175D')
UO.UseType('0x0F9D')
UO.DeleteJournal()
wait(1000)
repeat
wait(100)
until UO.InJournal('fail') or UO.InJournal('put')
UO.DeleteJournal()
wait(500)
UO.WaitTargetType(Creat)
CheckLag()
wait(500)
wend
If UO.CT == 15 Then
UO.FindType(CT, '-1', Sunduk)
UO.Grab(str(Kolvo), 'finditem')
repeat
wait(100)
until UO.CT>15
Endif
Wend
endsub
Sub ToHide()
while NOT UO.Hidden()
UO.DeleteJournal()
UO.Exec('warmode 0')
UO.UseSkill('Stealth')
repeat
wait(50)
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied')
wend
end sub
Sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
Но он почему то выдаёт ошибку типа непонимает что такое UO.CT помагите исправить
Posted: 2007-04-24 18:14:12
by Rivory
конечно он не знает что такое uo.CT.. используй просто CT
Posted: 2007-04-24 18:27:34
by Squoll
Поменял ошибку невыдаёт, но он почему то когда кончается материал нехочет брать его из сумки которую я указал
Posted: 2007-04-24 19:29:50
by Rivory
Code: Select all
While CT>0
UO.Grab('600','finditem')
wait(1000)
endif
замени на
Code: Select all
While CT>0
UO.Grab('600','finditem')
wait(1000)
wend
Posted: 2007-04-24 20:52:01
by Squoll
Заменил, но он всё равно почему то нехочет брать из сумки ткань
Posted: 2007-04-25 05:51:18
by Ururu
Code: Select all
If UO.Count (CT, '0', '2') < 15 Then
UO.FindType( CT, '-1', Sunduk)
If UO.FindCount() > 599 Then
UO.MoveItem( 'finditem', '600' )
wait( 1000 )
Else
UO.Print( 'Неудачнечег, ткани нед!!!' )
Endif
Endif
Posted: 2007-04-25 06:35:21
by Squoll
ururu спасибо, но я недогоняю куда это нада вставить можешь дать полный код а то я вставил наверх и нифига неидёт=(
Posted: 2007-04-25 07:23:56
by Ururu
Я поправил только кусок скрипта отвечающий за добор ткани. Если будут где ошибки, пиши. Посмотрю весь скрипт.
Code: Select all
var Cont='0x09b0' ##ID сундука с тканью, так же туда будут складыватся бинты
var Creat='0x1515' ##Тип того, что сшили
VAR CT='0x175d' ; Тип Cloth
VAR Sunduk='0x09b0' ; Сериал(ID) Сундука.
VAR Kolvo=3500 ; Количество регов, которое чар берёт из сундука..
sub Tailoring()
#¤Leo¤#
while NOT UO.Dead()
ToHide()
UO.FindType('0x1515','0x0000',Cont)
wait(1000)
While UO.CT>0
UO.Grab('600','finditem')
wait(1000)
endif
CheckLag()
UO.WaitMenu('Cloth','Shirts','Shirts','cloak')
UO.WaitTargetType('0x175D')
UO.UseType('0x0F9D')
UO.DeleteJournal()
wait(1000)
repeat
wait(100)
until UO.InJournal('fail') or UO.InJournal('put')
UO.DeleteJournal()
wait(500)
UO.WaitTargetType(Creat)
CheckLag()
wait(500)
wend
If UO.Count (CT, '0', '2') < 15 Then
UO.FindType( CT, '-1', Sunduk)
If UO.FindCount() > 599 Then
UO.MoveItem( 'finditem', '600' )
wait( 1000 )
Else
UO.Print( 'Неудачнечег, ткани нед!!!' )
Endif
Endif
Wend
endsub
Sub ToHide()
while NOT UO.Hidden()
UO.DeleteJournal()
UO.Exec('warmode 0')
UO.UseSkill('Stealth')
repeat
wait(50)
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied')
wend
end sub
Sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
Posted: 2007-04-26 00:31:52
by Squoll
Ошибка заключается в том, что он почему то сразу начинает деалть вещи то есть нету проверки никакой и неберёт ничего из сумки где ткань=(
Posted: 2007-04-26 02:20:30
by Ururu
Тот кто писал скриптвероятно брал все сам в пак =)
У тебя на шарде только ткань нужна или нитки тоже?
Posted: 2007-04-26 11:25:44
by Squoll
у меня на шарде только ткань и sewing kit=)я в доме положил ткань в bench ну вот и он почему то нехочет брать=(если что играю на Santiago
www.projectblackrock.com.Уже неделю мучаюсь пытаюсь создать из двух скриптов один да неполучается всё делает только если ткань в бэке а с сумки брать нехочет поидее можно просто с пола но я незнаю как это написать так как полный 0=(Поможете буду очень благодарен=)