查看: 8002|回复: 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># n; E5 l+ o& L W A, S- S
#include <iostream>
( x9 {; P( p' g& }' l# c
#include <math.h>( E: u4 {8 U$ B6 t
#include "lu32.h" //Lu头文件
8 M& K0 o9 ]( @8 k' Q! e* g( \5 i* T
, z+ X J4 Y- Y6 f
#pragma comment( lib, "lu32.lib" )
; Q1 Y: N% h/ S S+ u7 ?* v6 T\\" ]
3 ]2 v- f4 n! M5 Q+ F6 c
using namespace std;
% R% l! h) j2 d: b! y& o
6 T! Q4 K }% n4 C5 m
void main(void)3 L5 C8 W: I( S6 W
{7 B$ [! u) z' C
void *hFor; //表达式句柄\\" c\\" L, p9 ^) Q) z* W' d2 a
luINT nPara; //存放表达式的自变量个数
: H' _. ^# U. s3 T# ^$ I
LuData *pPara; //存放输入自变量的数组指针
! ^# e g- S: ^8 p% N
LuData Val; //存放表达式的值
! A, L, }' t: v# Z
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置* Q/ W$ L9 ?- U! @3 ] \, \0 f
int ErrCode; //错误代码7 v% z+ a\\" }$ I) q) g
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
3 |* Q P/ r4 z8 D5 W8 n* q2 b
int i;( M. |5 o- C9 t2 l. m
& J7 x: o- _1 a S& I$ i- q
if(!InitLu()) return; //初始化Lu! K0 h+ z) h\\" A, `7 q! o9 Q- I
9 x, t$ i! P* D3 R$ o5 R4 {\\" ?+ W7 k
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
* {; t# |3 ~2 p4 Q* q4 l, o) G
if(ErrCode)
2 n8 c K3 F5 R m+ a! r- h
{5 w A( F9 ], Z& E& E* y4 [, Z
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;6 v. S; k# C4 g. @7 |
}0 E* F) ?1 O! v+ C/ D9 `6 l+ y
else1 E8 M8 a9 h7 V) i, U\\" g* ~( v( Q* p
{
: ~0 l. C( N% p3 _
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1% Q+ D3 V% F9 }, z
{! Y\\" F* c% b\\" C8 Y; k
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
$ l1 v; y* `# F! @6 x1 W
}* q$ x0 ~5 a% P& @1 t6 u- |
Val=LuCal(hFor,pPara); //计算表达式的值2 |6 Y) r0 M9 l3 E1 [( [
cout<<Val.x<<endl;
( j Z$ |1 W0 h( D, E0 }
}
\\" k3 Y$ ]5 U: D+ {; F, h7 B\\" N
FreeLu(); //释放Lu
& S7 f' x: B8 ]* }
}

#include <windows.h># n; E5 l+ o& L  W  A, S- S

#include <iostream> 
( x9 {; P( p' g& }' l# c
#include <math.h>( E: u4 {8 U$ B6 t

#include "lu32.h"  //Lu头文件 
8 M& K0 o9 ]( @8 k' Q! e* g( \5 i* T
 
, z+ X  J4 Y- Y6 f
#pragma comment( lib, "lu32.lib" ) 
; Q1 Y: N% h/ S  S+ u7 ?* v6 T\\" ]
 
3 ]2 v- f4 n! M5 Q+ F6 c
using namespace std; 
% R% l! h) j2 d: b! y& o
 
6 T! Q4 K  }% n4 C5 m
void main(void)3 L5 C8 W: I( S6 W

{7 B$ [! u) z' C

void *hFor;    //表达式句柄\\" c\\" L, p9 ^) Q) z* W' d2 a

luINT nPara;   //存放表达式的自变量个数 
: H' _. ^# U. s3 T# ^$ I
    LuData *pPara; //存放输入自变量的数组指针 
! ^# e  g- S: ^8 p% N
    LuData Val;    //存放表达式的值 
! A, L, }' t: v# Z
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置* Q/ W$ L9 ?- U! @3 ]  \, \0 f

int ErrCode;   //错误代码7 v% z+ a\\" }$ I) q) g

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
3 |* Q  P/ r4 z8 D5 W8 n* q2 b
    int i;( M. |5 o- C9 t2 l. m

& J7 x: o- _1 a  S& I$ i- q

if(!InitLu()) return; //初始化Lu! K0 h+ z) h\\" A, `7 q! o9 Q- I

9 x, t$ i! P* D3 R$ o5 R4 {\\" ?+ W7 k

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
* {; t# |3 ~2 p4 Q* q4 l, o) G
    if(ErrCode) 
2 n8 c  K3 F5 R  m+ a! r- h
    {5 w  A( F9 ], Z& E& E* y4 [, Z

cout<<"表达式有错误！错误代码："<<ErrCode<<endl;6 v. S; k# C4 g. @7 |

}0 E* F) ?1 O! v+ C/ D9 `6 l+ y

else1 E8 M8 a9 h7 V) i, U\\" g* ~( v( Q* p

{ 
: ~0 l. C( N% p3 _
        for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1% Q+ D3 V% F9 }, z

{! Y\\" F* c% b\\" C8 Y; k

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
$ l1 v; y* `# F! @6 x1 W
        }* q$ x0 ~5 a% P& @1 t6 u- |

Val=LuCal(hFor,pPara); //计算表达式的值2 |6 Y) r0 M9 l3 E1 [( [

cout<<Val.x<<endl; 
( j  Z$ |1 W0 h( D, E0 }
    } 
\\" k3 Y$ ]5 U: D+ {; F, h7 B\\" N
    FreeLu();      //释放Lu 
& S7 f' x: B8 ]* }
}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式