1 files changed, 8 insertions, 0 deletions
diff --git a/sgp2dot-cl.lisp b/sgp2dot-cl.lisp
new file mode 100755
index 0000000..9646399
--- /dev/null
+++ b/sgp2dot-cl.lisp
@@ -0,0 +1,8 @@
+#!/usr/bin/sbcl --script
+
+(load "./sgp2dot.lisp")
+
+(if (eq (length sb-ext:*posix-argv*) 3)
+    (sgp2dot:convert (second sb-ext:*posix-argv*) (third sb-ext:*posix-argv*))
+    (format t "Usage: ./sgp2dot-cl.lisp <platform-file> <output-dot-file>~%"))
+