Yoko

All sides of Injection
It is currently 2025-12-20 01:40:54

All times are UTC+02:00




Post new topic  Reply to topic  [ 10 posts ] 
Author Message
PostPosted: 2006-10-20 20:59:11 
Offline
User avatar

Joined: 2005-01-14 13:41:05
Posts: 73
Location: Одесса - мама
вот нашел на сайте скрипт на тинкеринг, но взял его только за основу, переделал уже кординально.
вот что мне нужно сделать:
1. чар берет с пола сундук
2. чар проверяет кол-во железа в паке, если мало то берет
3. тоже самое что и пункт2 , только с болтами.
4. чар запускает ловушку в сундук
5. чар дропает сундук на пол и оорет фразу ( чтобы вор после обработкиэтой фразы в журнале обезвредил её , и тоже крикнул фразу )
6. после того как вор крикнул фразу, цикл возобновляется...

выдается ошибка в скрипте
Attempt to jump inside for/while/repeat
я так понял это из за криво поставленого goto...
знаю что скрипт дырявый... я не проффесионал.. помогите

:)
Code:
sub tinker() 
VAR Ingi = '0x1BF2' ; Òèï èíãîâ
VAR Instrum = '0x1EBC' ; Òèï èíñòðóìåíòà òèíêåðà
VAR Bottle = '0x0E43' ; Òèï áóòûëêè
VAR BOLT = '0x1BFB'
VAR k = 0
UO.exec('set distance 2')
UO.exec('set finddistance 2')
UO.Set('norbcheck','1')
UO.Set('norbcalc','1')
While TRUE
haha:
uo.grab('1' , '0x67ECF589')
UO.FindType(Ingi, -1, 'backpack')
wait(300)
If UO.FindCount() < 100 Then
UO.FindType(Ingi, -1, 'ground')
UO.Grab('100','finditem')
wait( 1000 )
end if
UO.FindType(BOLT, -1, 'backpack')
If UO.FindCount() < 100 Then
UO.FindType(BOLT, -1, 'ground')
UO.Grab('100','finditem')
wait( 2000 )
end if

UO.Exec("usetype 0x1EB9")
UO.Recall('self','4402')
uo.exec("waittargettype 0x1BF2")
wait(500)
   UO.WaitTargetType('0x0E43')
   While UO.Waiting()
         Wait(50)
   WEnd
   wait(500)
UO.FindType( Bottle, -1, -1 )
UO.drophere('finditem')
wait( 1000 )
UO.msg( 'Yeah' )
repeat
wait(1500)
k = k + 1
until uo.InJournal("Vasya")
goto haha
end if
Wend
Wend
end sub


Top
   
 Post subject:
PostPosted: 2006-10-20 21:05:33 
Offline
User avatar

Joined: 2006-08-05 14:09:06
Posts: 270
Че за гон??
Что этим скриптом качается и скольки чарам??

_________________
ДРВ
Spoiler
_________________
Антарес
Spoiler|Gostrabaiter|Umhra|Slog


Top
   
 Post subject:
PostPosted: 2006-10-20 21:48:35 
Offline
User avatar

Joined: 2005-01-14 13:41:05
Posts: 73
Location: Одесса - мама
slonopotam wrote:
Че за гон??
Что этим скриптом качается и скольки чарам??

делается ловушка с болтом.
тинкеринг качается до 150 (я на ПОЛЕ 095 играю )
и вобще не флуди, я попросил помочь а не задавать вопросы.


Top
   
 Post subject:
PostPosted: 2006-10-20 22:00:43 
Offline
User avatar

Joined: 2006-08-05 14:09:06
Posts: 270
Я не играл на шарде с ловушками :D


Что это?
Code:
haha:
...
...
goto haha

_________________
ДРВ

Spoiler

_________________

Антарес

Spoiler|Gostrabaiter|Umhra|Slog


Top
   
 Post subject:
PostPosted: 2006-10-20 22:14:43 
Offline
User avatar

Joined: 2005-01-14 13:41:05
Posts: 73
Location: Одесса - мама
slonopotam wrote:
Я не играл на шарде с ловушками :D


Что это?
Code:
haha:
...
...
goto haha

сам не знаю! я просто не знаю как в конце скрипта вернуться в начало... то есть из точки гото хаха вернуться в хаха; :roll:


Top
   
 Post subject:
PostPosted: 2006-10-20 22:54:28 
Offline
User avatar

Joined: 2006-08-05 14:09:06
Posts: 270
Code:
If ....... Then
......
Else
.....
Endif


Еще как вариант, кусок скрипта с крафтом вынести в отдельный скрипт.

_________________
ДРВ

Spoiler

_________________

Антарес

Spoiler|Gostrabaiter|Umhra|Slog


Top
   
 Post subject:
PostPosted: 2006-10-21 04:36:35 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Ошибка в том, что ты выходишь из цикла безусловным переходом:
Code:
goto "метка".


Это не есть правильно,- либо зацикли чтобы такого не было, либо после выполнения цикла выходи.

slonopotam -что за чушь ты несёшь? Уж лучше молчи чем и вовсе что-то говори. Какая тебе разница что этим скриптом качается и уж тем более- спрашивать у автора-что такое готу ... ?!


Top
   
 Post subject:
PostPosted: 2006-10-21 10:09:12 
Offline
User avatar

Joined: 2005-01-14 13:41:05
Posts: 73
Location: Одесса - мама
You Must Die wrote:
Ошибка в том, что ты выходишь из цикла безусловным переходом:
Code:
goto "метка".


Это не есть правильно,- либо зацикли чтобы такого не было, либо после выполнения цикла выходи.

slonopotam -что за чушь ты несёшь? Уж лучше молчи чем и вовсе что-то говори. Какая тебе разница что этим скриптом качается и уж тем более- спрашивать у автора-что такое готу ... ?!

как выйти после выполнения цикла? :) уж не end sub ли?


Top
   
 Post subject:
PostPosted: 2006-10-21 15:56:19 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Само слово цикл.

Что такое цикл? Выполнение операции, пока не будет выполнено условие. (примерно)
Исходи из этого:
Чтобы зделать постоянный цикл-надо задать не выполнимое условие:
Code:
while 1; while not uo.Dead(); ... 

к примеру. пока не умер конечно выполнимое условие, но если ты на крафте в безопастном месте-то сойдёт.

Проблема в том, что ты выходишь из цикла. зачем? Ты как я понял возвращаешься назад как только скрипт зделает все действия- зачем? Разумнее будет зделать так, чтобы завершался один цикл твоих действий-проверялось условие какое то и выполнив его-ты выходил из внутреннего цикла. А внешний цикл зделать не выполнимым-так ты будешь по кругу делать одно и тоже действие. Например:

Code:
while not uo.Dead()
  uo.DeleteJOurnal()
  while not uo.InJournal(msg) and not uo.InJournal(msg2)
    ...
  wend
  # Здесь проверяем -выполнилось ли условие : Умер. Если нет, тогда автоматом возвращаемся в самое начало и входим во внутренний цикл, который проверяет наличие сообщений.
wend


Грубый пример, но думаю он понятен.
Можно зделать без внутреннего цикла:

Code:
while not uo.Dead()
  # Твои действия
wend


Вот здесь скрипт будет делать построчно все твои действия, и как выполнит и ты не будешь мертв-вернется к первому и начнёт повторение, пока не выполнится условие : You are dead.


Top
   
 Post subject:
PostPosted: 2006-10-22 15:48:27 
Offline
User avatar

Joined: 2005-01-14 13:41:05
Posts: 73
Location: Одесса - мама
You Must Die wrote:
Само слово цикл.

Что такое цикл? Выполнение операции, пока не будет выполнено условие. (примерно)
Исходи из этого:
Чтобы зделать постоянный цикл-надо задать не выполнимое условие:
Code:
while 1; while not uo.Dead(); ... 

к примеру. пока не умер конечно выполнимое условие, но если ты на крафте в безопастном месте-то сойдёт.

Проблема в том, что ты выходишь из цикла. зачем? Ты как я понял возвращаешься назад как только скрипт зделает все действия- зачем? Разумнее будет зделать так, чтобы завершался один цикл твоих действий-проверялось условие какое то и выполнив его-ты выходил из внутреннего цикла. А внешний цикл зделать не выполнимым-так ты будешь по кругу делать одно и тоже действие. Например:

Code:
while not uo.Dead()
  uo.DeleteJOurnal()
  while not uo.InJournal(msg) and not uo.InJournal(msg2)
    ...
  wend
  # Здесь проверяем -выполнилось ли условие : Умер. Если нет, тогда автоматом возвращаемся в самое начало и входим во внутренний цикл, который проверяет наличие сообщений.
wend


Грубый пример, но думаю он понятен.
Можно зделать без внутреннего цикла:

Code:
while not uo.Dead()
  # Твои действия
wend


Вот здесь скрипт будет делать построчно все твои действия, и как выполнит и ты не будешь мертв-вернется к первому и начнёт повторение, пока не выполнится условие : You are dead.

спасибо :) блин так долго мучался ради друга, и он послевсего нашел подобие этого скрипта на Стелс ))


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 10 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: Bing [Bot] and 7 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