Amr Gharbeia
21c792b019
- Updated all 23 skill org files to use absolute path - Tangle now outputs directly to ~/.local/share/opencortex/skills/ - Removed env var (org-babel doesn't expand it)
27 lines
837 B
Org Mode
27 lines
837 B
Org Mode
#+TITLE: SKILL: Peripheral Vision (org-skill-peripheral-vision.org)
|
|
#+AUTHOR: Agent
|
|
#+FILETAGS: :harness:peripheral:context:
|
|
#+PROPERTY: header-args:lisp :tangle /home/user/.local/share/opencortex/skills/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
|