查看: 8187|回复: 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>4 A U\\" J1 ?% C9 [ i3 L5 U3 r+ {
#include <iostream>0 @$ S( ~, Q2 ^# V7 Q8 ?, r; R& b+ z
#include <math.h>) _$ s7 v) N8 u3 I1 y0 f( x
#include "lu32.h" //Lu头文件, M* f) n! S) C9 y! u
6 M. V6 T u. p& \+ ]; V- B
#pragma comment( lib, "lu32.lib" )
7 B8 ?1 K5 n1 Q
2 n0 i1 \* P t2 T2 ~' |* A2 T
using namespace std;9 @' p1 _. Y# _+ e
6 e, X7 @3 S3 l8 D9 J U L
void main(void)
, [\\" w) I: B ~1 Y2 ?
{
7 t6 e' n, ]! M
void *hFor; //表达式句柄* z1 M+ |; P5 x) s/ ]' n3 A
luINT nPara; //存放表达式的自变量个数# q8 d6 y4 T: ^( w% s5 u- A4 F\\" _9 ^
LuData *pPara; //存放输入自变量的数组指针
- g$ M# T7 k, @+ q% C* M) ^5 F
LuData Val; //存放表达式的值
# j\\" \, T: g- \( \
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
9 X, y4 N; g9 J# Q# C) r\\" H, v3 C
int ErrCode; //错误代码8 r' S$ T+ e: f: |
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式\\" G9 b' |# q- j5 K
int i;# ?, A! ?# e5 x( s% Z! t! R
/ @3 [: I2 T6 i, o$ o3 `' L
if(!InitLu()) return; //初始化Lu0 a\\" @8 t: M/ | O
% k. | o' B& t* Y; H0 X
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
( B+ n1 q! T& W j
if(ErrCode)$ A4 I& J& u! u) _
{* c1 ]7 u+ i; J4 L\\" ]. @% z8 L6 A
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;
: \, l! o6 i; U! q
}6 `; v1 y, g: c6 h\\" d' N; v
else
% b o7 X+ U1 H! @! t! W5 o
{3 H: h. W+ s% W$ J# k
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1- J9 k% |& k\\" I$ \4 u2 X
{8 v\\" ^# _% ~+ v- l
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;* i+ I3 s/ L0 u; n
}+ I5 |0 G3 P5 ~\\" L/ z2 H @: e
Val=LuCal(hFor,pPara); //计算表达式的值/ y$ v E! s7 ?5 V( j8 M! r) |9 d
cout<<Val.x<<endl;- F/ G* l\\" k4 X* k\\" s. s% n
}
0 R( N& ]: p; @\\" E$ \
FreeLu(); //释放Lu
4 c3 h$ z\\" ^: u: {4 h
}

#include <windows.h>4 A  U\\" J1 ?% C9 [  i3 L5 U3 r+ {

#include <iostream>0 @$ S( ~, Q2 ^# V7 Q8 ?, r; R& b+ z

#include <math.h>) _$ s7 v) N8 u3 I1 y0 f( x

#include "lu32.h"  //Lu头文件, M* f) n! S) C9 y! u

6 M. V6 T  u. p& \+ ]; V- B

#pragma comment( lib, "lu32.lib" ) 
7 B8 ?1 K5 n1 Q
2 n0 i1 \* P  t2 T2 ~' |* A2 T

using namespace std;9 @' p1 _. Y# _+ e

6 e, X7 @3 S3 l8 D9 J  U  L

void main(void) 
, [\\" w) I: B  ~1 Y2 ?
{ 
7 t6 e' n, ]! M
    void *hFor;    //表达式句柄* z1 M+ |; P5 x) s/ ]' n3 A

luINT nPara;   //存放表达式的自变量个数# q8 d6 y4 T: ^( w% s5 u- A4 F\\" _9 ^

LuData *pPara; //存放输入自变量的数组指针 
- g$ M# T7 k, @+ q% C* M) ^5 F
    LuData Val;    //存放表达式的值 
# j\\" \, T: g- \( \
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置 
9 X, y4 N; g9 J# Q# C) r\\" H, v3 C
    int ErrCode;   //错误代码8 r' S$ T+ e: f: |

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式\\" G9 b' |# q- j5 K

int i;# ?, A! ?# e5 x( s% Z! t! R

/ @3 [: I2 T6 i, o$ o3 `' L
    if(!InitLu()) return; //初始化Lu0 a\\" @8 t: M/ |  O

% k. |  o' B& t* Y; H0 X
    ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
( B+ n1 q! T& W  j
    if(ErrCode)$ A4 I& J& u! u) _

{* c1 ]7 u+ i; J4 L\\" ]. @% z8 L6 A

cout<<"表达式有错误！错误代码："<<ErrCode<<endl; 
: \, l! o6 i; U! q
    }6 `; v1 y, g: c6 h\\" d' N; v

else 
% b  o7 X+ U1 H! @! t! W5 o
    {3 H: h. W+ s% W$ J# k

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1- J9 k% |& k\\" I$ \4 u2 X

{8 v\\" ^# _% ~+ v- l

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;* i+ I3 s/ L0 u; n

}+ I5 |0 G3 P5 ~\\" L/ z2 H  @: e

Val=LuCal(hFor,pPara); //计算表达式的值/ y$ v  E! s7 ?5 V( j8 M! r) |9 d

cout<<Val.x<<endl;- F/ G* l\\" k4 X* k\\" s. s% n

} 
0 R( N& ]: p; @\\" E$ \
    FreeLu();      //释放Lu 
4 c3 h$ z\\" ^: u: {4 h
}

运行结果：

2
请按任意键继续. . .

zan