(impl-trait 'SP3FBR2AGK5H9QBDH3EEN6DF8EK8JY7RX8QJ5SVTE.sip-010-trait-ft-standard.sip-010-trait) (define-constant ERR-GO-AWAY (err u900)) (define-fungible-token bitcoin) (define-read-only (get-name) (ok "Bitcoin")) (define-read-only (get-symbol) (ok "BTC")) (define-read-only (get-decimals) (ok u8)) (define-read-only (get-balance (address principal)) (ok (ft-get-balance bitcoin address))) (define-read-only (get-total-supply) (ok (ft-get-supply bitcoin))) (define-read-only (get-token-uri) (ok (some u"https://maaz.pk/"))) (define-public (mint (amount uint) (address principal)) (ft-mint? bitcoin amount address)) (define-public (transfer (amount uint) (sender principal) (recipient principal) (memo (optional (buff 34)))) (if (is-eq sender contract-caller) (ft-transfer? bitcoin amount sender recipient) ERR-GO-AWAY)) (ft-mint? bitcoin u50000000000 tx-sender)