diff --git a/.lein-failures b/.lein-failures
new file mode 100644
index 0000000..65dcdc3
--- /dev/null
+++ b/.lein-failures
@@ -0,0 +1 @@
+#{}
\ No newline at end of file
diff --git a/test/memobot/test/strings.clj b/test/memobot/test/strings.clj
new file mode 100644
index 0000000..58058eb
--- /dev/null
+++ b/test/memobot/test/strings.clj
@@ -0,0 +1,25 @@
+(ns memobot.test.strings
+  (:use [memobot core strings redis db])
+  (:use [clojure.test]))
+
+(deftest strings-test
+  (testing "set"
+    (is (= (set-cmd 'k 10) 10)))
+  (testing "setnx"
+    (testing "when key doesn't exist"
+      (is (= (setnx-cmd :new 10) 10)))
+    (testing "when key exists"
+      (is (= (setnx-cmd 'k 10) 'k))))
+  (testing "strlen"
+    (is (= (strlen-cmd "robot") 5)))
+    (is (= (strlen-cmd 6) 1))
+  (testing "incr"
+    (is (= (incr-cmd 10) 11)))
+  (testing "decr"
+    (is (= (decr-cmd 10) 9)))
+  (testing "incrby"
+    (is (= (incrby-cmd 10 5) 15)))
+  (testing "decrby"
+    (is (= (decrby-cmd 10 5) 5))))
+  
+