subscription-plans-v1

(define-map plans uint {creator: principal, name: (string-ascii 50), price: uint, duration: uint, active: bool})
(define-data-var plan-count uint u0)
(define-read-only (get-plan (id uint)) (map-get? plans id))
(define-public (create-plan (name (string-ascii 50)) (price uint) (duration uint))
  (let ((id (var-get plan-count)))
    (map-set plans id {creator: tx-sender, name: name, price: price, duration: duration, active: true})
    (var-set plan-count (+ id u1))
    (ok id)))