event-logger-v2
SP31AT1T96E4CF8C2QZ7FCFC99WJCTV2GTTWB811CSource Code
(define-data-var event-counter uint u0)
(define-map events uint {
actor: principal,
action: (string-ascii 50),
timestamp: uint
})
(define-public (log-event (action (string-ascii 50)))
(let ((event-id (var-get event-counter)))
(map-set events event-id {
actor: tx-sender,
action: action,
timestamp: stacks-block-height
})
(var-set event-counter (+ event-id u1))
(ok event-id)
)
)
(define-read-only (get-event (event-id uint))
(ok (map-get? events event-id))
)
Functions (2)
| Function | Access | Args |
|---|---|---|
| log-event | public | action: (string-ascii 50 |
| get-event | read-only | event-id: uint |