Re: [問題] autolisp讀取excel座標?

看板Cad_Cae作者 (sjgau)時間15年前 (2008/08/31 16:29), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串6/6 (看更多)
以下是中間的測試過程的 C 的版本, 採用 simpson 第一法則積分, 目的是 為了證明, 有確實 正確的讀到 Excel 產生的數據點。 答案是 y= sin(x), x= 0 to pi area= 2.000021 理論值是 2.000 #include "stdafx.h" #include <process.h> int _tmain(int argc, _TCHAR* argv[]) { FILE *f1; double x[100], y[100]; int ct= -1, no, i; f1= fopen("d:\\book3.txt", "rt"); while (!feof(f1)) { ct++; no= fscanf(f1, "%lg %lg\n", &x[ct], &y[ct]); printf("%5ld, %10.6lf, %10.6lf\n", no, x[ct], y[ct]); } printf("\n ct= %d\n", ct); system("pause"); fclose(f1); // ------------------------------------------ double sum= 0; for (i=0;i<=(ct-2);i+= 2) { sum+= y[i] + 4*y[i+1] + y[i+2]; } sum= sum*((x[1] - x[0])/3.0); printf("\n sum= %.6lf\n", sum); system("pause"); return 0; }// end of main() ※ 引述《sjgau (sjgau)》之銘言: : ※ 引述《xko (大家一起想好名字**)》之銘言: : : 大家好, : : 請問在excel裡已經有很多點的座標, : : 我要怎麼將那些座標匯入autocad呢? : 在 excel 裡面,另存新檔, : 採用 文字檔 (Tab 字元分隔) : 產生 book3.txt : 如下面的 C語言程式設計, : 讀 book3.txt, 產生 book4.scr : 進入 AutoCAD, script 這個 book4.scr : 即可叫 AutoCAD 自動畫圖 : : 另外就是匯入後要怎樣將那些點自動 : : 連成線呢? : : thanks : #include "stdafx.h" : #include <process.h> : int _tmain(int argc, _TCHAR* argv[]) : { : FILE *f1; : double x[100], y[100]; : int ct= -1, no, i; : f1= fopen("d:\\book3.txt", "rt"); : while (!feof(f1)) { : ct++; : no= fscanf(f1, "%lg %lg\n", &x[ct], &y[ct]); : printf("%5ld, %10.6lf, %10.6lf\n", no, x[ct], y[ct]); : } : printf("\n\n ct= %d\n", ct); : system("pause"); : fclose(f1); : // ------------------------------------------ : f1= fopen("d:\\book4.scr", "wt"); : fprintf(f1, "spline\n"); : for (i=0;i<= ct;i++) { : fprintf(f1, "%.6lf,%.6lf\n", x[i], y[i]); : } : fprintf(f1, "\n\n\n"); : fclose(f1); : printf("\n\n Done!\n"); : system("pause"); : return 0; : }// end of main() -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 118.231.145.119
文章代碼(AID): #18kbPsn3 (Cad_Cae)
文章代碼(AID): #18kbPsn3 (Cad_Cae)