查看: 8184|回复: 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>
! W\\" ?\\" [- L. O\\" i
#include <iostream>4 T U& Z! R4 _
#include <math.h>
\\" m1 q! m. Y% ?. m2 h
#include "lu32.h" //Lu头文件9 [& W0 g8 ~/ v1 ?
( C; @+ V6 c, k4 ?& }3 m5 {
#pragma comment( lib, "lu32.lib" ); ] Q% z6 v4 x6 X+ t) m7 p; W
; x5 `4 L\\" V9 d6 C* }8 K3 q% R
using namespace std;
, W( M+ g& z; P
V4 i2 Q/ X U( S( H$ a
void main(void); P7 ?. X5 F5 F6 B* W
{
7 I' g3 z5 q2 T8 W- D- }, k
void *hFor; //表达式句柄$ w9 c1 \. o( Q$ |& Q+ V8 p) O
luINT nPara; //存放表达式的自变量个数0 u% Q4 u: T9 q) m7 F8 i$ f# a
LuData *pPara; //存放输入自变量的数组指针$ q2 N5 H2 S3 |6 \
LuData Val; //存放表达式的值: W2 N5 t& n8 e; K$ n: `
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
6 n2 Y8 T+ T5 x
int ErrCode; //错误代码) P/ P! [: n3 x, Y& O8 ]3 h, g3 j, z
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
5 A. S* k# r; W
int i;
& |9 I1 O5 r7 h1 W6 t
+ x4 i+ i; V/ p0 M, _0 J& t- B5 }/ G
if(!InitLu()) return; //初始化Lu
7 ?8 k2 j9 L7 t8 H\\" p7 v4 w3 d, i
& K1 {! Z$ m) v
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
( Q& ?2 ~/ U; v5 |
if(ErrCode)) K3 v/ w+ j/ e1 I5 n( d
{
) N. J1 }9 U2 P: V* @0 s
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;
# L: K; `4 p* l' j4 w: u, a
}5 t: p; m' X& t& r8 o
else
' E. H: J0 {* h! D' ~ W
{
6 N* g# `4 y+ q y
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
+ n! U4 Y p4 t5 s+ s& _
{, \: _- q z8 X
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
5 q8 C) ?, R% c6 W1 F7 [
}0 c/ }6 d$ N) C4 p
Val=LuCal(hFor,pPara); //计算表达式的值
6 }, M5 p- g. _9 C! v0 n
cout<<Val.x<<endl;
7 G7 S2 q) M) `7 b7 i* X\\" s
}; i, f. n. D4 U
FreeLu(); //释放Lu
7 ?8 ]& Y+ ?- G8 t3 u: e c* J1 c( }
}

#include <windows.h> 
! W\\" ?\\" [- L. O\\" i
#include <iostream>4 T  U& Z! R4 _

#include <math.h> 
\\" m1 q! m. Y% ?. m2 h
#include "lu32.h"  //Lu头文件9 [& W0 g8 ~/ v1 ?

( C; @+ V6 c, k4 ?& }3 m5 {

#pragma comment( lib, "lu32.lib" ); ]  Q% z6 v4 x6 X+ t) m7 p; W

; x5 `4 L\\" V9 d6 C* }8 K3 q% R
using namespace std; 
, W( M+ g& z; P
 
  V4 i2 Q/ X  U( S( H$ a
void main(void); P7 ?. X5 F5 F6 B* W

{ 
7 I' g3 z5 q2 T8 W- D- }, k
    void *hFor;    //表达式句柄$ w9 c1 \. o( Q$ |& Q+ V8 p) O

luINT nPara;   //存放表达式的自变量个数0 u% Q4 u: T9 q) m7 F8 i$ f# a

LuData *pPara; //存放输入自变量的数组指针$ q2 N5 H2 S3 |6 \

LuData Val;    //存放表达式的值: W2 N5 t& n8 e; K$ n: `

luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置 
6 n2 Y8 T+ T5 x
    int ErrCode;   //错误代码) P/ P! [: n3 x, Y& O8 ]3 h, g3 j, z

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
5 A. S* k# r; W
    int i; 
& |9 I1 O5 r7 h1 W6 t
+ x4 i+ i; V/ p0 M, _0 J& t- B5 }/ G

if(!InitLu()) return; //初始化Lu 
7 ?8 k2 j9 L7 t8 H\\" p7 v4 w3 d, i
 
& K1 {! Z$ m) v
    ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
( Q& ?2 ~/ U; v5 |
    if(ErrCode)) K3 v/ w+ j/ e1 I5 n( d

{ 
) N. J1 }9 U2 P: V* @0 s
        cout<<"表达式有错误！错误代码："<<ErrCode<<endl; 
# L: K; `4 p* l' j4 w: u, a
    }5 t: p; m' X& t& r8 o

else 
' E. H: J0 {* h! D' ~  W
    { 
6 N* g# `4 y+ q  y
        for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
+ n! U4 Y  p4 t5 s+ s& _
        {, \: _- q  z8 X

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
5 q8 C) ?, R% c6 W1 F7 [
        }0 c/ }6 d$ N) C4 p

Val=LuCal(hFor,pPara); //计算表达式的值 
6 }, M5 p- g. _9 C! v0 n
        cout<<Val.x<<endl; 
7 G7 S2 q) M) `7 b7 i* X\\" s
    }; i, f. n. D4 U

FreeLu();      //释放Lu 
7 ?8 ]& Y+ ?- G8 t3 u: e  c* J1 c( }
}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式