(define-data-var total-escrows uint u0)
(define-data-var total-volume uint u0)
(define-data-var completed-count uint u0)
(define-data-var disputed-count uint u0)
(define-map daily-stats uint {escrows: uint, volume: uint, date: uint})
(define-read-only (get-stats) {total: (var-get total-escrows), volume: (var-get total-volume), completed: (var-get completed-count), disputed: (var-get disputed-count)})
(define-public (record-escrow (amount uint))
(begin
(var-set total-escrows (+ (var-get total-escrows) u1))
(var-set total-volume (+ (var-get total-volume) amount))
(ok true)))
(define-public (record-completion) (begin (var-set completed-count (+ (var-get completed-count) u1)) (ok true)))
(define-public (record-dispute) (begin (var-set disputed-count (+ (var-get disputed-count) u1)) (ok true)))