※ 引述《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