When you need to go HAM

ham-mode.el

(defconst ham-mode-keymap (make-sparse-keymap) "Keymap used in ham mode")

(define-key ham-mode-keymap (kbd "C-c C-0") 'go-ham)

(defgroup ham-mode nil
  "HAM minor mode.")

(defun go-ham ()
  (interactive)
  (message "HARD AS A MOTHERFUCKER"))

;;;###autoload
(define-minor-mode ham-mode
  "Minor mode for going HAM"
  :lighter " HAM"
  :keymap ham-mode-keymap)

(provide 'ham-mode)