(defun c:HMTEST (/ message)
  ; コメントは処理の説明。ここは実行されません。
  (setq message "秀丸のAutoLISP設定を確認できました。")
  (princ (strcat "\n" message))
  (princ)
)