mirror of
https://github.com/zhigang1992/wallet.git
synced 2026-01-12 17:53:19 +08:00
17 lines
344 B
Plaintext
17 lines
344 B
Plaintext
(define-data-var counter int 0)
|
|
|
|
(define-public (increment)
|
|
(begin
|
|
(var-set counter (+ (var-get counter) 1))
|
|
(print "+1")
|
|
(ok (var-get counter))))
|
|
|
|
(define-public (decrement)
|
|
(begin
|
|
(var-set counter (- (var-get counter) 1))
|
|
(print "-1")
|
|
(ok (var-get counter))))
|
|
|
|
(define-read-only (get-counter)
|
|
(var-get counter))
|