查看: 7954|回复: 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>+ H; L/ S6 E: D
#include <iostream>
( r( s* E1 g1 R+ R* P/ @* X& g
#include <math.h>
+ D F, }: L, ~5 h4 ^* u$ o+ M
#include "lu32.h" //Lu头文件$ {3 A' l( H% h, Y# d: w
4 D* `0 @9 ~1 W
#pragma comment( lib, "lu32.lib" )) r0 w% b\\" e4 u- |5 l; {8 X1 x
3 E# b1 p\\" S+ C# P5 O$ q
using namespace std;/ G' L- T$ c; B
* @ |6 Z2 B% l* b3 l; r\\" Z
void main(void)3 ]' s( L$ K! l$ S& ^3 A7 W
{
, L! y% A3 M3 _8 f$ @
void *hFor; //表达式句柄
( A' O5 q' r! y. q: L0 |; E O5 S
luINT nPara; //存放表达式的自变量个数
LuData *pPara; //存放输入自变量的数组指针\\" R5 i3 A) z+ `# D0 q5 T8 g1 K
LuData Val; //存放表达式的值
% Q& \1 M# }7 k6 t* z4 g2 C2 K
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
& A. a% \* c1 R9 N! |# C6 n5 b, d
int ErrCode; //错误代码
' e' o3 X0 g9 N: K1 k( a8 ~5 k
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式# M& f, {# ?- H
int i;4 q# {# w' g\\" ^. n% e/ S& Q
) [8 l8 n3 t/ i/ Q# F& ]/ n
if(!InitLu()) return; //初始化Lu
1 P. F; G7 Y) F/ @9 F7 k5 R8 ?
) l; N7 G2 e; Q5 w: x
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
\\" O2 A2 I' g, a- [, R, Y
if(ErrCode)2 O7 e& O8 n3 T% a
{
- m\\" w\\" t! }; `% L* Q: E- o9 m% _
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;: P\\" w3 u! H: W\\" l
}
6 d\\" l! \! I7 v
else2 ^4 |6 h/ |& z, w\\" P& x
{
. x. t5 S9 {8 I. c
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1* M( L& u/ m# U& U) m% ^% [9 y
{
3 @6 ^0 [; N2 `2 q+ B8 F0 q
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
- I- V' y2 T% v\\" j3 X! x
}+ |- \1 S2 o/ d* G. K
Val=LuCal(hFor,pPara); //计算表达式的值
4 C Q. C/ n( I* U
cout<<Val.x<<endl;+ h4 H: t$ z% Y
}
& E4 }+ \% O+ l% a
FreeLu(); //释放Lu0 C L0 R( y5 [
}

#include <windows.h>+ H; L/ S6 E: D

#include <iostream> 
( r( s* E1 g1 R+ R* P/ @* X& g
#include <math.h> 
+ D  F, }: L, ~5 h4 ^* u$ o+ M
#include "lu32.h"  //Lu头文件$ {3 A' l( H% h, Y# d: w

4 D* `0 @9 ~1 W
#pragma comment( lib, "lu32.lib" )) r0 w% b\\" e4 u- |5 l; {8 X1 x

3 E# b1 p\\" S+ C# P5 O$ q
using namespace std;/ G' L- T$ c; B

* @  |6 Z2 B% l* b3 l; r\\" Z

void main(void)3 ]' s( L$ K! l$ S& ^3 A7 W

{ 
, L! y% A3 M3 _8 f$ @
    void *hFor;    //表达式句柄 
( A' O5 q' r! y. q: L0 |; E  O5 S
    luINT nPara;   //存放表达式的自变量个数 
- V\\" S! }- [5 o\\" y  z5 ?( T! P& b3 @
    LuData *pPara; //存放输入自变量的数组指针\\" R5 i3 A) z+ `# D0 q5 T8 g1 K

LuData Val;    //存放表达式的值 
% Q& \1 M# }7 k6 t* z4 g2 C2 K
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置 
& A. a% \* c1 R9 N! |# C6 n5 b, d
    int ErrCode;   //错误代码 
' e' o3 X0 g9 N: K1 k( a8 ~5 k
    wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式# M& f, {# ?- H

int i;4 q# {# w' g\\" ^. n% e/ S& Q

) [8 l8 n3 t/ i/ Q# F& ]/ n
    if(!InitLu()) return; //初始化Lu 
1 P. F; G7 Y) F/ @9 F7 k5 R8 ?
) l; N7 G2 e; Q5 w: x

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
\\" O2 A2 I' g, a- [, R, Y
    if(ErrCode)2 O7 e& O8 n3 T% a

{ 
- m\\" w\\" t! }; `% L* Q: E- o9 m% _
        cout<<"表达式有错误！错误代码："<<ErrCode<<endl;: P\\" w3 u! H: W\\" l

} 
6 d\\" l! \! I7 v
    else2 ^4 |6 h/ |& z, w\\" P& x

{ 
. x. t5 S9 {8 I. c
        for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1* M( L& u/ m# U& U) m% ^% [9 y

{ 
3 @6 ^0 [; N2 `2 q+ B8 F0 q
            pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
- I- V' y2 T% v\\" j3 X! x
        }+ |- \1 S2 o/ d* G. K

Val=LuCal(hFor,pPara); //计算表达式的值 
4 C  Q. C/ n( I* U
        cout<<Val.x<<endl;+ h4 H: t$ z% Y

} 
& E4 }+ \% O+ l% a
    FreeLu();      //释放Lu0 C  L0 R( y5 [

}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式