Yoko

All sides of Injection
It is currently 2026-01-25 13:26:34

All times are UTC+02:00




Post new topic  Reply to topic  [ 9 posts ] 
Author Message
PostPosted: 2006-10-20 18:46:39 
Offline
User avatar

Joined: 2006-08-05 14:09:06
Posts: 270
1) Почему нельзя вместо некоторых пауз, например при открывании банка, постоянно использовать чек лаг? Просто в скрипте это часто используется, а в уроках написано что этого делать нестоит.

2) Я видел несколько версий чеклга. Можете посоветовать наиболее стабильную?

3) расскажите пожалуйста о ниже приведенном, что это, когда используется и для каких целей?


Code:

...
...
...
ReconnectTime = MakeTime()
...
...
...
sub MakeTime()
var d,t,ret,i
ret=str(uo.Time())
t=""
for i=0 to Len(ret)
t=ret[Len(ret)-i]+t
if (i==2) or (i==4) then
t=":"+t
end if
next
ret=str(uo.Date())
d=""
for i=0 to Len(ret)
d=ret[Len(ret)-i] + d
if (i==2) or (i==4) then
d="."+d
end if
next
ret=t+" @ "+d
return ret
end sub


4) Что еще есть кроме чеклага и MakeTime, что можно использовать во благо? Например "делит алл процес" и т.д.

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


Top
   
 Post subject:
PostPosted: 2006-10-20 19:09:35 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
1) Используй ради бога, однако моё мнение, это возможно будет добавлять некоторые лаги- но точно сказать не могу.
2) Они все одинаковые. Клик по журналу, проверка пока появится сообщение
3) Если не ошибаюсь, эта функция работает вместе с реконектом для удобства( так решил программист который написал реконектор )-она вроде составляет время и дату когда был дисконект(или наоборот приконектились)
4) Всё что хочешь, на твоё усмотрение. Каждому своё.


Top
   
 Post subject:
PostPosted: 2006-10-20 19:43:15 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Чеклаг лучше использовать в тех местах скрипта где по какой то причине не прошло требуемое действие. Допустим в ходилке, делаем смещение, проверяем новые координаты, если они совпадают со старыми то делаем чеклаг. Он удаляет журнал, кликает на бакпак и ждет ответа сервера в журнале - бакпак. Так вот если чек лаг прошел а координаты все те же значит чар уперся в препядствие :) Полезно чеклаг юзать при перетаскивании итемов, например добора ресурса на крафт, чтоб при сэйве под чаром не образовалась гора этих ресов. Воощем он нужен там где нет другой возможности проверить предыдущие действие исполнилось или нет.
В случае с банком, при его открытии появляется некая надпись. Так вот перед открытием очищаем журнал и кричим банк и ставим динамическую паузу на появление той самой надписи. Так будет надежнее.

Паузу в чеклаге не стоит занижать и никаких лагов не будет. То есть паузу меньше 100 лучше не ставить. 200 Вполне оптимальный вариант.
Из недостатков, чек лаг стирает журнал но это скорее фича чем недостаток. Просто некоторые любят пользовать журнал активно.

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


Top
   
 Post subject:
PostPosted: 2006-10-20 20:26:55 
Offline
User avatar

Joined: 2006-08-05 14:09:06
Posts: 270
Так как неумею пока пользоватся динамическими паузами, то соответственно использую пока фиксированые. Вот пример глупого скрипта на мининг. Еще не тестил. Этот скрипт просто гоняет чара по координатам и в каждой координате врубает мининг вокруг чара.


Code:
   VAR Picsar = '0x0000' ; кирка
   VAR SteikFat = '0x0000' ; рыбные стейки
   VAR Sunduk = '0x00000000' ; ИД сундука с инструментом (кирка)
   VAR Sunduk2 = '0x00000000' ; ИД сундука для ресурсов
sub main()
;идем к банку
GoToTile( 5975, 1492, 1, False )
wait( 5000 )  ; пауза
UO.Say( 'Bank' ) ; открываем банк
wait( 5000 ) ; пауза
; ищем что поесть
   If UO.Count( SteikFat ) < 10 Then ; проверяем наличие стейков в паке
      UO.FindType( SteikFat,'-1',Sunduk) ; ищем стейки в сундуке
   If UO.FindCount () > 0 Then ; проверяем нашли или нет
      UO.MoveItem( 'finditem','10' ) ; берем 10 стейков в пак
   wait (1000) ;пауза
   Else ; иначе
      UO.Print( 'Нет стейков' ) ; ругаемся
   Endif
   Endif
; ищем кирку
   If UO.Count( Picsar ) < 2 Then ; проверяем наличие кирки в паке
      UO.FindType( Picsar,'-1',Sunduk) ; ищем кирку в сундуке
   If UO.FindCount () > 0 Then ; проверяем нашли или нет
      UO.MoveItem( 'finditem','2' ) ; берем 2 кирки в пак
wait (1000) ;пауза
   Else ; иначе
      UO.Print( 'Нет кирки' ) ; ругаемся
   Endif
   Endif
; начинаем копать
; идем к точке копания №1
   GoToTile( 5974, 1504, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №2
   GoToTile( 6005, 1497, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №3
   GoToTile( 6010, 1496, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №4
   GoToTile( 6013, 1495, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №5
   GoToTile( 6012, 1499, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №6
   GoToTile( 6013, 1504, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №7
   GoToTile( 6007, 1504, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №8
   GoToTile( 6006, 1510, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №9
   GoToTile( 6006, 1516, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к точке копания №10
   GoToTile( 6004, 1519, 1, False )
    wait(10000) ; пауза
;запускаем скрипт на мининг вокруг чара
   Mining()
    wait(10000) ; пауза
; идем к банку
   GoToTile( 6002, 1500, 1, False )
    wait(5000) ; пауза
   GoToTile( 5977, 1501, 1, False )
    wait(5000) ; пауза
   GoToTile( 5975, 1492, 1, False )
    wait(10000) ; пауза
      UO.Say( 'Bank' ) ; открываем банк
    wait( 5000 ) ; пауза
      UO.MoveItem( '0x19B9','-1','Sunduk2' )
    wait( 1000 ) ; пауза
      UO.Print( 'Закончили' )
end sub

_________________
ДРВ

Spoiler

_________________

Антарес

Spoiler|Gostrabaiter|Umhra|Slog


Last edited by slonopotam on 2006-10-21 12:21:11, edited 3 times in total.

Top
   
 Post subject:
PostPosted: 2006-10-20 23:09:01 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Ты шутишь что ли? Это работает?


Top
   
 Post subject:
PostPosted: 2006-10-21 01:33:29 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
это не может работать в принципе... вот, случайно глаз выцепил:

Code:
UO.Sey( 'Bank' )

_________________
Ни один скрипт не работает? Пора обновить Инжект...
Все работает, но хочется большего? Пора переходить на стелс...


Top
   
 Post subject:
PostPosted: 2006-10-21 04:40:07 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Лучше спросить-ты на этом качаешься?!


Top
   
 Post subject:
PostPosted: 2006-10-21 11:50:59 
Offline
User avatar

Joined: 2006-08-05 14:09:06
Posts: 270
:D С UO.Say лажанулся (исправил), бывает, просто у нас на шарде сейчас нельзя добывать ресурсы (эвент такой) вот и не тестил. А так в принципе вполне рабочий (вроде :) ).

Да я на этом собрался качатся. Вот только эвент пройдет лесом и начну тестить.

_________________
ДРВ

Spoiler

_________________

Антарес

Spoiler|Gostrabaiter|Umhra|Slog


Top
   
 Post subject:
PostPosted: 2006-10-21 15:59:26 
Offline

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


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 0 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:  
cron
Powered by phpBB® Forum Software © phpBB Limited