swift-plot-54

;; alcove-adapter
(define-data-var score uint u0)
(define-data-var last-caller principal tx-sender)

(define-public (increment)
  (begin
    (var-set score (+ (var-get score) u1))
    (var-set last-caller tx-sender)
    (ok (var-get score))))

(define-public (reset)
  (begin
    (var-set score u0)
    (ok true)))

(define-read-only (get-value)
  (ok (var-get score)))

(define-read-only (get-last-caller)
  (ok (var-get last-caller)))