All pastes #556199 Raw Edit

Someone

public text v1 · immutable
·published 2007-06-10 13:29 UTC
rendered paste body
on *:TEXT:*:#:{
  /set %seen [ $+ [ $nick ] ] $1-
  /set %seentype [ $+ [ $nick ] ] text
  /set %seenchan [ $+ [ $nick ] ] $chan
  /set %seentime [ $+ [ $nick ] ] 0
  /inc -c %seentime [ $+ [ $nick ] ] 1 
}
on *:JOIN:#:{
  /set %seentype [ $+ [ $nick ] ] join
  /set %seenchan [ $+ [ $nick ] ] $chan
  /set %seentime [ $+ [ $nick ] ] 0
  /inc -c %seentime [ $+ [ $nick ] ] 1 
}
on *:PART:#:{
  /set %seentype [ $+ [ $nick ] ] part
  /set %seenchan [ $+ [ $nick ] ] $chan
  /set %seentime [ $+ [ $nick ] ] 0
  /inc -c %seentime [ $+ [ $nick ] ] 1 
}
on *:QUIT:{
  /set %seen [ $+ [ $nick ] ] $1-
  /set %seentype [ $+ [ $nick ] ] quit
  /set %seentime [ $+ [ $nick ] ] 0
  /inc -c %seentime [ $+ [ $nick ] ] 1 
}
on *:TEXT:!seen*:#:{
  if (%seentype [ $+ [ $2 ] ] == text) {
    /notice $nick 2I last saw3 $2 2saying4 %seen [ $+ [ $2 ] ] - 2In the channel named4 %seenchan [ $+ [ $2 ] ] -7 $duration(%seentime [ $+ [ $2 ] ]) ago!
  }
  elseif (%seentype [ $+ [ $2 ] ] == join) {
    /notice $nick 2I last saw3 $2 2joining the channel4 %seenchan [ $+ [ $2 ] ] -7 $duration(%seentime [ $+ [ $2 ] ]) ago!
  }
  elseif (%seentype [ $+ [ $2 ] ] == part) {
    /notice $nick 2I last saw3 $2 2parting the channel4 %seenchan [ $+ [ $2 ] ] -7 $duration(%seentime [ $+ [ $2 ] ]) ago!
  }
  elseif (%seentype [ $+ [ $2 ] ] == quit) {
    /notice $nick 2I last saw3 $2 2quiting4 %seen [ $+ [ $2 ] ] -7 $duration(%seentime [ $+ [ $2 ] ]) ago!
  }
  elseif (%seentype [ $+ [ $2 ] ] == action) {
    /notice $nick 2I last saw3 $2 2acting4 %seen [ $+ [ $2 ] ] - 2In the channel named4 %seenchan [ $+ [ $2 ] ] -7 $duration(%seentime [ $+ [ $2 ] ]) ago!
  }
  elseif (%seentype [ $+ [ $2 ] ] == nick) {
    /notice $nick 2I last saw3 $2 2changing his nick to4 %seen [ $+ [ $2 ] ] -7 $duration(%seentime [ $+ [ $2 ] ]) ago!
  }
  elseif (%seentype [ $+ [ $2 ] ] == $null) {
    /notice $nick 2I have not seen4 $2 2at all!
  }
}
on *:ACTION:*:#:{
  /set %seen [ $+ [ $nick ] ] $1-
  /set %seentype [ $+ [ $nick ] ] action
  /set %seenchan [ $+ [ $nick ] ] $chan
  /set %seentime [ $+ [ $nick ] ] 1
  /inc -c %seentime [ $+ [ $nick ] ] 1 
}
on *:NICK:#:{
  /set %seen [ $+ [ $nick ] ] $newnick
  /set %seentype [ $+ [ $nick ] ] nick
  /set %seentime [ $+ [ $nick ] ] 0
  /inc -c %seentime [ $+ [ $nick ] ] 1 
}