C/C++调用Lu的入门程序

forcal

C/C++调用Lu的入门程序

仅需要以下支持文件：
: G% G% f$ }% G" K0 s
, n& L2 H. b' y3 B6 q9 k6 `1、头文件lu32.h。
+ b2 ^$ i, I) Q* Z6 P% q2、导入库lu32.lib。
3、核心库lu32.dll。

2. #include <windows.h>8 b2 O$ Y; a\\" a/ Z+ ?
   
4. #include <iostream>
   
5. ' d! [% D! I\\" ?7 u, f  T
6. #include <math.h>
   
7. ; ^6 q9 j1 @  `\\" U
8. #include "lu32.h"  //Lu头文件' h! \% p! {( E
   
10. 
    
11. 0 B5 s6 \5 x3 _1 X1 `
12. #pragma comment( lib, "lu32.lib" )
    
13. 6 {& ^5 K' @2 ?2 J1 C; E
14. 2 y4 Q; V# d\\" E# |$ \; c. D% @0 j
    
16. using namespace std;2 E: y( L9 X2 p6 e6 X- ^
    
18. 
    
19. * F* |\\" f( F5 j; ]$ g8 S* _
20. void main(void)
    
21. 4 C- @) K. ^! V! P
22. {
    
23. 5 }, U/ j: B; U
24.     void *hFor;    //表达式句柄2 D* t& F& ], m  x0 G8 d5 [; S2 c
    
26.     luINT nPara;   //存放表达式的自变量个数
    
27. ( Y, q/ F) W' H/ \7 D) u, W# h; X  T
28.     LuData *pPara; //存放输入自变量的数组指针6 H9 [! ~0 d) N' Y' A# A9 x
    
30.     LuData Val;    //存放表达式的值
    
31. 6 u9 T\\" Q9 M+ i$ M7 I; H
32.     luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
    
33. % u! G& a, I0 p! k1 p) X
34.     int ErrCode;   //错误代码
    
35. % b7 g) u3 W( b* p
36.     wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式\\" z8 b1 N1 Q# i4 D4 s: ?& \+ O
    
38.     int i;; g1 p% j( m2 y' R) ]3 A
    
40. $ t& h\\" Y1 \& o+ x' V
    
42.     if(!InitLu()) return; //初始化Lu
    
43. 1 F2 B9 G; _& r8 ]! H! O
44. # K1 m3 j* L- W$ ^3 A. X
    
46.     ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式! @) N% x: k4 p5 U& P4 f5 R
    
48.     if(ErrCode)' L8 e$ |; ?$ G6 A. P: c7 `, Y  l
    
50.     {& K$ I8 t4 k5 q5 M\\" W# }
    
52.         cout<<"表达式有错误！错误代码："<<ErrCode<<endl;\\" W! ]+ |$ j\\" Y# ]+ Q
    
54.     }
    
55. 9 r3 _\\" \4 H. l2 e! i6 I
56.     else7 B8 {+ U* k8 H, `& ?( B
    
58.     {1 e! h; b, m\\" I5 ^- Z4 G' e
    
60.         for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
    
61. 2 B$ i* Q: @\\" w( S5 b, k% v# j# D
62.         {\\" U% J3 C6 V2 Z& e
    
64.             pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
    
65. , m# v9 @' @5 n5 c# d
66.         }% ?+ V: {& b( ?& r5 `& K+ {3 D# F% S
    
68.         Val=LuCal(hFor,pPara); //计算表达式的值
    
69. 6 ]$ p1 i/ q3 F1 g- N- U
70.         cout<<Val.x<<endl;
    
71. , T9 G/ a, M/ Y
72.     }6 W1 I& [. ]\\" \4 B
    
74.     FreeLu();      //释放Lu
    
75. - |9 `+ S* }5 F/ b& T) X8 @8 n
76. }

#include <windows.h><font class=\\"jammer\\">8 b2 O$ Y; a\\" a/ Z+ ?</font><br /> #include <iostream><br /> <span style=\\"display:none\\">' d! [% D! I\\" ?7 u, f  T</span> #include <math.h><br /> <span style=\\"display:none\\">; ^6 q9 j1 @  `\\" U</span> #include "lu32.h"  //Lu头文件<font class=\\"jammer\\">' h! \% p! {( E</font><br /> <br /> <span style=\\"display:none\\">0 B5 s6 \5 x3 _1 X1 `</span> #pragma comment( lib, "lu32.lib" )<br /> <span style=\\"display:none\\">6 {& ^5 K' @2 ?2 J1 C; E</span> <font class=\\"jammer\\">2 y4 Q; V# d\\" E# |$ \; c. D% @0 j</font><br /> using namespace std;<font class=\\"jammer\\">2 E: y( L9 X2 p6 e6 X- ^</font><br /> <br /> <span style=\\"display:none\\">* F* |\\" f( F5 j; ]$ g8 S* _</span> void main(void)<br /> <span style=\\"display:none\\">4 C- @) K. ^! V! P</span> {<br /> <span style=\\"display:none\\">5 }, U/ j: B; U</span>     void *hFor;    //表达式句柄<font class=\\"jammer\\">2 D* t& F& ], m  x0 G8 d5 [; S2 c</font><br />     luINT nPara;   //存放表达式的自变量个数<br /> <span style=\\"display:none\\">( Y, q/ F) W' H/ \7 D) u, W# h; X  T</span>     LuData *pPara; //存放输入自变量的数组指针<font class=\\"jammer\\">6 H9 [! ~0 d) N' Y' A# A9 x</font><br />     LuData Val;    //存放表达式的值<br /> <span style=\\"display:none\\">6 u9 T\\" Q9 M+ i$ M7 I; H</span>     luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置<br /> <span style=\\"display:none\\">% u! G& a, I0 p! k1 p) X</span>     int ErrCode;   //错误代码<br /> <span style=\\"display:none\\">% b7 g) u3 W( b* p</span>     wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式<font class=\\"jammer\\">\\" z8 b1 N1 Q# i4 D4 s: ?& \+ O</font><br />     int i;<font class=\\"jammer\\">; g1 p% j( m2 y' R) ]3 A</font><br /> <font class=\\"jammer\\">$ t& h\\" Y1 \& o+ x' V</font><br />     if(!InitLu()) return; //初始化Lu<br /> <span style=\\"display:none\\">1 F2 B9 G; _& r8 ]! H! O</span> <font class=\\"jammer\\"># K1 m3 j* L- W$ ^3 A. X</font><br />     ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式<font class=\\"jammer\\">! @) N% x: k4 p5 U& P4 f5 R</font><br />     if(ErrCode)<font class=\\"jammer\\">' L8 e$ |; ?$ G6 A. P: c7 `, Y  l</font><br />     {<font class=\\"jammer\\">& K$ I8 t4 k5 q5 M\\" W# }</font><br />         cout<<"表达式有错误！错误代码："<<ErrCode<<endl;<font class=\\"jammer\\">\\" W! ]+ |$ j\\" Y# ]+ Q</font><br />     }<br /> <span style=\\"display:none\\">9 r3 _\\" \4 H. l2 e! i6 I</span>     else<font class=\\"jammer\\">7 B8 {+ U* k8 H, `& ?( B</font><br />     {<font class=\\"jammer\\">1 e! h; b, m\\" I5 ^- Z4 G' e</font><br />         for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1<br /> <span style=\\"display:none\\">2 B$ i* Q: @\\" w( S5 b, k% v# j# D</span>         {<font class=\\"jammer\\">\\" U% J3 C6 V2 Z& e</font><br />             pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;<br /> <span style=\\"display:none\\">, m# v9 @' @5 n5 c# d</span>         }<font class=\\"jammer\\">% ?+ V: {& b( ?& r5 `& K+ {3 D# F% S</font><br />         Val=LuCal(hFor,pPara); //计算表达式的值<br /> <span style=\\"display:none\\">6 ]$ p1 i/ q3 F1 g- N- U</span>         cout<<Val.x<<endl;<br /> <span style=\\"display:none\\">, T9 G/ a, M/ Y</span>     }<font class=\\"jammer\\">6 W1 I& [. ]\\" \4 B</font><br />     FreeLu();      //释放Lu<br /> <span style=\\"display:none\\">- |9 `+ S* }5 F/ b& T) X8 @8 n</span> }

运行结果：
" N% `* x( h: m* _; L
2
请按任意键继续. . .
% ]3 z$ \7 X9 L+ |