Amr Gharbeia
dd8bb6e3c8
- Updated all 22 skill org files to use $OC_DATA_DIR/skills/ paths - Removed manually created .lisp file (tangling now targets XDG) - Files will now tangle to ~/.local/share/opencortex/skills/
27 lines
795 B
Org Mode
27 lines
795 B
Org Mode
#+TITLE: SKILL: Scribe (org-skill-scribe.org)
|
|
#+AUTHOR: Agent
|
|
#+FILETAGS: :skill:scribe:documentation:
|
|
#+PROPERTY: header-args:lisp :tangle $OC_DATA_DIR/skills/org-skill-scribe.lisp
|
|
|
|
* Overview
|
|
The *Scribe Skill* manages the agent's internal documentation and logs.
|
|
|
|
* Implementation
|
|
|
|
** Documentation Logic
|
|
#+begin_src lisp
|
|
(defun scribe-log-event (signal)
|
|
"Logs a metabolic signal for later analysis."
|
|
(let ((type (getf signal :type))
|
|
(payload (getf signal :payload)))
|
|
(harness-log "SCRIBE: [~a] ~s" type payload)))
|
|
#+end_src
|
|
|
|
** Skill Registration
|
|
#+begin_src lisp
|
|
(defskill :skill-scribe
|
|
:priority 100
|
|
:trigger (lambda (ctx) (member (getf ctx :type) '(:LOG :STATUS)))
|
|
:deterministic (lambda (action ctx) (declare (ignore action)) (scribe-log-event ctx) nil))
|
|
#+end_src
|