anchor.diff:  
   ;; ;; emacs defun
   ;; (defun vue ()
  -;;   (async-shell-command   "open -a vlc --args rtsp://mut.dlinkddns.com:554/ch0_1.h264 *"))
  +;;   (async-shell-command   "open -a vlc --args rtsp://mut.dlinkddns.com:554/ch0_1.h264 &"))
   ;; (defun vnc-editmode ()
   ;;   (async-shell-command   "ssh pi@mut.dlinkddns.com 'vncserver -geometry 650x800 -depth 8 -rfbport 5910' &" ))
   ;; (defun vnc-editmode-2 ()
  
positive.code:   (2startx "/alle/FBK" 0))
  
  ;; ** TODO SYNTAX-HIGHLIGHT
  ;; ** (WARTE-BIS-<= n)
  
negative.code:                       address-0
                        address-zu-int))
           (gefunden (assoc address *status* :test #'equalp))) 
      (if (null gefunden)
          (format t "~%OSC routing not gefunden")
          (progn (rplacd gefunden  value)
                 (format t "~%=> ~S" gefunden)))
      gefunden))
  (defun osc-router-loop ()
    (loop (osc-router)))
  