From Evernote:

反思

在简单重复的工作上花费了太多时间，然而出卖时间得到的回报并不多，该好好反思一下。接下来，拒绝吧。把时间多花在提升自己上面。

From Evernote:

[LISP]一个简单地统计封闭区域面积的小程序

;;; 统计PL线/矩形/圆/椭圆等封闭区域的面积
(defun c:rune15-collect-pline-area(/ plx mj n)
  (setvar "cmdecho" 0)
  (setq mj 0)
  (setq n 0)
  (setq ss (ssget))
  (repeat (sslength ss)
    (setq en (ssname ss n))
    (command "area" "e" en)
    (setq mj (+ mj (getvar "area")))
    (setq n (1+ n))
    )
  (PRINC (STRCAT "\n" (rtos n 2 0) "个对象总面积:" (rtos (/ mj 1000000) 2 2) " m2"))
  (prin1)
  )

(defun c:rcpa()
  (c:rune15-collect-pline-area))

(prompt "\n rcpa---统计多个封闭区域的面积")

(princ)