Pasted

#########################
#    Userlist System    #
# Version: 1.3+bugfix   #
# By: Sebastien         #
# Mail: xplorer@live.ca #
# Net: irc.undernet.org #
# Chan: #mircscripting  #
#########################
on @*:JOIN:#:{ 
  if ($readini(ulist\op.ini,$mknickfn($nick),$chan) && $readini(ulist\voice.ini,$mknickfn($nick),$chan) == $address($nick,2)) { 
    aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Performing +vo on $+(7,$nick,) 
    mode $chan +vo $nick $nick 
    return 
  }
  if ($readini(ulist\voice.ini,$mknickfn($nick),$chan) == $address($nick,2)) { 
    aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Performing +v on $+(7,$nick,) 
    mode $chan +v $nick 
  }
  if ($readini(ulist\op.ini,$mknickfn($nick),$chan) == $address($nick,2)) { 
    aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Performing +o on $+(7,$nick,) 
    mode $chan +o $nick
  } 
}
alias open.voice { run ulist\voice.ini }
alias open.op { run ulist\op.ini }
alias add.voice { 
  writeini ulist\voice.ini $mknickfn($1) $chan $address($1,2) 
  aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Added $+(7,$1,) to Voice list
  mode $chan +v $1 
}
alias add.op { 
  writeini ulist\op.ini $mknickfn($1) $chan $address($1,2) 
  aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Added $+(7,$1,) to Op list 
  mode $chan +o $1 
}
alias del.voice { 
  remini ulist\voice.ini $mknickfn($1) $chan $address($1,2) 
  aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Removed $+(7,$1,) from Voice list 
  mode $chan -v $1 
}
alias del.op { 
  remini ulist\op.ini $mknickfn($1) $chan $address($1,2) 
  aline -p @Userlist $+([,$fulldate,]) $+([14,$chan,]) Removed $+(7,$1,) from Op list 
  mode $chan -o $1 
} 
on *:LOAD:{
  mkdir ulist
  echo $color(notice) -at Loading Auto-mode system
  echo $color(notice) -at For help & Command list type: /help.auto
}
on *:START:{ if (!$window(@Userlist)) { window @Userlist | aline -p @Userlist Userlist Events! (Version: 1.2+bugfix) } }
alias help.auto {  
  echo $color(notice) -at Command list
  echo $color(notice) -at /add.voice <nick>
  echo $color(notice) -at /del.voice <nick>
  echo $color(notice) -at /add.op <nick>
  echo $color(notice) -at /del.op <nick>
  echo $color(notice) -at You Can view all the mode listing with the followings commands, if there is no file, nothing will happen.
  echo $color(notice) -at /open.op
  echo $color(notice) -at /open.voice
  echo $color(notice) -at But i do not suggest you to play with the files, or it could be broken. :/
}
 
on me:*:join:#:{ who # }
 
 
raw 352:*:{ halt }
raw 315:*:{ halt }