Source Code

;; Achievement Badges - Award badges
(define-map badges {user: principal, badge-type: (string-ascii 30)} {earned: bool})

(define-public (award-badge (badge-type (string-ascii 30)))
  (begin
    (map-set badges {user: tx-sender, badge-type: badge-type} {earned: true})
    (ok true)))

(define-read-only (has-badge (user principal) (badge-type (string-ascii 30)))
  (default-to false (get earned (map-get? badges {user: user, badge-type: badge-type}))))

Functions (2)

FunctionAccessArgs
award-badgepublicbadge-type: (string-ascii 30
has-badgeread-onlyuser: principal, badge-type: (string-ascii 30