Stuff

on *:TEXT:*:#:{
  tokenize 32 $mid($1-,$calc($len(@define)+1))
  var %Tmp 1
  while (%tmp <= $ini(defs.ini,0)) {
    if ($1 == $ini(defs.ini,1,%tmp)) {
      var %wtf %tmp
      msg $chan Definition of  $+ $ini(defs.ini,1,%wtf) $+  is  $+ $readini(defs.ini,defs,$ini(defs.ini,1,%wtf)) $+ 
    }
    elseif ($1 != $ini(defs.ini,1,%wtf)) && ($1 != add) || ($1 != list) || ($1 != del) || ($1 != remove) {
      notice $nick I can not find  $+ $1 $+  in my database
    }
    inc %tmp

  } 
  if ($1 == add) {
    writeini defs.ini defs $2-
    msg $chan I ( $+ $me $+ ) have added $2 with the definiton of $3-
  }
  if ($1 == list) {
    var %tmp 1 
    Notice $nick Listing all definitions: 
    while (%tmp <= $ini(defs.ini,0)) {
      notice $nick $ini(defs.ini,1,%tmp)
      inc %tmp
    }
  }
  if ($1 == remove) || ($1 == del) {
    delini defs.ini defs $2
    msg $chan I ( $+ $me $+ ) have deleted $2
  }
}