(defun $module-$supercard_uc ()
(interactive)
(insert "$starttag")
(newline 2)
(insert "$endtag")
(forward-line -1)
)