Forums Scripts & Popups info

 
on ^*:join:#: {
  if (%nicktracker == off || !%nicktracker) { return }
  if (!$hget(join)) nicktracker
  hinc join $address($nick,2) $+ $chan $+ .num
  if ($hget(join,$address($nick,2) $+ $chan $+ .last)) { window @Tracker 0 200 900 300 | aline -p @Tracker $asctime([HH:nn]) 9 $nick 10 has joined # $hget(join,$address($nick,2) $+ $chan $+ .num) times. Last as 9 $hget(join,$address($nick,2) $+ $chan) 4 $duration($calc($ctime - $hget(join,$address($nick,2) $+ $chan $+ .last))) ago. }
  .write $_sfn($logdir@Tracker.log) $asctime(dd/mm/yy-HH:nn) $nick $address Tracker $chan
  hadd join $address($nick,2) $+ $chan $nick
  hadd join $address($nick,2) $+ $chan $+ .last $ctime
  var %a = 1,%n = 0,%b = 1
  while $hget(join,$address($nick,2) $+ .nicknum. $+ %a) {
    if ($v1 == $nick) %n = 1 
    inc %a
  }
  haltdef
}
on *:nick: {
  if (!$hget(join)) nicktracker
  var %a = 1,%n = 0
  while $hget(join,$address($newnick,2) $+ .nicknum. $+ %a) {
    if ($v1 == $newnick) %n = 1 
    inc %a
  }
  if (%n == 0) hadd join $address($newnick,2) $+ .nicknum. $+ %a $newnick
}


alias nicktracker {
hmake join 5000
hload join join.op
.timer 0 600 hsave join join.op
}

menu @Tracker {
Logs
.On:/log On 
.Off:/log Off
..-
..Open:/run notepad.exe $dir="Select a log file" $mircdirlogs\*.log
-
Clear:/clear
-
Close:/_closewin $active
}