查看: 8181|回复: 0

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

[复制链接]

字体大小: 正常放大

forcal

45 主题	3 听众	282 积分

升级 91%

TA的每日心情

	难过 2012-8-27 18:22

签到天数: 1 天

[LV.1]初来乍到

电梯直达

1^#

发表于 2011-10-19 21:30 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

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

仅需要以下支持文件：

1、头文件lu32.h。
2、导入库lu32.lib。
3、核心库lu32.dll。

#include <windows.h>
5 v# w! C+ o5 |\\" d6 U
#include <iostream>* e; x( k- Y\\" s/ [8 U# E) X
#include <math.h>: t! k( K' y+ Z4 b
#include "lu32.h" //Lu头文件! q% V: w5 r2 `4 f. y1 e; V) ^
1 |* N& t\\" S1 _( X
#pragma comment( lib, "lu32.lib" )
5 K! ?! ~$ F. o6 l4 {% R
2 S. u% E8 M$ r& {
using namespace std;4 o+ y% x, u6 d! z7 a c
4 R, A\\" k) T4 y7 D
void main(void)
a& s) x\\" h5 Q; t
{
3 B\\" d- Q6 W1 R
void *hFor; //表达式句柄\\" S i8 X3 M9 P8 x$ p
luINT nPara; //存放表达式的自变量个数
* ?) \. E+ d: l& }, T
LuData *pPara; //存放输入自变量的数组指针& C* O& G# l$ @; x/ w! \
LuData Val; //存放表达式的值1 t4 g% z, B% p% } A3 f: @ {' ~
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置1 A0 r. }! ^3 r# g* s3 Q
int ErrCode; //错误代码% `. }2 ^, y- F
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式2 h1 j9 ]8 {! Z/ `; }' U6 ~$ N) m\\" D
int i;+ O/ H6 ]8 q( t! M
4 P, K3 Z. I+ c. p1 G1 _8 J
if(!InitLu()) return; //初始化Lu
0 g* T1 R% A) N! Z5 R
! @0 ~+ v9 j7 D; u5 e% R4 T
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式8 E3 S% g7 u) ^' _1 g# I, Q0 |
if(ErrCode)
1 ^) C1 q- z\\" D
{& `( _7 n% E8 d: V; i, V5 N7 g
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;. q+ X: h' j3 }\\" K, t
}! d- _ C; o- a. d
else5 Y( W; L @$ Z% X
{
7 W2 k\\" ?0 S' ^) b9 p* T
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
, k! q5 @1 R+ Z: Z1 R5 o L* x
{) M! b$ ]# m I4 G+ ]
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;' S `9 r2 w$ j, ~
}
, R\\" X9 D2 \0 L/ `4 h
Val=LuCal(hFor,pPara); //计算表达式的值4 }; m o6 q% c9 d* D6 j
cout<<Val.x<<endl;1 O. I, N& ]' |5 }6 X; l
}2 {& b: I1 j! b+ \2 J7 `! |% ?6 K- [
FreeLu(); //释放Lu3 S; c' @7 y0 Q0 _. e/ w\\" c, t
}

#include <windows.h> 
5 v# w! C+ o5 |\\" d6 U
#include <iostream>* e; x( k- Y\\" s/ [8 U# E) X

#include <math.h>: t! k( K' y+ Z4 b

#include "lu32.h"  //Lu头文件! q% V: w5 r2 `4 f. y1 e; V) ^

1 |* N& t\\" S1 _( X

#pragma comment( lib, "lu32.lib" ) 
5 K! ?! ~$ F. o6 l4 {% R
2 S. u% E8 M$ r& {

using namespace std;4 o+ y% x, u6 d! z7 a  c

4 R, A\\" k) T4 y7 D

void main(void) 
  a& s) x\\" h5 Q; t
{ 
3 B\\" d- Q6 W1 R
    void *hFor;    //表达式句柄\\" S  i8 X3 M9 P8 x$ p

luINT nPara;   //存放表达式的自变量个数 
* ?) \. E+ d: l& }, T
    LuData *pPara; //存放输入自变量的数组指针& C* O& G# l$ @; x/ w! \

LuData Val;    //存放表达式的值1 t4 g% z, B% p% }  A3 f: @  {' ~

luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置1 A0 r. }! ^3 r# g* s3 Q

int ErrCode;   //错误代码% `. }2 ^, y- F

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式2 h1 j9 ]8 {! Z/ `; }' U6 ~$ N) m\\" D

int i;+ O/ H6 ]8 q( t! M

4 P, K3 Z. I+ c. p1 G1 _8 J
    if(!InitLu()) return; //初始化Lu 
0 g* T1 R% A) N! Z5 R
 
! @0 ~+ v9 j7 D; u5 e% R4 T
    ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式8 E3 S% g7 u) ^' _1 g# I, Q0 |

if(ErrCode) 
1 ^) C1 q- z\\" D
    {& `( _7 n% E8 d: V; i, V5 N7 g

cout<<"表达式有错误！错误代码："<<ErrCode<<endl;. q+ X: h' j3 }\\" K, t

}! d- _  C; o- a. d

else5 Y( W; L  @$ Z% X

{ 
7 W2 k\\" ?0 S' ^) b9 p* T
        for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
, k! q5 @1 R+ Z: Z1 R5 o  L* x
        {) M! b$ ]# m  I4 G+ ]

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;' S  `9 r2 w$ j, ~

} 
, R\\" X9 D2 \0 L/ `4 h
        Val=LuCal(hFor,pPara); //计算表达式的值4 }; m  o6 q% c9 d* D6 j

cout<<Val.x<<endl;1 O. I, N& ]' |5 }6 X; l

}2 {& b: I1 j! b+ \2 J7 `! |% ?6 K- [

FreeLu();      //释放Lu3 S; c' @7 y0 Q0 _. e/ w\\" c, t

}

运行结果：

2
请按任意键继续. . .