查看: 7958|回复: 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>+ ]2 T, z+ r3 P4 E+ n9 b
#include <iostream>
$ D9 [% {& ~2 g# ^% A
#include <math.h>2 G0 G. A: q$ |( R
#include "lu32.h" //Lu头文件
\\" K8 G' X& ]9 R# C
1 l- E- c4 ^: w$ _3 q. _3 O: D
#pragma comment( lib, "lu32.lib" ): ~% z\\" n, n5 b9 v
8 z& o3 {3 I4 S! X G5 m! [* \
using namespace std;! q/ Z9 B4 i/ A$ E) r- M. q
; B& L' j r5 `
void main(void)8 a8 T1 m\\" x7 T+ g- X
{% R& m' ]: A; Y& K7 a) M3 i# t
void *hFor; //表达式句柄
\\" ~; _( Z* e5 _8 {. x, v/ [
luINT nPara; //存放表达式的自变量个数8 c( z( Q. U! ]+ h\\" W: Y
LuData *pPara; //存放输入自变量的数组指针0 `: Z; D v- [\\" L6 N, Q8 O
LuData Val; //存放表达式的值4 J4 N$ G8 V- L
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置% S3 @3 A: R8 g z9 x: d
int ErrCode; //错误代码
$ m9 K6 t2 ]6 a& _, a# Z
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
U) @/ o7 \1 C- i) l
int i;
6 k- ~\\" F! l- g
& [/ J( G& Q( M! V! S$ o7 h1 j
if(!InitLu()) return; //初始化Lu
0 p/ y* v2 s$ t- t4 G+ k( K. `
9 W# A# U: g( w1 b7 [
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式6 y+ @; e, c* f
if(ErrCode)
0 f I. ?7 }7 g' I
{- t: N% w- I. i T
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;
B7 q) h% I) ? }% N, P: }
}
% m9 ]6 v/ \! B( L1 ^1 \/ C* S% v9 u
else. a! q\\" z e2 _% s2 Z* Q
{
* l) ?0 S+ n: I! F
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
, Z, L! i# a- a( I3 J1 I8 ]7 m3 |
{
* L1 s- a p0 @# _4 _8 ^
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;7 }1 q% W# ?, D6 R+ P
}( ~# K& y5 [ o B# k: M& B# R
Val=LuCal(hFor,pPara); //计算表达式的值
3 h- {0 Q1 j# _1 p4 J: l% Q, }
cout<<Val.x<<endl;5 @: b, S( h% P* W1 s# x4 r) z$ [ A6 _
}* B a& S3 [& t' V1 {+ I; u
FreeLu(); //释放Lu) m6 y# x- K ~
}

#include <windows.h>+ ]2 T, z+ r3 P4 E+ n9 b

#include <iostream> 
$ D9 [% {& ~2 g# ^% A
#include <math.h>2 G0 G. A: q$ |( R

#include "lu32.h"  //Lu头文件 
\\" K8 G' X& ]9 R# C
1 l- E- c4 ^: w$ _3 q. _3 O: D

#pragma comment( lib, "lu32.lib" ): ~% z\\" n, n5 b9 v

8 z& o3 {3 I4 S! X  G5 m! [* \

using namespace std;! q/ Z9 B4 i/ A$ E) r- M. q

; B& L' j  r5 `
void main(void)8 a8 T1 m\\" x7 T+ g- X

{% R& m' ]: A; Y& K7 a) M3 i# t

void *hFor;    //表达式句柄 
\\" ~; _( Z* e5 _8 {. x, v/ [
    luINT nPara;   //存放表达式的自变量个数8 c( z( Q. U! ]+ h\\" W: Y

LuData *pPara; //存放输入自变量的数组指针0 `: Z; D  v- [\\" L6 N, Q8 O

LuData Val;    //存放表达式的值4 J4 N$ G8 V- L

luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置% S3 @3 A: R8 g  z9 x: d

int ErrCode;   //错误代码 
$ m9 K6 t2 ]6 a& _, a# Z
    wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
  U) @/ o7 \1 C- i) l
    int i; 
6 k- ~\\" F! l- g
& [/ J( G& Q( M! V! S$ o7 h1 j

if(!InitLu()) return; //初始化Lu 
0 p/ y* v2 s$ t- t4 G+ k( K. `
9 W# A# U: g( w1 b7 [

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式6 y+ @; e, c* f

if(ErrCode) 
0 f  I. ?7 }7 g' I
    {- t: N% w- I. i  T

cout<<"表达式有错误！错误代码："<<ErrCode<<endl; 
  B7 q) h% I) ?  }% N, P: }
    } 
% m9 ]6 v/ \! B( L1 ^1 \/ C* S% v9 u
    else. a! q\\" z  e2 _% s2 Z* Q

{ 
* l) ?0 S+ n: I! F
        for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
, Z, L! i# a- a( I3 J1 I8 ]7 m3 |
        { 
* L1 s- a  p0 @# _4 _8 ^
            pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;7 }1 q% W# ?, D6 R+ P

}( ~# K& y5 [  o  B# k: M& B# R

Val=LuCal(hFor,pPara); //计算表达式的值 
3 h- {0 Q1 j# _1 p4 J: l% Q, }
        cout<<Val.x<<endl;5 @: b, S( h% P* W1 s# x4 r) z$ [  A6 _

}* B  a& S3 [& t' V1 {+ I; u

FreeLu();      //释放Lu) m6 y# x- K  ~

}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式