Source Code

;; Islamic Habit Tracker - Salawat
;; Tracker for salawat

(define-map salawat-74-streak principal uint)

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

(define-read-only (get-salawat-74-streak (user principal))
    (default-to u0 (map-get? salawat-74-streak user))
)

Functions (2)

FunctionAccessArgs
log-salawat-74public
get-salawat-74-streakread-onlyuser: principal