summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--modules/3-store.rkt11
1 files changed, 11 insertions, 0 deletions
diff --git a/modules/3-store.rkt b/modules/3-store.rkt
new file mode 100644
index 0000000..aa44169
--- /dev/null
+++ b/modules/3-store.rkt
@@ -0,0 +1,11 @@
+#lang racket/base
+(require irc/bot irc/command irc/storage irc/users
+ racket/format)
+
+(define-command (power)
+ #:help "Displays your registered power level"
+ (reply (~a (user-power (source)))))
+
+(define-command (user-get path)
+ #:power 2
+ (reply (~s (apply ref (user-storage (source)) path))))