Yoko

Bambr

Ситуёвина: ищу скролы через UO.FindType(как положено)
потом на UO.Print(STR(UO.FindCount())) ответ правильный "1", но
следующий UO.Print(STR(UO.GetQuantity('finditem'))) выдает "0", хотя стопка-то существует.
Как узнать количество итемов?

ЗЫ: При запросе на стопку ,info количество есть
ЗЗЫ: В ...

Bambr

Может тогда подскажете как програмно клавишу нажать, на которую эта команда у меня прибиндена? Знаю что есть UO.Press(code), у меня она прибиндена на CTRL+F1, как узнать код?

При редактировании скрипта есть меню (сверху). Называется "Key code". Ставишь курсор, нажимаешь комбинацию клавиш (в твоём ...

Bambr

Sfagnum wrote: я конешно могу обшибаться но ИМХО там должно быть не or, a and...

дык я постоянно ошибаюсь с этими whil-ами и until-ами

канечна AND, ведь как там у автора:

WHILE условие
команды
WEND

- цикл. Выполняется, пока условие истинно.

Bambr

:( :( :( :( :( :( :( :( :( :( :( :( :( :( :( :( :( :(
а есть ли возможность добавить в next версии функцию получения координат из карты потому что вытаскивать координаты ето мортышкин труд особенно когда надо расортировать 500 - 800 карт?
:shock:

мортышка уже потрудилась малость. один из первых ...

Bambr

INVINSIBLE wrote:Помогите пожалуйсто ! Собсна че мне нада знать ! Скрипт на лумбер - как в нем остановить маркировку деревьев ????

,terminate all

Bambr

repeat
UO.DeleteJournal()
UO.UseSkill("Hiding")
while not UO.InJournal("discovered") or UO.InJournal("can`t")
wait (1000)
wend
goto loop
Until 1>2
end sub
Как бы получается что он or не понимает и по журналу не проверят что физл+(

попробуй так:

while not UO.InJournal("discovered") or ...

Bambr

sub main()
repeat
if uo.count(0x19b9)<1 then
uo.useobject(0x0e86)
wait(10000)
uo.waittargettile(1342 1232 1251 0)
endif
wait(10000)
until uo.GetQuantity(0x19b9)==10 or uo.count(0x0e86)==0

end sub

1342 1232 1251 0-вот я указал инвормацию о тайле и мне пишет что ошибка в 6 строке ! как ...

Bambr

по поводу проблемы с менюшкой на бронзу и дулл купер...
можно сделать следущим образом:
UO.MSG("Try make the "+WCurIng+" "+Part[i])
UO.AutoMenu('Blacksmithing','Colored')
if CCurIng = CIng[2] or CCurIng = CIng[3] then
UO.AutoMenu('Colored',WCurIng+' Plate Armor')
UO.AutoMenu(WCurIng+' Armor ...

Bambr

Repeat
jser=0
.....
If UO.InJournal("put") Then
jser=1
EndIf
Until jser == 1

Видел у кого-то подобную обработку, но воспроизвести не смог :cry: а что не так: Repeat
.....
Until UO.InJournal("put")

проблема в другом: перед Until есть ещё проверка журнала

While NOT UO.InJournal("put") AND ...

Bambr

Исправлен баг с журналом.

заменено

Repeat
.....
jser=UO.JournalSerial(UO.InJournal("put"))
Until NOT UO.Journal(ser)=="put"

на

Repeat
jser=0
.....
If UO.InJournal("put") Then
jser=1
EndIf
Until jser == 1

Видел у кого-то подобную обработку, но воспроизвести не смог :cry:

Bambr

что не так так и не обиаснили... хых, буду ждать еще ответов)

Подробности: Посчитай пальчиком скока у тебя Loot[] после описания массива. Loot[0] - 1, Loot[1] -2 .... Loot[56] - 57. А ты задаёшь значение массива 56 ....

Далее UO.FindItem() имеент ТРИ параметра, т.е. надо писать UO.FindType(Loot ...

Bambr

Круто... не пробывал, но впечатляет...
есть одно преложение...
дело в том что бывает толпа физлов подряд на одном айтоме, надо сменить айтем и вероятность успеха заметно увеличивается...
у тебя пытается делать айтем до посинения... может имеет после физла переходить к следующему айтему?
в моём ...

Bambr

sub MakeFull()
VAR CCurIng='0x0000', TCurIng=0
VAR jser, WCurIng=0, Kolvo = 200 ; На фулл с запасом
VAR Sunduk = '0x4024386F' ; Cундук с инготами
VAR Meshok = '0x0E76' ; Тип мешка для фулов
VAR CIngots = '0x0000' ; Цвет инготов
VAR CurMesh, BagForFull='0x4014B1CF' ; Сериал мешка и сумки для ...

Bambr

Defjammer wrote:
Code: Select all
sub autoloot()
VAR WaitTime=700
VAR i
DIM Loot[56]
......
скрипт на автолут, не делает того что положено... даже немогу обиаснить в чем ето выражаетсо, плс потестите и обиасните что не так((

массив задан не верно. надо DIM Loot[57]
дальше не смотрел

Bambr

Проблемка вот какая в скрипт всё что нужно подставил...
Однако пишет мне он вот что:You can't see the target. Но если после запуска скрипта тыкнуть два раза на плавилку, он переплавляет один даггер.

sub Smelt()
UO.FindType('0x0f51','-1',2)
UO.WaitTargetObject('finditem')
UO.UseObject(0x0fb1 ...

Bambr

Debian wrote:Скрипт на бс написал... а вот чоб он плавил сразу же то чо я сковал-никак. Помогите, напишите простенький скрипт на переплавку даггеров например.

Code: Select all

UO.FindType('тип даггера','цвет даггера',-1)
UO.WaitTargetObject('finditem')
UO.UseObject('сериал форжи')

простенький. схема понятна?

Bambr

AGRS wrote:http://yoko.netroof.net/help/help.php?lang=rus&a=item&item=choice

Читал? По моему все достаточно доступно написано.

Пасиб. Не заметил.

Bambr

Так вся руда имеет одинаковый тип !!!
Type=0x19B9
Как тогда указать какая руда какая .... ??? И если можно то скажи где это вставить в скрипт который по этой сылке :
http://yoko.netroof.net/forum/viewtopic.php?t=1195/ он имел ввиду цвет

Верно. Спасибо за поправку.

Тогда меняешь UO.FindType(-1 ...

Bambr

Всё хорошо ...... кроме одного ........... чар при выкапованье айрона не скидывает его под себя ! А просто идёт дальше !!! Как зделать чтобы не нужную руду он кидал под себя !?

Прописываешь массив руд для сброса

DIM DropOre[n]

DropOre[0] = 'тип'
DropOre[1] = 'тип'
...
DropOre[n] = 'тип ...

Bambr

В хелпе написано, что команда automenu "... В случае если сервер пошлёт подходящее к prompt меню, Injection сделает выбор choice и будет продолжать ожидать список выборов ..."
Можно ли в параметре choice указывать не текстовые данные, а порядковые номера? Отсюда второй вопрос: каким образом ...

Yoko

Search found 38 matches

RunUO: количество итемов в стопке

Re: Хелп со скриптомот ВЕТЕР

Частный случай БС для DRW: делаем фуллы

Re: Помогите допесать скрыпт)

Re: Подскажите насчет переплавки.

Вопрос: automenu, prompt, choice