morning-dhikr

;; Islamic Habit Tracker - Morning Dhikr
;; Tracker for morning dhikr

(define-map morning-dhikr-62-streak principal uint)

(define-public (log-morning-dhikr-62)
    (let ((current-streak (default-to u0 (map-get? morning-dhikr-62-streak tx-sender))))
        (map-set morning-dhikr-62-streak tx-sender (+ current-streak u1))
        (ok true)
    )
)

(define-read-only (get-morning-dhikr-62-streak (user principal))
    (default-to u0 (map-get? morning-dhikr-62-streak user))
)