Source Code


(define-constant CONTRACT-OWNER tx-sender)
(define-constant ERR-NOT-AUTHORIZED u401)

(define-public (admin-airdrop (addresses (list 1000 principal)) (amounts (list 1000 uint)))
  (begin
    (print (map airdrop addresses amounts))
    (ok true)
  )
)

(define-private (airdrop (address principal) (amount uint))
    (contract-call? .bananas transfer amount tx-sender address none)
)

Functions (2)

FunctionAccessArgs
admin-airdroppublicaddresses: (list 1000 principal
airdropprivateaddress: principal, amount: uint