Unnamed

on *:LOAD:{
  if (6 > $version) {
    echo -a ServiceBot v1.0
    echo -a Your mIRC version needs to be 6.0 or higher in order for this script to work
    echo -a Your current version is $version $+ .
    echo -a  The time is now $+ $asctime $+
    unload -rs $+(",$script,")
    echo -a Script has successfully unloaded
    echo -a #dan_-
  }
  else {
    echo -a - servicebot by dan_-
    echo -a You have just loaded ServiceBot
    echo -a Script designed by dan_-
    set %version 3.1c
    set %built.on January 28, 2003, 5:06:12 PM
    echo -a ServiceBot Version %version $+ 
    echo -a Built on %built.on $+
    echo -a - servicebot by dan_-
  }
}
 
 on *:TEXT:*:#:{
   if ($1 == .register) {
     if ($2 == $null) {
       .msg $chan [error] invalid syntax
     }
     elseif ($read(accinfo.txt, w, $chan) != $null) {
       .msg $chan [error] account $2 is already registered
    }
    else {
      write $+(,-,ds,$qt($2-),) accinfo.txt
      write accinfo.txt $2-
      .msg $chan $nick has registered an account
    }
  }
}

 on *:TEXT:*:#:{
   if ($1 == .login) {
     if ($2 == $null) {
      .msg $chan [error] invalid syntax. [username] [password]
      if ($2 == $2) {
      .msg $chan [login]: Incorrect password from $nick }
     }
     elseif ($read(accinfo.txt, w, $chan) != $null) {
        .msg $chan [login]: $2 has logged in
      }
    }
  }
  elseif ($right($1,-1) == user) {
    if (!$2) .msg $chan [error] please specify a user to lookup
    elseif ($ini(accinfo.ini,accinfo,$2)) .msg $chan [user check] $2 is registered
    else .msg $chan [user check] $2 does not appear to be registered
  }

on *:TEXT:*:#:{
    if ($1 == .adduser) {
    if ($ulevel >= 5) {
      if (!$2) || (!$3) { .msg $chan [adduser] Insufficient parameters | halt }
      /auser $3 $address($2,2)
      .notice $nick  adduser  $nick added user to the userlist! 
    }
  }
  elseif ($right($1,-1) == .deluser) {
    if ($ulevel >= 5) {
      if (!$2) || (!$3) { .msg $chan [remuser] Insufficient parameters | halt }
      /ruser $3 $address($2,2)
      .msg $chan [adduser] $2 has been removed user from the userlist
    }
  }
}