Несколько проблем/вопросов.

valerka · Post by **valerka** » 2005-01-12 00:19:53

1-Крашит

Абсолютно при разных ситуациях, при касте, скупке, открытии сумки (просто 2-ым щелчком) и т. д. Причём крашит так что у меня выбивает все!! приложения, и по 2-му разу большая часть (в том числе клиент) не запускаются, приходится делать рестаот. ОС Вин 98СЕ.
2-Как сказать ,фраза ? =)
3-Есть ли у кого нибудь скрипт который перемещает в бэк все итэмы одного типа(ящики например) лежащие на расстоянии 1-ой клетки.
Если жалко, то скажите реально ли вообще такой написать.
Заранее благодарен.

Edred · Post by **Edred** » 2005-01-12 00:22:32

1. Мало мозгов, на закладке display поотключай Icons, Bars, Colored
2. ,sayu фраза
3. Поиск на форуме используй. Таких скриптов здесь бегало море. Ищи по слову "ветки"

valerka · Post by **valerka** » 2005-01-13 15:32:02

Все значки отключены, я хелп читаю.
нашёл скрипт, но не пашет

Помогите, почему не пашет?

sub Loot()
VAR WaitTime=500
VAR Exit=0, i
DIM Loot[2]

Loot[0]=0x09AA ; sunduchek
Loot[1]=0x0E7D ; sunduchek

For i=0 to 1
UO.FindType(Loot,-1,'ground')
if UO.GetQuantity('finditem') then
UO.Grab(STR(0),'finditem')
wait(WaitTime)
endif
Next
end sub

bewza · Post by **bewza** » 2005-01-13 15:53:32

valerka wrote: sub Loot()
VAR WaitTime=500
VAR Exit=0, i
DIM Loot[2]
Loot[0]=0x09AA ; sunduchek
Loot[1]=0x0E7D ; sunduchek
For i=0 to 1
UO.FindType(Loot,-1,'ground')
if UO.GetQuantity('finditem') then
UO.Grab(STR(0),'finditem')
wait(WaitTime)
endif
Next
end sub

Этот скрипт сграбит только 1 итем типа 0x09AA и 1 итем типа 0x0E7D
Советую взять их в кавычки. Не нравится мне UO.GetQuantity('finditem'), не лезет оно тут, лучше уж UO.findcount(). Думаю должно быть что-то вроде этого

Code: Select all

sub Loot() 
DIM Loot[2] 
Loot[0]='0x09AA' ; sunduchek
Loot[1]='0x0E7D' ; sunduchek
For var i=0 to 1 
UO.FindType(Loot[i],'-1','ground') 
while UO.findcount() >0
UO.Grab('finditem') 
wait('500') 
UO.FindType(Loot[i],'-1','ground')
wend
Next 
end sub

valerka · Post by **valerka** » 2005-01-13 16:12:04

Тоже не пашет

Он что-то пытается взять но не берёт

А первый скрипт который я выше написал ГП лутил, а сундуки нет

непонимаю в чём дело

bewza · Post by **bewza** » 2005-01-13 18:21:35

set finddistance

Edred · Post by **Edred** » 2005-01-13 19:42:33

bewza wrote:

Code: Select all

sub Loot() 
DIM Loot[2] 
Loot[0]='0x09AA' ; sunduchek
Loot[1]='0x0E7D' ; sunduchek
For var i=0 to 1 
UO.FindType(Loot[i],'-1','ground') 
while UO.findcount() >0
UO.Grab,'finditem') 
wait('500') 
UO.FindType(Loot[i],'-1','ground')
wend
Next 
end sub

Я понимаю, на коленке писал, но все-таки скобки пропускать не надо... В команде UO.Grab вместо запятой скобку поставить. А вот в командах UO.Findtype -1 надо без кавычек писать. Ну и для тестов я бы увеличил паузу, потом можно и снизить, если все ок.

bewza · Post by **bewza** » 2005-01-14 01:37:35

Edred wrote:Я понимаю, на коленке писал, но все-таки скобки пропускать не надо... В команде UO.Grab вместо запятой скобку поставить. А вот в командах UO.Findtype -1 надо без кавычек писать. Ну и для тестов я бы увеличил паузу, потом можно и снизить, если все ок.

1. Исправил
2. Не "надо", а "можно", лично я всегда в ковычках писал. Никаких глюков.
3. Пауза, хм, ну вообще можно еще много проверок добавить, но суть то не в этом

Post by **Yoko** » 2005-01-14 02:41:31

Edred wrote:А вот в командах UO.Findtype -1 надо без кавычек писать.

Сиё есть мерзкая ересь, работоспособность в этом случае оно сохраняет только благодаря случайному совпадению. В последних версиях правда это перестало иметь значение в связи со сменой куска модуля автопреобразования.

valerka · Post by **valerka** » 2005-01-15 12:08:46

Всё равно не фига не пашет

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

Edred · Post by **Edred** » 2005-01-15 12:22:33

valerka wrote:Всё равно не фига не пашет
он циклиться неизвестно почему, и ктомуже просит щёлкнуть на предмет который надо взять.
Скажите мне плз, почему мой первый не берёт коробки? Гп то он берёт...

Еще проблемы могут быть:

1. Не установлено finddistance. Не установлено distance
набери в клиенте:
,set finddistance 3
,set distance 3

2. У тебя скрипт и массив имеют одинаковые имена. Счас уже плохо помню, но кажись, когда-то у меня такие вещи вызывали траблы в скриптах. Потому давно уже использую только уникальные имена.

valerka · Post by **valerka** » 2005-01-19 17:33:56

Всё равно не пашет, мой скрипт не берёт, а второй просто вешает инжу.

Edred · Post by **Edred** » 2005-01-19 17:40:07

приведи структуру скрипта в порядок (сделай иерархию циклов табуляцией) и через код запости сюда весь скрипт

valerka · Post by **valerka** » 2005-01-19 17:43:12

Code: Select all

sub Loot() 
VAR WaitTime=500 
VAR Exit=0, i 
DIM Loot[2] 

Loot[0]=0x09AA ; sunduchek 
Loot[1]=0x0E7D ; sunduchek 

For i=0 to 1 
     UO.FindType(Loot[i],-1,'ground') 
     if UO.GetQuantity('finditem') then 
        UO.Grab(STR(0),'finditem') 
        wait(WaitTime) 
     endif 
Next 
end sub

Post by **Yoko** » 2005-01-19 18:18:46

и, как мы видим, обычная опечатка в районе оператора Grab

valerka · Post by **valerka** » 2005-01-19 18:35:11

Я случайно не тот скрипт скопировал

я поправил на один пост выше.
скрипт ьерёт гп например, а сундуки не берёт.

Edred · Post by **Edred** » 2005-01-19 20:13:49

1. UO.FindType(Loot,-1,'ground')

-1 поставь в кавычки:

UO.FindType(Loot,'-1','ground')

2. if UO.GetQuantity('finditem') then

замени на

if UO.FindCount() then