diff --git a/app/demo/main.lisp b/app/demo/main.lisp
index 0ccb669..6baecc9 100644
--- a/app/demo/main.lisp
+++ b/app/demo/main.lisp
@@ -14,7 +14,7 @@
 
 (in-package :scopes/app/demo)
 
-(defun main()
+(defun main ()
   (let ((config-path (util:relative-path "config" "etc")))
     (format t "~%Hello World.~%config-path: ~s~%" config-path)
     (load config-path))
diff --git a/app/tst9/main.lisp b/app/tst9/main.lisp
new file mode 100644
index 0000000..96825a4
--- /dev/null
+++ b/app/tst9/main.lisp
@@ -0,0 +1,10 @@
+;;;; cl-scopes/app/tst9/main - main program for the tst9 testing client
+
+(defpackage :scopes/app/tst9
+  (:use :common-lisp)
+  (:local-nicknames (:client :scopes/web/client))
+  (:export #:main))
+
+(in-package :scopes/app/tst9)
+
+(defun main ())
diff --git a/app/tst9/scopes-tst9.asd b/app/tst9/scopes-tst9.asd
new file mode 100644
index 0000000..8bf4d12
--- /dev/null
+++ b/app/tst9/scopes-tst9.asd
@@ -0,0 +1,13 @@
+(in-package #:asdf-user)
+
+(defsystem :scopes-tst9
+  :author "cyberconcepts.org Team <team@cyberconcepts.org>"
+  :license "MIT"
+  :version "0.0.1"
+  :homepage "https://www.cyberconcepts.org"
+  :description "testing client for web applications / server systems"
+  :depends-on (:scopes :scopes-auth)
+  :components ((:file "main"))
+  :build-operation "program-op"
+  :build-pathname "bin/tst9"
+  :entry-point "scopes/app/tst9:main")