Source Code

(define-map royalty-info uint {creator: principal, percentage: uint})
(define-data-var platform-fee uint u250)
(define-read-only (get-royalty (token-id uint)) (map-get? royalty-info token-id))
(define-read-only (get-platform-fee) (var-get platform-fee))
(define-public (set-royalty (token-id uint) (percentage uint))
  (begin
    (asserts! (<= percentage u1000) (err u1))
    (map-set royalty-info token-id {creator: tx-sender, percentage: percentage})
    (ok true)))
(define-public (set-platform-fee (fee uint))
  (begin
    (asserts! (<= fee u500) (err u2))
    (var-set platform-fee fee)
    (ok true)))

Functions (4)

FunctionAccessArgs
get-royaltyread-onlytoken-id: uint
get-platform-feeread-only
set-royaltypublictoken-id: uint, percentage: uint
set-platform-feepublicfee: uint