Simple seen script by me.. Uses ini files. Currently a person has to leave/join the channel for the script to recognize them. I'm sure I could figure a way to fix this but I don't want to at the moment.
on *:JOIN:#:{
writeini online.ini Online $nick true
}
on *:PART:#:{
writeini online.ini Online $nick false
writeini lastonline.ini Time $nick $time(h:nn TT)
}
on *:QUIT:{
writeini online.ini Online $nick false
writeini lastonline.ini Time $nick $time(h:nn TT)
}
on *:TEXT:!seen*:#:{
if ($readini(online.ini,Online, $2 ) == true) {
msg $chan Oh no! I think you're going blind! $2 is already online.
}
else {
if ($readini(online.ini,Online, $2 ) == false) {
msg $chan I last saw $2 online at $readini(lastonline.ini, Time, $2)
}
}
}
on *:JOIN:#:writeini -n seen.ini seen $nick $ctime
on *:PART:#:writeini -n seen.ini seen $nick $ctime
on *:QUIT:writeini -n seen.ini seen $nick $ctime
on *:TEXT:*:*:{
writeini -n seen.ini seen $nick $ctime
if ($1 = !seen) $iif($chan,notice,msg) $nick $iif($2,$iif($readini(seen.ini,seen,$2),Seen $2 before $duration($calc($ctime - $v1),2) $+ .,Sorry $+ $chr(44) haven't seen $2 $+ .),Please specify user to check for.)
}
Tadaaaa!