Source Code


(define-data-var counter int 0)
(define-data-var counter2 int 0)

(define-public (say-hi)
  (ok "hello world")
)

(define-read-only (echo-number (val int))
  (ok val)
)

(define-read-only (get-counter)
  (ok (var-get counter))
)

(define-public (increment)
  (begin
    (var-set counter (+ (var-get counter) 1))
    (ok (var-get counter))
  )
)

(define-public (decrement)
  (begin
    (var-set counter (- (var-get counter) 1))
    (ok (var-get counter))
  )
)

(define-read-only (get-counter-2)
  (ok (var-get counter2))
)

(define-public (increment-2)
  (begin
    (var-set counter2 (+ (var-get counter) 1))
    (ok (var-get counter2))
  )
)

(define-public (decrement-2)
  (begin
    (var-set counter2 (- (var-get counter) 1))
    (ok (var-get counter2))
  )
)

(define-constant ERR-TEST u40401)

(define-data-var contract-owner principal tx-sender)

Functions (8)

FunctionAccessArgs
say-hipublic
echo-numberread-onlyval: int
get-counterread-only
incrementpublic
decrementpublic
get-counter-2read-only
increment-2public
decrement-2public