機械cadcam技術(shù)第6章-資料下載頁
2025-02-05 16:00本頁面
【正文】 (abs 數(shù) ) 返回 數(shù) 的絕對值 (sin 角度 ) 返回 角度 的正弦值 ， 角度 單位為弧度 (cos 角度 ) 返回 角度 的余弦值 ， 角度 單位為弧度 (atan 數(shù) 1數(shù) 2) 若無 數(shù) 2， 返回 數(shù) 1的反正切 ， 單位為弧度； 若有 數(shù) 2， 返回 數(shù) 1/數(shù) 2的反正切； 若 數(shù) 2為零 ， 返回 例：已知一板長 L， 寬為 B， 若在其上截取直徑為 B的圓形板料 ， 畫出排料圖 。 （ defun c:div( ) ( setq p0 (getpoint “ Base Point\n” ) ) ( setq L (getreal “ L= ” ) ) ( setq B (getreal “ B= ” ) ) ( setq R (* B )) ( setq p1 (polar (polar p0 0 L) B) ) ( mand “ rectangle” p0 p1) ( setq num (fix ( / L B)) a 0 ) ( setq p2 (polar (polar p0 R) 0 R) )。 ( while ( a num) ( setq p2 (polar p2 0 B) ) ) ( mand “ circle” p2 R ) ( setq a (1+ a) ) ) ) L B VisualLisp的編輯運行步驟： 1）在命令行鍵入 Vlisp命令，進入 VisualLisp環(huán)境 2）編輯 Lisp程序 加載活動編輯窗口圖標(biāo) 加載選定代碼圖標(biāo) 檢查編輯窗口圖標(biāo) 檢查編輯窗口圖標(biāo) 3）加載活動編輯窗口 4）在控制臺鍵入 (程序名 )，便開始運行開發(fā)程序 演講完畢，謝謝觀看！
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1