!addnote / !addinfo

By xplo on Jan 15, 2008

{{Updated again for the 3rd time.}}
Load this in your bot via Alt+r un remotes under "new" then save as "addnote.mrc" put the "" so the remote will change from .txt to .mrc.

then on your back channel type !notehelp
you will get all the help you need via notice.

Thank to Julien on #mircscripting and all the #mircscripting crew on undernet :))

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 <Username> 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<level>
    .timer -m 1 2000 notice $nick Type 4!MODNOTE <Username> To Add a note.
    .timer -m 1 2500 notice $nick Type 4!REMNOTE <Username> To Delete.
    .timer -m 1 3000 notice $nick Type 4!NOTE <Username> 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.
  }
}

Comments

Sign in to comment.
xplo   -  Jan 15, 2008

i did :)

~~Code Updated, i just added the !modnote command to add something to the actual info. :)

Enjoy! :)

 Respond  
guest598594   -  Jan 15, 2008

i saw u post this for help on #mircscripting :P

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.