on *:join:#:{
.write $qt($scriptdirtracker.txt) ( $time(HH:nn:ss) on $adate ) - $address - $nick
}
on *:text:!find*:*:{
find $nick $2
}
alias find {
if !$2 { .msg $1 Usage !find <nick> }
else {
if !$read($qt($scriptdirtracker.txt),w,$+(*,$2)) {
.msg $1 No matches for $2 found
}
else {
var %a = 1, %b = $lines($qt($scriptdirtracker.txt)), %match
while %a <= %b {
inc %match
.timer 1 %match msg $1 $read($qt($scriptdirtracker.txt),w,$+(*,$2),%a)
%a = $readn
inc %a
}
}
}
}