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

-=WOLVERINE=- · Post by **-=WOLVERINE=-** » 2008-03-25 20:30:10

Вообщем задумка такая :
Если В Журнале Появляется определенная надпись,то записываеться время появления этои надписи и желательно в какой то отдельный Фаил...Вот что то не нашел ничего подобного..помогите ктонибудь:))

стыдна очень:(

Yura · Post by **Yura** » 2008-03-25 21:32:40

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

попробуй

-=WOLVERINE=- · Post by **-=WOLVERINE=-** » 2008-03-25 21:44:58

Ого не думал что так можно...только вот у меня никак не хватит места на харде если он так будет три четыре дня работать

Можно сделать как то чтобы он увидел надпись то записал ,а то я попробовал.....так он в пару секунд мне выдал список на три страницы времени:) вообщем суть такая мне нужно знать когда появляеться в моем доме определенныи человек ...так как он лаин его не могу никак застать а подругому мне его не наити:(

Yura · Post by **Yura** » 2008-03-25 21:49:28

исправил

-=WOLVERINE=- · Post by **-=WOLVERINE=-** » 2008-03-26 01:32:07

Спасибо огромное!Надеюсь мне поможет!скрипт работает!

-=WOLVERINE=- · Post by **-=WOLVERINE=-** » 2008-03-26 07:16:12

блин парсер выдает...и в конечном итогде сносит инжектион хмл

Yura · Post by **Yura** » 2008-03-26 08:05:53

Code: Select all

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

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

Destruction · Post by **Destruction** » 2008-03-26 09:08:19

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

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

Yura · Post by **Yura** » 2008-03-26 09:29:14

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

-=WOLVERINE=- · Post by **-=WOLVERINE=-** » 2008-03-26 16:52:12

блин ..все равно вдает парсер..может бть дело в инжекте?или в железке?играю с ноут бука

Edred · Post by **Edred** » 2008-03-26 17:32:31

Destruction wrote:Ересь. Рекурсия.

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

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

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

-=WOLVERINE=- · Post by **-=WOLVERINE=-** » 2008-03-26 17:40:08

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

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

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

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