Помогите со скриптом. Такого на форуме точно нет.

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Badb
Posts: 21
Joined: 2005-01-18 08:39:42

Помогите со скриптом. Такого на форуме точно нет.

Post by Badb »

Народ, надо скрипт. Нужно что бы он записывал координаты появления чаров, тоесть: мой чар стоит на месте, по руне прилетает другой чар, в это время мой чар записывает его координаты и ник. Вот и всё. Плиз хелп =)
Last edited by Badb on 2005-03-27 22:04:33, edited 1 time in total.
Badb
Posts: 21
Joined: 2005-01-18 08:39:42

Post by Badb »

Наверх типа =)
I'm
Expert!
Posts: 1396
Joined: 2004-10-15 22:38:04
Location: Moscow City.
Contact:

Post by I'm »

Вот основное что надо:

Code: Select all

Var f=file("C:\Status.html")
UO.GetX()
UO.GetY()
f.Create()
f.Open()
f.WriteLn()
f.Close()
Badb
Posts: 21
Joined: 2005-01-18 08:39:42

Post by Badb »

I'm wrote:Вот основное что надо:

Code: Select all

Var f=file("C:\Status.html")
UO.GetX()
UO.GetY()
f.Create()
f.Open()
f.WriteLn()
f.Close()

Какие там переменные надо поменять?
Badb
Posts: 21
Joined: 2005-01-18 08:39:42

Post by Badb »

Тоесть по идее надо 2 скрипта:
1) Если мой чар увидит что кто то пришёл, то запускает второй скрипт, если не увидит- ждёт пока ктонить придёт =)
2) Этот скрипт определяет имя и координаты пришёдшего и записывает их в файл.

Вот в принципе и всё, плиз хелп- надо срочно
Last edited by Badb on 2005-03-30 14:21:42, edited 1 time in total.
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Badb wrote:Что бы юзат этот код надо знать ИД появившегося, но я его не знаю =)
ищешь по типу на полу и вытягиваешь ID ;)
I'm
Expert!
Posts: 1396
Joined: 2004-10-15 22:38:04
Location: Moscow City.
Contact:

Post by I'm »

помни типа 2 =) ну также есть морфы.
еще можно попробовать искать по журналу.
Badb
Posts: 21
Joined: 2005-01-18 08:39:42

Post by Badb »

Кароче, вот что у меня получилось:

Code: Select all

sub AntipPK()
While NOT UO.Dead()
wait(100)
until UO.InJournal("You see")>0
if uo.injournal("You see")=<0 then
AntiPK2()
Wend
end sub

sub AntiPK2()
   var f=file("C:\PK.dat")
   VAR Char='uo.JournalSerial(uo.InJournal("You see:")-1)'
SaveToFile(Char)
end sub


Тоесть в первом скрипте хотел написать следующее:
Пока я не умру, ждать по 0.1 сек, пока в журнале не появится строка "You see", если она появится то запускать AntiPK2().

Второй скрипт: получить сериал обьекта, которому принадлежит фраза "You see", после чего сохранить его в файл C:\PK.dat

Народ, подредактируйте плиз, ну первый раз встречаюсь с такого типа скриптами...
Badb
Posts: 21
Joined: 2005-01-18 08:39:42

Post by Badb »

ап
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

В журнале инжекта не отражается появление кого-либо в видимости чара. Строки "You see: ля-ля-ля" появляются только в журнале УО, а из инжекта к нему доступа нету. Так что этим способом ни фига не получится - будут занесены только чары либо напавшие на основного, либо что-то сказавшие.

Только поиск вокруг. Минус - в случае поиска по макс радиусу (12-14 клеток) этот поиск занимает несколько секунд, некоторые чары (быстро пробегающие недалеко) могут в нем не засветиться. Плюс надо учитывать морфы, плюс чар может прилететь в инвизе, может схайдиться после прилета, а поиск его не успеет еще засечь... тут много подводных камней.
Post Reply