# File cmd/teensy/cmd_script.rb, line 22
  def cmd_script(args)
    case args
    when /del\s+#(\d+)/
      s = get_object($1.to_i)
      case s
      when Script
        delete_object(s.id)
        sendto("Script #$1 deleted.")
      else
        sendto("No script.")
      end
    when /add\s+(\w+)\s+(.*)/
      case $1.intern
      when :fart
        s = Script.new($2.strip, id, $1.intern)
        put_object(s)
        sendto("Script #{s.id} added.")
      when :boolexp
        s = Script.new(nil, id, $1.intern)
        s.load($2.strip)
        put_object(s)
        sendto("Script #{s.id} added.")
      else
        sendto("No language.")
      end
    when /show\s+#(\d+)/
      s = get_object($1.to_i)
      case s
      when Script
        s.load if !s.src
        sendto(s.src)
      else
        sendto("No script.")
      end
    else
      sendto("What??")
    end
  end