on *:TEXT:ondw*:?:{
  var %i = 1
  while (%i <= $lines(items.txt)) {
    if ($read(items.txt,s,$2,%i)) {
      set %items. [ $+ [ $2 ] ] %items. [ $+ [ $2 ] ] $replace($gettok($read(items.txt, %i),2-,32),chr(32),_)
      inc %i
    }
  }
  msg $nick ondwr %items. [ $+ [ $2 ] ]
  unset %items. [ $+ [ $2 ] ]
  halt
}