Source Code
;; define counter variable
(define-data-var counter int 0)
;; counter getter
(define-read-only (get-counter)
(ok (var-get counter))
)
;; increment method
(define-public (increment)
(begin
(var-set counter (+ (var-get counter) 1))
(ok (var-get counter))
)
)
;; decrement method
(define-public (decrement)
(begin
(var-set counter (- (var-get counter) 1))
(ok (var-get counter))
)
)Functions (3)
| Function | Access | Args |
|---|---|---|
| get-counter | read-only | |
| increment | public | |
| decrement | public |