Page 1 of 1

Возник Вопрос..

Posted: 2008-03-25 20:30:10
by -=WOLVERINE=-
Вообщем задумка такая :
Если В Журнале Появляется определенная надпись,то записываеться время появления этои надписи и желательно в какой то отдельный Фаил...Вот что то не нашел ничего подобного..помогите ктонибудь:)) :oops: стыдна очень:( :roll: :roll:

Posted: 2008-03-25 21:32:40
by Yura

Code: Select all

sub mesg()
var msg = 'test msg'
DJournal(msg)
UO.TextClear()
UO.TextOpen()
  while 1==1
    if UO.InJournal(msg) then
      UO.textprint(msg +' : ' + Maketime())
      DJournal(msg)
    endif 
  wend
endsub

Sub DJournal(msg )
   VAR tmp = UO.InJournal( msg )
   If tmp > 0 Then
      UO.SetJournalLine(tmp - 1, ' ' )
      DJournal(msg)
   Endif
endsub

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


запускать mesg

попробуй

Posted: 2008-03-25 21:44:58
by -=WOLVERINE=-
Ого не думал что так можно...только вот у меня никак не хватит места на харде если он так будет три четыре дня работать :lol:
Можно сделать как то чтобы он увидел надпись то записал ,а то я попробовал.....так он в пару секунд мне выдал список на три страницы времени:) вообщем суть такая мне нужно знать когда появляеться в моем доме определенныи человек ...так как он лаин его не могу никак застать а подругому мне его не наити:(

Posted: 2008-03-25 21:49:28
by Yura
исправил

Posted: 2008-03-26 01:32:07
by -=WOLVERINE=-
Спасибо огромное!Надеюсь мне поможет!скрипт работает!

Posted: 2008-03-26 07:16:12
by -=WOLVERINE=-
блин парсер выдает...и в конечном итогде сносит инжектион хмл :(

Posted: 2008-03-26 08:05:53
by Yura

Code: Select all

 while 1==1 
    wait(500)
    if UO.InJournal(msg) then
      UO.textprint(msg +' : ' + Maketime())
      DJournal(msg)
    endif 
  wend

таймер добавь, можеш посмотреть нагруку на проц, если сильно после запуска скрипта вырастает, увеличивай

Posted: 2008-03-26 09:08:19
by Destruction
Sub DJournal(msg )
VAR tmp = UO.InJournal( msg )
If tmp > 0 Then
UO.SetJournalLine(tmp - 1, ' ' )
DJournal(msg)
Endif
endsub


Ересь. Рекурсия. Чем вас мой deljournal() не устроил?

Posted: 2008-03-26 09:29:14
by Yura
Destruction wrote:Ересь. Рекурсия. Чем вас мой deljournal() не устроил?

2Destruction
Я его и не видел)). Врятли ошибка из-за этого, или инжа криво работает с рекурсией?

2-=WOLVERINE=-
если ошибка будет все равно вылазить замени Djournal на скрипт Destructiona

Code: Select all

Sub DJournal(msg )
while uo.injournal(msg)
  uo.setjournalline(uo.injournal(msg)-1,"")
wend
endsub

Posted: 2008-03-26 16:52:12
by -=WOLVERINE=-
блин ..все равно вдает парсер..может бть дело в инжекте?или в железке?играю с ноут бука :?

Posted: 2008-03-26 17:32:31
by Edred
Destruction wrote:Ересь. Рекурсия.


Рекурсия - не ересь, а нормальный инструмент программиста. Просто пользоваться надо аккуратно.

В журнале инжекта максимум 100 строк, так что у рекурсии максимум 100 вложений. Ничего страшного с инжектом от этого не случится (проблемы могут начаться после 220-250 вложений).

ЗЫ: UO.textprint(msg +' : ' + Maketime()) - это здорово, но рекомендую поэкспериментировать и убедиться, что длина окна для текстовых выводов не такая уж и длинная. Результат 4-дневной работы в него точно не поместится. Кажись (счас не помню точно) там всего 4096 байт можно записать...

Posted: 2008-03-26 17:40:08
by -=WOLVERINE=-
Edred wrote:
Destruction wrote:Ересь. Рекурсия.


Рекурсия - не ересь, а нормальный инструмент программиста. Просто пользоваться надо аккуратно.

В журнале инжекта максимум 100 строк, так что у рекурсии максимум 100 вложений. Ничего страшного с инжектом от этого не случится (проблемы могут начаться после 220-250 вложений).

ЗЫ: UO.textprint(msg +' : ' + Maketime()) - это здорово, но рекомендую поэкспериментировать и убедиться, что длина окна для текстовых выводов не такая уж и длинная. Результат 4-дневной работы в него точно не поместится. Кажись (счас не помню точно) там всего 4096 байт можно записать...

И это с учетом что просто напросто выводиться одна строка с цифрами..тоесть когда появляеться эта надпись?кстати человека нашол:)нашел бонально..по телефоннои книжке...а скрипт я думаю можно использовать..ну допустим отслеживать время респауна живности...чем сеичас и занимаюсь)на уникорна:) :lol: