######################### # 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 echo $color(notice) -at /del.voice echo $color(notice) -at /add.op echo $color(notice) -at /del.op 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 }