(defun C:BreakAtPoint() (setvar "CMDECHO" 0) (command "break" (car (entsel)) (getpoint "\n指定打断点：") "@") (prin1))
