on *:TEXT:*:#:{
if ($nick == $me) halt
write alllog.txt $asctime(dd/mm-HH:nn) $chr(46) $nick $chr(46) $1-
if (($asctime(HH:nn) == 00:00) && (%filechecked == $null)) { .signal logdel | halt }
else halt
}
on *:KICK:#:{
/write alllog.txt $asctime(dd/mm-HH:nn) $chr(46) $nick KICK $knick $1-
}
on *:ACTION:*:#:{
write alllog.txt $asctime(dd/mm-HH:nn) $chr(46) $nick $chr(46) $1-
}
on *:TOPIC:#:{
write alllog.txt $asctime(dd/mm-HH:nn) $chr(46) $nick Change TOPIC $chr(46) $1-
}
on *:TEXT:*@dellog*:?:{
if ($nick !isowner $comchan($me,1)) halt
else remove alllog.txt
}
on *:TEXT:*@log*:?:{
if ($2 == $null) halt
;if ($nick !isowner $comchan($me,1)) halt
else {
set %lineread 1
while ( %lineread <= $lines(alllog.txt) ) {
query $nick $read(alllog.txt, nw,* $+ $2 $+ * $+ $3 $+ *,%lineread)
set %var1 $readn
if ($3 == $null) goto repeat
query $nick $read(alllog.txt, nw,* $+ $3 $+ * $+ $2 $+ *,%lineread)
:repeat
set %var2 $readn
inc %search
if ((%var1 == 0) && (%var2 == 0)) break
if (%search > 50) { query $nick Too much record , pls specified more | break }
if (%var1 >= %var2) %lineread = $calc( %var1 + 1 )
if (%var2 > %var1) %lineread = $calc( %var2 + 1 )
}
unset %search %lineread %var*
close -m
}
}
on *:SIGNAL:logdel:{
echo -s logdel started
set -u3600 %filechecked 1
set %lineread1 $read(alllog.txt, w, * $+ $asctime($calc($ctime($asctime(dd/mm/yy HH:nn:ss)) - 86400), dd/mm) $+ * )
set %lineread1 $readn
while ( %lineread1 > 0 ) {
if ( * $+ $asctime($calc($ctime($asctime(dd/mm/yy HH:nn:ss)) - 604800), dd/mm) $+ * iswm * $+ $read(alllog.txt,%lineread1) $+ * ) { write -dl $+ %lineread1 alllog.txt | dec %lineread1 | continue }
else { dec %lineread1 | continue }
}
}
this addon will log the lastest 7 days log in the chatroom.
and u can retrieve the log by any contents from the whisper box of the bot ..
eg . @log 29/5-17:02 << this will look for u all msg in that time
eg. @log 29/5-17:02 peter <<this will look for all msg that peter talk in that time ~~