#+TITLE: SKILL: Peripheral Vision (org-skill-peripheral-vision.org)
#+AUTHOR: Agent
#+FILETAGS: :harness:peripheral:context:
#+PROPERTY: header-args:lisp :tangle %%SKILLS_DIR%%/org-skill-peripheral-vision.lisp

* Overview
The *Peripheral Vision* skill enhances the context engine with high-level summaries of distant memory nodes.

* Implementation

** Context Logic
#+begin_src lisp
(defun peripheral-vision-summarize (obj-id)
  "Generates a low-resolution summary of an object."
  (let ((obj (lookup-object obj-id)))
    (if obj
        (format nil "Node: ~a (~a)" (getf (org-object-attributes obj) :TITLE) obj-id)
        "[Unknown Node]")))
#+end_src

** Skill Registration
#+begin_src lisp
(defskill :skill-peripheral-vision
  :priority 100
  :trigger (lambda (ctx) (declare (ignore ctx)) nil))
#+end_src