兩點求角度

(princ "\n兩點求角度:zz")
(defun c:zz(/ pt1 ang)
(setq pt1 (getpoint " ,請點選圓點位置 : "))
(setq ang (getangle pt1 "角度方向(第2點) : "))
(if (= ang nil)(setq ang 0))
(princ "角度(徑度)=")(princ ang)
(princ "角度(度)=")(princ (* ang 57.29577951))
(princ))

比Google Docs還要強的網路文書處理軟體

http://www.zoho.com/
不止是基本的文件,Zoho服務有:
Zoho Sheet 線上試算表服務、Zoho Meeting Web會議、Zoho Show 線上演示文檔工具、Zoho Invoice 線上發貨單、Zoho Writer 線上文字處理器、Zoho Notebook 線上備忘錄處理器、Zoho Creator 線上web應用程式創建器、Zoho Projects 專案管理、Zoho Planner 線上組織工具、Zoho Wiki 線上Wiki及其公開，私有&群組原則、Zoho Chat 即時消息和組聊天工具;
一整個辦公室應用都上網了;去看看吧!!!
PS:使用Google帳號就可以登入使用。