Unnamed

on *:TEXT:*:#:{
  if ($1 != @define) { return }
  tokenize 32 $2-
  var %Tmp 1
  if ($1 == add) {
    writeini defs.ini defs $2-
    msg $chan I ( $+ $me $+ ) have added $2 with the definiton of $3-
  }
  elseif ($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
    }
  }
  elseif ($1 == remove) || ($1 == del) {
    delini defs.ini defs $2
    msg $chan I ( $+ $me $+ ) have deleted $2
  }
  else {
    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
    }
  }
}