#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))))