communication-hub
SP3ZGVF03P0G2F798147EBKTYQ7GVD1BG34PMH2AGSource Code
;; Message Board - Post messages
(define-map messages uint {author: principal, content: (string-ascii 280)})
(define-data-var message-id uint u0)
(define-public (post-message (content (string-ascii 280)))
(let ((id (var-get message-id)))
(map-set messages id {author: tx-sender, content: content})
(var-set message-id (+ id u1))
(ok id)))
(define-read-only (get-message (id uint))
(map-get? messages id))
Functions (2)
| Function | Access | Args |
|---|---|---|
| post-message | public | content: (string-ascii 280 |
| get-message | read-only | id: uint |