Seen Script.

Here's the seen.mrc file from my bot. You also have to have a users.ini file made. I'll post mine in there also. To use this script with out having to change it at all, then make a folder called ini and place users.ini in there. If you already have a ini folder then you can make a new text document, paste the code into the new text document, save as the new text document, make sure the document is in the right folder (BotDirectoryHere\ini), change it from saving as a .txt file to all files *.*, Then as the file name make it "users.ini" With the quotes. The script and the ini file will be pasted below.

Seen.mrc

Code:

;begin scripting
on 1500:text:*sn*:#:{ 
  if ($1 == %c $+ sn) {
    if ($2 == on) { .enable #sen | .enable #sjsen | set %se.s on | set %st.sn on | .msg $chan 5The Seen Mode Has Been Enabled, To See If Someone Has Been Here, Type: %c $+ seen <nickname> | set %last.used.command sn on | set %last.person $nick | halt }
    if ($2 == off) { .disable #sen | .disable #sjsen | set %se.s off | unset %st.sn | .msg $chan 5The Seen Mode Has Been Disabled. | set %last.used.command sn off | set %last.person $nick | halt }
    else { .notice $nick 5Incorrect command usage: %c $+ sn <on/off> | halt }
  }
  else { halt }
}
on 1500:text:*seclear*:#: {
  if ($1 == %c $+ seclear) { /write -c ini\users.ini | .msg $nick 5All seen files have been cleared. | set %last.used.command seclear | set %last.person $nick }
  else { halt }
}
#sen off
on 1:text:*seen*:#: {
  if ($1 == %c $+ seen) {
    if ($2 == $null) { .notice $nick 5Correct Usage: %c $+ seen <nick> | halt }
    if ($2 == $me) { .notice $nick 5Of course I'm here $nick $+ . | halt }
    if ($2 == $nick) { .notice $nick 5Yes, $nick $+ , you are here. | halt }
    if ($2 ison $chan) { .notice $nick 5 $+ $2 is in this chan already. | halt }
    if ($readini ini\users.ini $2 date == $null) { .notice $nick 5 $+ $2 has not been seen by me. | halt }
    else { 
      if ($readini ini\users.ini $2 me == $null) { 
        if ($readini ini\users.ini $2 part == yes) { .msg $nick  5 $+ $2 was last seen parting [ $readini ini\users.ini $2 chan ]  $+ $duration($calc($ctime($fulldate)-$ctime($readini ini\users.ini $2 date))) ago. }
        else { .msg $nick [ 5 $+ $2 ] was last seen quiting  $+ $duration($calc($ctime($fulldate)-$ctime($readini ini\users.ini $2 date))) ago with the message: " $+ [ $readini ini\users.ini $2 message ] $+ ". }
      }
      else { 
        if ($readini ini\users.ini $2 part == yes) { .msg $nick  5 $+ $2 was last seen parting [ $readini ini\users.ini $2 chan ]  $+ $duration($calc($ctime($fulldate)-$ctime($readini ini\users.ini $2 date))) ago. | .msg $nick 5 $+ $2 $+ 's last action was: 6 $+ [ $readini ini\users.ini $2 me ] } 
        else { .msg $nick 5 $+ $2 was last seen quiting  $+ $duration($calc($ctime($fulldate)-$ctime($readini ini\users.ini $2 date))) ago with the message: " $+ [ $readini ini\users.ini $2 message ] $+ ". | .msg $nick 5 $+ $2 $+ 's last action was: 6 $+ [ $readini ini\users.ini $2 me ] }
      }
    }
    else { halt }
  }
}
#sen end
#sjsen off
on 1:QUIT:/writeini -n ini\users.ini $nick date $fulldate | writeini -n ini\users.ini $nick part no | writeini -n ini\users.ini $nick message $1-
on 1:PART:#:/writeini -n ini\users.ini $nick date $fulldate | writeini -n ini\users.ini $nick chan $chan | writeini -n ini\users.ini $nick part yes
on 1:ACTION:*:#:writeini -n ini\users.ini $nick me * $+ $nick $1-
#sjsen end

Users.ini

Code:

[users]
n0=1500:Pescados666!*ss@*.dsl.hstntx.swbell.net

I put this here mainly since alot of people had supported the seen idea in Resident's thread. I hope this will save you a bit of time. If you haev any questions, feel free to ask me!

 

[users]
n0=1500escados666!*ss@*.dsl.hstntx.swbell.net

Thanks for telling

 

Nice script, looks quite good. Haven't got the time to test it at the moment.