Yoko

All sides of Injection
It is currently 2025-12-09 23:02:39

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 17 posts ] 
  Print view Previous topic | Next topic 
Author Message
valerka
PostPosted: 2005-01-12 00:19:53 
Offline

Joined: 2004-10-25 16:31:52
Posts: 15
1-Крашит :)
Абсолютно при разных ситуациях, при касте, скупке, открытии сумки (просто 2-ым щелчком) и т. д. Причём крашит так что у меня выбивает все!! приложения, и по 2-му разу большая часть (в том числе клиент) не запускаются, приходится делать рестаот. ОС Вин 98СЕ.
2-Как сказать ,фраза ? =)
3-Есть ли у кого нибудь скрипт который перемещает в бэк все итэмы одного типа(ящики например) лежащие на расстоянии 1-ой клетки.
Если жалко, то скажите реально ли вообще такой написать.
Заранее благодарен.
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2005-01-12 00:22:32 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
1. Мало мозгов, на закладке display поотключай Icons, Bars, Colored
2. ,sayu фраза
3. Поиск на форуме используй. Таких скриптов здесь бегало море. Ищи по слову "ветки"
Top
   
Reply with quote  
valerka
 Post subject:
PostPosted: 2005-01-13 15:32:02 
Offline

Joined: 2004-10-25 16:31:52
Posts: 15
Все значки отключены, я хелп читаю.
нашёл скрипт, но не пашет :(
Помогите, почему не пашет?


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
Top
   
Reply with quote  
bewza
 Post subject:
PostPosted: 2005-01-13 15:53:32 
Offline
Junior Expert
User avatar

Joined: 2004-04-10 11:37:18
Posts: 30
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[i],-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:
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


Last edited by bewza on 2005-01-14 01:33:38, edited 1 time in total.

Top
   
Reply with quote  
valerka
 Post subject:
PostPosted: 2005-01-13 16:12:04 
Offline

Joined: 2004-10-25 16:31:52
Posts: 15
Тоже не пашет :(
Он что-то пытается взять но не берёт :(
А первый скрипт который я выше написал ГП лутил, а сундуки нет :(
непонимаю в чём дело
Top
   
Reply with quote  
bewza
 Post subject:
PostPosted: 2005-01-13 18:21:35 
Offline
Junior Expert
User avatar

Joined: 2004-04-10 11:37:18
Posts: 30
set finddistance
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2005-01-13 19:42:33 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
bewza wrote:
Code:
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 надо без кавычек писать. Ну и для тестов я бы увеличил паузу, потом можно и снизить, если все ок.
Top
   
Reply with quote  
bewza
 Post subject:
PostPosted: 2005-01-14 01:37:35 
Offline
Junior Expert
User avatar

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

1. Исправил
2. Не "надо", а "можно", лично я всегда в ковычках писал. Никаких глюков.
3. Пауза, хм, ну вообще можно еще много проверок добавить, но суть то не в этом :)
Top
   
Reply with quote  
Yoko
 Post subject:
PostPosted: 2005-01-14 02:41:31 
Offline
Site Admin
User avatar

Joined: 2004-04-03 16:49:38
Posts: 1964
Edred wrote:
А вот в командах UO.Findtype -1 надо без кавычек писать.

Сиё есть мерзкая ересь, работоспособность в этом случае оно сохраняет только благодаря случайному совпадению. В последних версиях правда это перестало иметь значение в связи со сменой куска модуля автопреобразования.
Top
   
Reply with quote  
valerka
 Post subject:
PostPosted: 2005-01-15 12:08:46 
Offline

Joined: 2004-10-25 16:31:52
Posts: 15
Всё равно не фига не пашет :(
он циклиться неизвестно почему, и ктомуже просит щёлкнуть на предмет который надо взять.
Скажите мне плз, почему мой первый не берёт коробки? Гп то он берёт...
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2005-01-15 12:22:33 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
valerka wrote:
Всё равно не фига не пашет :(
он циклиться неизвестно почему, и ктомуже просит щёлкнуть на предмет который надо взять.
Скажите мне плз, почему мой первый не берёт коробки? Гп то он берёт...


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

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

2. У тебя скрипт и массив имеют одинаковые имена. Счас уже плохо помню, но кажись, когда-то у меня такие вещи вызывали траблы в скриптах. Потому давно уже использую только уникальные имена.
Top
   
Reply with quote  
valerka
 Post subject:
PostPosted: 2005-01-19 17:33:56 
Offline

Joined: 2004-10-25 16:31:52
Posts: 15
Всё равно не пашет, мой скрипт не берёт, а второй просто вешает инжу.
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2005-01-19 17:40:07 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
приведи структуру скрипта в порядок (сделай иерархию циклов табуляцией) и через код запости сюда весь скрипт
Top
   
Reply with quote  
valerka
 Post subject:
PostPosted: 2005-01-19 17:43:12 
Offline

Joined: 2004-10-25 16:31:52
Posts: 15
Code:
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


Last edited by valerka on 2005-01-19 18:34:22, edited 1 time in total.

Top
   
Reply with quote  
Yoko
 Post subject:
PostPosted: 2005-01-19 18:18:46 
Offline
Site Admin
User avatar

Joined: 2004-04-03 16:49:38
Posts: 1964
и, как мы видим, обычная опечатка в районе оператора Grab
Top
   
Reply with quote  
valerka
 Post subject:
PostPosted: 2005-01-19 18:35:11 
Offline

Joined: 2004-10-25 16:31:52
Posts: 15
Я случайно не тот скрипт скопировал :)
я поправил на один пост выше.
скрипт ьерёт гп например, а сундуки не берёт.
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2005-01-19 20:13:49 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
1. UO.FindType(Loot[i],-1,'ground')

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

UO.FindType(Loot[i],'-1','ground')


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

замени на

if UO.FindCount() then
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 17 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 3 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited