announcements
SP3CGHKW1Q0QXGW8WPG4JGRBQB2T5B7ZQE8QQ0GW2Source Code
;; Announcements
(define-map announcements uint {title: (string-ascii 100), content: (string-ascii 500)})
(define-data-var announcement-id uint u0)
(define-public (create-announcement (title (string-ascii 100)) (content (string-ascii 500)))
(let ((id (var-get announcement-id)))
(map-set announcements id {title: title, content: content})
(var-set announcement-id (+ id u1))
(ok id)))
(define-read-only (get-announcement (id uint))
(map-get? announcements id))
Functions (2)
| Function | Access | Args |
|---|---|---|
| create-announcement | public | title: (string-ascii 100 |
| get-announcement | read-only | id: uint |