diff options
| -rw-r--r-- | modules/3-store.rkt | 11 |
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)))) |