Воровство. HELP !!!

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
CHI
Posts: 11
Joined: 2005-08-27 19:38:45

Воровство. HELP !!!

Post by CHI »

Ишу скрипт который воровал бы по таргету на сумку чара или чара. Есть такой? Помогитеееее
stickman
Posts: 139
Joined: 2005-04-05 04:13:24
Location: DRW
Contact:

Re: Воровство. HELP !!!

Post by stickman »

CHI wrote:Ишу скрипт который воровал бы по таргету на сумку чара или чара. Есть такой? Помогитеееее

нету.
CHI
Posts: 11
Joined: 2005-08-27 19:38:45

Post by CHI »

как нет) как неееееееееееееет??? люди выручайте
mont
Posts: 23
Joined: 2006-10-24 01:51:41
Location: Middle Earth
Contact:

Post by mont »

надо то, знаю, но не рассскажу что.
ADEPT_ABP
Posts: 223
Joined: 2006-05-12 08:03:45
Contact:

Re: Воровство. HELP !!!

Post by ADEPT_ABP »

CHI wrote:Ишу скрипт который воровал бы по таргету на сумку чара или чара. Есть такой? Помогитеееее

Меня больше прикололо:
чара или чара
:D

Code: Select all

sub main()
UO.AddObject('pack')
 UO.Print('В чём шарим?')
  while UO.Targeting()
    wait(10)
  wend
   wait(1000)

а так как я не вкурсе какие скилы в каком порядке используются, то дальше скрипт напишет знающий "что и как".
Вот если бы ты сказал, что тебе требуется от скрипта, а не то чего хочешь ты, то возможно тебе подсказали, как его написать. :D Или наваяли бы примерно, а дальше сам. И вообще, в любом форуме есть правило!!! Прежде чем создавать тему ПОИЩИ НА ФОРУМЕ!!! Если хочешь найти что-то другое воспользуйся поиском
Играю на drw.ru
Использую инжект 505.18 VeNd0r
Начинающий скриптер.
ADEPT_ABP
Posts: 223
Joined: 2006-05-12 08:03:45
Contact:

Post by ADEPT_ABP »

Выложил свой скрипт на прокачку Snooping.
Достаточно скопировать в блокнот и сохранить как Snooping&Stealing.sc :)
Действие скрипта - Ищет в радиусе 5 клеток Чара, у чара ищет бекпак, пытается его открыть. Если вам надо чтобы открытый пак закрывался, то сделайте(САМИ!!!) отход на определённое расстояние пока не закроется.

Code: Select all

var pack, char      ; Переменные
pack='0x0E75'       ; Тип(Type) пака жертвы экспроприации(backpack)

sub main()          ; Основная функция
uo.set('finddistance','5')   ; Дистанция поиска
uo.ignore('self')            ; Игнорим себя
var x                        ; Переменная для таймера
repeat                       ; Условие
uo.findtype(-1,-1,'ground')  ; Ищем всё на земле
wait(200)                    ; Пауза 0.2 секунды
if uo.getgraphic('finditem')=='0x0190' || uo.getgraphic('finditem')=='0x0191' then ; если находим тип персов(м\ж) тогда
char=uo.getserial('finditem')             ; Присваиваем переменной серийник(ID) найденного перса
uo.print(char)
else   ; иначе(если тип не подходит)
uo.ignore('finditem')   ; Игнорим найденое
endif
wait(200)                ; Пауза 0.2 секунды
until uo.getgraphic('finditem')=='0x0190' || uo.getgraphic('finditem')=='0x0191'    ; Условие ложно пока не найден нужный тип
uo.useobject(char)    ; Юзаем наденое
uo.findtype(pack,-1,char)     ; Ищем в найденном вещь по типу бекпака
pack=uo.getserial('finditem') ; Присваиваем переменной серийник (ID) найденого
while uo.skillval('Snooping',1)<=1000   ; Пока величина скилла меньше 100 реала
ws()    ; Проверка на сейв (описание функции ниже)
   uo.useobject(pack)    ; Пытаемся открыть бекпак
   x=uo.timer()          ; Присваиваем переменной некое значение функции(процедуре?) таймера
   repeat                ; условие
   wait(200)             ; Пауза 0.2 секунды
   until uo.injournal('You fail') || uo.timer()==x+30   ; Условие ложно пока не найдена нужная строка в журнале, или не прошло 3 секунды
   wait(1000)     ; Пауза 1 секунда
wend
Stealing(pack)   ; После прокачки снупинга идёт стибринг
end sub

sub CheckLag()    ; Функция отклика
   UO.DeleteJournal() ; вытрем все сообщения в журнале (Inj, но не клиента)
   UO.Click('backpack') ; одиночный клик по вашему backpack
;       ждем сообщения в журнале
   repeat
      wait(100)
   until UO.InJournal("backpack")
;       этот цикл завершится, если это сообщение появится.... замечу "Backpack" и "backpack"
;       регистр важен Пишите точно что ждете
end sub

Sub ws()    ; Функция проверки журнала на запись мира
 if uo.injournal("world is saving now...") then
   while not uo.injournal("world data saving")
      wait(100)
   wend
 endif
CheckLag()
end sub

sub Stealing(bpack) ; недописано....
   repeat
      UO.FindType( '-1', '-1', bpack )
      UO.UseSkill( 'Stealing', 'finditem' )
      wait(4000)
   until UO.Dead()
endsub
Играю на drw.ru
Использую инжект 505.18 VeNd0r
Начинающий скриптер.
Post Reply