※ 引述《what8013 (.................)》之銘言： : 我現再遇到一個問題 : 就是我必須靠AutoLISP讀取多個文字檔幫我畫圖 : 光是讀取一個文字檔進來畫這是沒問題 : 現在問題是 我需要讀取好幾個文字檔內的DATA : 每一個文字檔內都是一些座標點 用來畫聚合線的 : 我想用迴圈寫 這樣只要一次執行 就可以全部畫完 : 不用一個一個檔案慢慢畫 : 而那些文字檔的檔名 我會把它排成等差數列 : 如:abc1.txt abc2.txt abc3.txt ..... : 現在就是卡在LISP指令不知道該怎麼寫 : (setq Fop (open "F:/Eximer Laser/LISP/abc",i,".txt" "r"))) : 上面程式是錯的 我不知道open指令後面要怎麼同時加入字串與數字 : 上面的i就是我文字檔名中的數字 我有做累加的動作 : 現再只差這一步把所有檔案吃進來 就可以執行了 : 請LISP高手指點一下 這邊該怎麼修改 謝謝！！ 我不是,我不是高手 不過我想到的是 你得會另一套語言做轉譯程式 作用是把你的資料檔直接做成.lsp (甚至或者是 script :腳本檔) 然後再讓cad 去自動作圖 至於 VBA for CAD 我就不甚了了 --

※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.59.125.217