Самое интересно, то что месяц назад всё работало нормально. А сейчас он игнорирует ВСы.
Вот весь скрипт. Ах да, чуть не забыл, script made by Cooler.
Code: Select all
##########################################################
### Universal Craft / Универсальный Крафт v1.2 Beta ###
##########################################################
### Внимание:
### Для работы скрипта нужна версия YokoInjection 4DZ.
### Скачать dll этой версии можно
### от сюда: www.swines.nm.ru/injection.zip
##########################################################
############################
### Описание и настройка ###
############################
### Для правильной работы скрипта нужно:
### 1.Поставить галочку в пункет Verbose Menu, в закладке Main.
### 2.Поменять переменные, приведеные инжекте.
### 3.Поменять функцию Craft.
### 4.Поменять массив Source[] и Text[].
###
### Universal Craft работает с: Blacksmitchy, Alchemy, Tailoring, Carpentry, Tinkering, Inscription.
### Все ресурсы, пустые мешки и т.д. берет из одного ящика.
### Защита от бага с физлами, когда ни с того, ни с сего подряд идут только физлы.
### Работает с любой сделанной продукцией, которую нельзя складывать в кучки: даггеры, ожерелья, палки, катаны, удочки и т.д.
### Берёт пусте мешочки, закидывает в другой контейнер и набивает до предела(255 вещей).
### Потом опять берёт пустой мешочек.
### Возможность "регулировать" частоту юзания дополнительного скилла(к примеру Spirit Speak, или же Arms Lore, все что вы пожелаете).
### Отлаженный алгоритм не смогут сбить лаги, WorldSave'ы или же FastLoot(UNSP, здесь я применил уникальное решение, которое ни разу не видел на форуме).
### Скрипт в большинстве случаев ждет событий, а не просто какое-то время(wait(...)), из-за этого увеличивается его надежность.
### Единственный минус скрипта: работает только для прокачки Alchemy и Inscription, так как когда у вас будут эти скиллы ГМы, вся продукция будет лежать в одной куче, а не в разных.
###
##################
### Переменные ###
##################
### var Chest1='0x4017669E' ## - ID сундука в котором лежат ресурсы для крафта и пустые мешки.
### var Chest2='0x4020E803' ## - ID сундука где будут лежать полные мешки, положите в него даггер.
### var TakeResourse=400 ## - Какое количество ресусров берет чар.(Count)
### var SecondarySkill=10000 ## - На какой раз чар будет кушать и юзать Spirit Speak.
### var Tools='0x1034' ## - Тип инструмента, при котором появляется Craft-меню(Для Blacksmitchy не надо).
### var CreatItem='0x0DBF' ## - Тип созданной вещи(удочка, даггер и т.д.).
### var Food='0x097B' ## - Тип еды, кторую чар будет кушать.
### var Bag='0x0E76' ## - Тип мешочков, которые будут использоваться при крафтчении.
### var Craft=3 ## - 1 - Blacksmitchy, 2 - Tailoring, 3 - Carpentry, Tinkering, Alchemy, Inscription.
###
######################
### Меню / Options ###
######################
var Chest1='0x4017669E' ## - ID сундука в котором лежат ресурсы для крафта и пустые мешки.
var Chest2='0x4020E803' ## - ID сундука где будут лежать полные мешки, положите в него даггер.
var TakeResourse=400 ## - Какое количество ресусров берет чар.(Count)
var SecondarySkill=10000 ## - На какой раз чар будет кушать и юзать Spirit Speak.
var CraftTools='0x1034' ## - Тип инструмента, при котором появляется Craft-меню(Для Blacksmitchy не надо).
var CreatItem='0x0DBF' ## - Тип созданной вещи(удочка, даггер и т.д.).
var Food='0x097B' ## - Тип еды, кторую чар будет кушать.
var Bag='0x0E76' ## - Тип мешочков, которые будут использоваться при крафтчении.
var Craft=3 ## - 1 - Blacksmitchy, Alchemy. 2 - Tailoring. 3 - Carpentry, Tinkering, Inscription.
var BagSer, i=0, fizl=0, control=5, time, z
#####################
### Функция Craft ###
#####################
### http://yoko.netroof.net/help/help.php?lang=rus&a=item&item=waitmenu
### прописывайте свой путь, только запомните, только 4 вложения, к примеру
### uo.AutoMenu("","","","") будет работать, а uo.AutoMenu("","","","","","") уже нет.
sub Craft()
uo.AutoMenu("Carpentry","Weapons & Tools")
uo.AutoMenu("Weapons & Tools","fishing pole")## - Меняем на то что чар будет крафтить.
endsub
sub UniversalCraft()
var CountSource=1 ## - Количество разных типов сырья, которые мы возьмем из сундука.
dim Source[2] ## - DIM Source[n] n=CountSource+!.
Source[1]='0x1BDD' ## - Тип каждого сырья.
dim Text[3]
Text[1]='You put the' ## - Возникает при удаче.
Text[2]='You fail to' ## - Возникает при физле.
uo.CancelMenu()
open('backpack')
NewBag()
Craft()
while true
uo.DeleteJournal()
for z=1 to CountSource
if uo.Count(Source[z])<6 then
uo.FindType(Source[z],-1, Chest1)
uo.Grab(STR(TakeResourse),'finditem')
wait(1000)
endif
next
uo.DeleteJournal()
CraftTools()
time=uo.Timer()
repeat
wait(500)
until uo.InJournal(Text[1]) or uo.InJournal(Text[2]) or time+250<uo.Timer()
if uo.InJournal(Text[1]) then
fizl=0
else
fizl=fizl+1
endif
if fizl==control then
wait(8000)
endif
while uo.Count(CreatItem)>0
uo.FindType(CreatItem,-1,-1)
uo.MoveItem('finditem',0,BagSer)
if uo.Count(CreatItem)>0 then
FastLootCheck()
endif
if uo.InJournal("Too many items") then
NewBag()
endif
wend
EatFood()
wend
end sub
sub CraftTools()
if Craft==1 then
uo.UseType(Source[1])
end if
if Craft==2 then
uo.WaitTargetType(0x175D)
uo.UseType(CraftTools)
end if
if Craft==3 then
uo.UseType(CraftTools)
end if
endsub
sub Open(Container)
uo.DeleteJournal()
uo.UseObject(Container)
repeat
wait(500)
until uo.InJournal("Contains")
end sub
sub FastLootCheck()
uo.DeleteJournal()
wait(450)
if uo.InJournal("FastLoot") or uo.InJournal("World is saving now...") then
Uo.Say("wait")
repeat
wait(500)
until uo.InJournal("wait")
endif
end sub
sub NewBag()
open(Chest1)
uo.FindType(Bag, -1, Chest1)
uo.Grab('1','finditem')
wait(1000)
open(Chest2)
BagSer=uo.GetSerial('finditem')
uo.MoveItem(BagSer, 0, Chest2)
wait(1000)
end sub
sub EatFood()
if i==SecondarySkill then
SpiritSpeak()
repeat
uo.UseType(Food)
wait(7500)
until uo.InJournal("simply too full")
i=0
else
i=i+1
endif
end sub
sub SpiritSpeak()
uo.UseSkill('Spirit Speak')
wait(2500)
end sub
