################################### # Note System Coded By xplorer # # lemery.sebastien@gmail.gom # # #mircscripting # # irc.undernet.org # ################################### ON *:TEXT:!addnote *:#:{ if ($nick isop $chan || $istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { if ($($+(%,info,$2),2)) { msg $chan Information for $2 is already registered! } else { set $+(%,info,$2) $3- (Added By: $fulladdress On: $fulldate $+ ) msg $chan Informations 9ADDED! } } else { msg $chan $nick You need @ to !ADDNOTE } } ON *:TEXT:!remnote *:#:{ if ($nick isop $chan || $istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { if ($($+(%,info,$2),2)) { unset $+(%,info,$2) msg $chan Informations 4DELETED! } else { msg $chan $nick Information for $2 does not exist! } } else { msg $chan $nick You need @ to !REMNOTE } } ON *:TEXT:!note *:#:{ if ($nick isop $chan || $istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { if ($($+(%,info,$2),2)) { msg $chan Info for $+($2,:) $ifmatch } else { msg $chan * $+ $nick $+ * I have nothing in the database for $2 } } } on *:TEXT:!notecount:#:{ if ($nick isop $chan || $istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { msg $chan $var(%info*,0) } } on *:TEXT:!remallnote:#:{ if ($istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { unset %info* msg $chan $nick all notes have been erased! } else { msg $chan $nick you cannot use this command! } } on *:TEXT:!addnoteadmin *:#:{ if ($istok(%superadmin,$address($nick,2),32)) { if (!$istok(%noteadmin,$2,32)) { set %noteadmin $addtok(%noteadmin,$2,32) msg $chan $nick $2 has been added to Note Admins! } else { msg $chan $nick $2 is already added to Note Admins! } } else { msg $chan $nick you cannot use this command! } } on *:TEXT:!delnoteadmin:#:{ if ($istok(%superadmin,$address($nick,2),32)) { if ($istok(%noteadmin,$2,32)) { set %noteadmin $deltok(%noteadmin,$2,32) msg $chan $nick $2 has been deleted from Note Admins! } else { msg $chan $nick $2 is not in Note Admins! } } else { msg $chan $nick you cannot use this command! } } on *:TEXT:!noteshow:#:{ if ($nick isop $chan || $istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { if ($var(%info*,0) > 0) { var %i = $var(%info*,0) var %j = 1 while (%j <= %i) { set %allinfo $iif($(%allinfo),$(%allinfo) -,$null) $remove($var(%info*,%j),$(%info,0)) inc %j } msg $chan Notes are added for %allinfo $+ . unset %allinfo } else { msg $chan $nick I have no notes added! } } } ON *:TEXT:!modnote *:#:{ if ($nick isop $chan || $istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { if ($($+(%,info,$2),2)) { set $+(%,info,$2) $3- (Modified By: $fulladdress On: $fulldate $+ ) $chr(124) $($+(%,info,$2),2) msg $chan Informations 9MODIFIED! } else { msg $chan $nick Information for $2 does not exist, Use !addnot instead! } } else { msg $chan $nick You need @ to !MODNOTE } } on *:TEXT:!notehelp:#:{ if ($nick isop $chan || $istok(%noteadmin,$address($nick,2),32) || $istok(%superadmin,$address($nick,2),32)) { notice $nick You NEED to be 4@(op) in the channel to use the note system. .timer -m 1 500 notice $nick Type 4!ADDNOTE  Make Sure your adding the username 4*NOT4* The nickname .timer -m 1 1000 notice $nick Here is an example .timer -m 1 1500 notice $nick !ADDNOTE 4Username 9(Added/Suspended/deleted/modified) user to level 7 .timer -m 1 2000 notice $nick Type 4!MODNOTE  To Add a note. .timer -m 1 2500 notice $nick Type 4!REMNOTE  To Delete. .timer -m 1 3000 notice $nick Type 4!NOTE  To Check the infos. .timer -m 1 3500 notice $nick Type 4!NOTESHOW To Show Usernames that have infos. .timer -m 1 4000 notice $nick Type 4!REMALLNOTE To Delete all notes. .timer -m 1 4500 notice $nick Type 4!NOTECOUNT To See the number of notes. } } on *:LOAD:{ echo -a 4» »08 Note System Script Successfully Loaded. echo -a 4» »08 Copyright © 200915 http://xplorer.mircscripting.info echo -a 4» »08 Written by: 15 xplorer 08 Email: 15 xplorer@live.ca }