Source Code

;; Waqf Tracker - Computers
;; Endowment tracker for computers

(define-map computers-59-endowments principal {amount: uint})

(define-public (register-computers-59 (amount uint))
    (begin
        (map-set computers-59-endowments tx-sender {amount: amount})
        (ok true)
    )
)

(define-read-only (get-computers-59 (donor principal))
    (map-get? computers-59-endowments donor)
)

Functions (2)

FunctionAccessArgs
register-computers-59publicamount: uint
get-computers-59read-onlydonor: principal