(define-private (collection-bid (collection-id (string-ascii 256)) (amount uint))
(begin
(try! (contract-call? 'SP1BX0P4MZ5A3A5JCH0E10YNS170QFR2VQ6TT4NRH.multiple collection-bid collection-id amount))
(ok true)
)
)
(define-public (many-collection-bid (collection-id (string-ascii 256)) (amount uint) (units uint))
(let (
(collections (contract-call? .string-lists lookup collection-id (- units u1)))
(amounts (contract-call? .lists lookup amount (- units u1)))
)
(print (map collection-bid collections amounts))
(ok true)
)
)
(define-private (multiple-bid (collection-id (string-ascii 256)) (amount uint) (ids (list 5000 uint)))
(begin
(try! (contract-call? 'SP1BX0P4MZ5A3A5JCH0E10YNS170QFR2VQ6TT4NRH.multiple multiple-bid collection-id amount ids))
(ok true)
)
)
(define-public (many-multiple-bid (collection-id (string-ascii 256)) (amount uint) (ids (list 5000 uint)) (units uint))
(let (
(collections (contract-call? .string-lists lookup collection-id (- units u1)))
(lists (contract-call? .list-o-lists lookup ids (- units u1)))
(amounts (contract-call? .lists lookup amount (- units u1)))
)
(print (map multiple-bid collections amounts lists))
(ok true)
)
)