查看: 7965|回复: 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>( B7 o+ a$ p! g( }# S* l4 {6 d
#include <iostream>& ]$ y N' L% G& p
#include <math.h>6 {4 ]: _* F% f9 E- d
#include "lu32.h" //Lu头文件
# m! \( ^$ ^\\" I7 U7 I$ b) `
\\" r L2 y' T N/ F' X
#pragma comment( lib, "lu32.lib" )$ E. c5 v: x2 Z
) K1 U! D+ }- c u3 u: h) ~
using namespace std;
! d9 w! Y0 T8 s; @. F+ b
) E8 P2 d* H2 C3 E1 @
void main(void)* n3 { J s2 Y {' U
{3 Z' X1 J2 @4 W& h( t- H
void *hFor; //表达式句柄
! {% b7 ~2 x' ^8 l2 Z: ^, ^7 h% U
luINT nPara; //存放表达式的自变量个数, W V. W }9 H) F0 H; H3 @
LuData *pPara; //存放输入自变量的数组指针
0 C& H5 a- I6 S' U
LuData Val; //存放表达式的值0 c7 u1 b1 G9 ?
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置6 T& ^( B! F, J; ^3 ~2 \
int ErrCode; //错误代码5 z# ~9 W% A* Z+ ~
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
$ }. N% ?; G& B E( O; q
int i;
6 `3 K4 j J& ?
/ i( x/ t/ D/ R/ c% y
if(!InitLu()) return; //初始化Lu
8 p( c/ D' b9 |/ T
) v9 I8 A9 x w# g3 s6 _7 d; }
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式; B, r ?+ j5 u: T/ `1 z9 _: h0 G6 Y
if(ErrCode)
# M/ C+ V9 v7 f9 ~' T* q
{; ?5 G6 H! h a* ` y5 M; L
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;& P6 s% ]/ c1 {
}
+ X- {3 c* s4 m
else4 F1 m' r2 K\\" ]' C1 K
{; e3 E% _7 j/ h `# u
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
( X/ t% c' G/ Q. x\\" u* ?
{6 j( ^9 E. j; ]: X- b ^2 J
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;& g+ s- w$ f\\" W6 v8 m* E; _, K
}* \' ~4 m\\" E3 r* g' l1 z. x' V
Val=LuCal(hFor,pPara); //计算表达式的值/ q( x& P8 u9 l( g! u# ~, o- p
cout<<Val.x<<endl;; `3 f+ V# U' q$ p- g8 C7 w
}
+ d& z: `- F/ x/ _
FreeLu(); //释放Lu
$ L. y, i Z3 o2 w% C [# r
}

#include <windows.h>( B7 o+ a$ p! g( }# S* l4 {6 d

#include <iostream>& ]$ y  N' L% G& p

#include <math.h>6 {4 ]: _* F% f9 E- d

#include "lu32.h"  //Lu头文件 
# m! \( ^$ ^\\" I7 U7 I$ b) `
\\" r  L2 y' T  N/ F' X

#pragma comment( lib, "lu32.lib" )$ E. c5 v: x2 Z

) K1 U! D+ }- c  u3 u: h) ~
using namespace std; 
! d9 w! Y0 T8 s; @. F+ b
) E8 P2 d* H2 C3 E1 @

void main(void)* n3 {  J  s2 Y  {' U

{3 Z' X1 J2 @4 W& h( t- H

void *hFor;    //表达式句柄 
! {% b7 ~2 x' ^8 l2 Z: ^, ^7 h% U
    luINT nPara;   //存放表达式的自变量个数, W  V. W  }9 H) F0 H; H3 @

LuData *pPara; //存放输入自变量的数组指针 
0 C& H5 a- I6 S' U
    LuData Val;    //存放表达式的值0 c7 u1 b1 G9 ?

luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置6 T& ^( B! F, J; ^3 ~2 \

int ErrCode;   //错误代码5 z# ~9 W% A* Z+ ~

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
$ }. N% ?; G& B  E( O; q
    int i; 
6 `3 K4 j  J& ?
/ i( x/ t/ D/ R/ c% y

if(!InitLu()) return; //初始化Lu 
8 p( c/ D' b9 |/ T
 
) v9 I8 A9 x  w# g3 s6 _7 d; }
    ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式; B, r  ?+ j5 u: T/ `1 z9 _: h0 G6 Y

if(ErrCode) 
# M/ C+ V9 v7 f9 ~' T* q
    {; ?5 G6 H! h  a* `  y5 M; L

cout<<"表达式有错误！错误代码："<<ErrCode<<endl;& P6 s% ]/ c1 {

} 
+ X- {3 c* s4 m
    else4 F1 m' r2 K\\" ]' C1 K

{; e3 E% _7 j/ h  `# u

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
( X/ t% c' G/ Q. x\\" u* ?
        {6 j( ^9 E. j; ]: X- b  ^2 J

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;& g+ s- w$ f\\" W6 v8 m* E; _, K

}* \' ~4 m\\" E3 r* g' l1 z. x' V

Val=LuCal(hFor,pPara); //计算表达式的值/ q( x& P8 u9 l( g! u# ~, o- p

cout<<Val.x<<endl;; `3 f+ V# U' q$ p- g8 C7 w

} 
+ d& z: `- F/ x/ _
    FreeLu();      //释放Lu 
$ L. y, i  Z3 o2 w% C  [# r
}

运行结果：

2
请按任意键继续. . .

zan