https://git.spwbk.site/swatson/clwars/raw/master/sector.lisp
___________________________________
(defun sector-info ()
  (format t "Called sector-info"))

(defun scout ()
  (format t "Called scout"))

(defun leave ()
  (format t "Called leave"))