查看: 8011|回复: 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>
: E& R3 s. S1 M, e7 I
#include <iostream>
9 ?/ a* I( E% j) s/ }2 _& H4 b4 ]( v
#include <math.h>/ C9 W: O# K0 Q; z3 g8 w! @- W
#include "lu32.h" //Lu头文件
1 ^. T- H/ l1 C A\\" V
o( r6 s, x\\" O
#pragma comment( lib, "lu32.lib" )8 r9 i$ U# o F/ f9 T
: I0 v8 ?; P9 p' V5 S0 L
using namespace std;8 J0 e! M8 N0 o# u% Z: t5 E
- d( k& k% Y\\" k. a, p
void main(void)\\" u+ [0 O- X7 _ U2 D7 y6 p
{* k, P- C5 H w, L5 Q0 N
void *hFor; //表达式句柄
$ e# D y9 L; q2 i' ~: Y$ _
luINT nPara; //存放表达式的自变量个数) H& S! S/ \% ~# x0 k9 i
LuData *pPara; //存放输入自变量的数组指针
; n1 `* D$ E9 m\\" _, }) a
LuData Val; //存放表达式的值
; z' i& C* ~2 T- M, M
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置; e\\" F5 {, z9 y/ v5 M& o
int ErrCode; //错误代码3 P }, Y5 R1 I) N s# n
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
, B9 L) f& i0 J2 f\\" j. _/ v3 n
int i;( d9 W7 r- v8 S, j( q
) q1 u+ D) N h: T2 o5 }
if(!InitLu()) return; //初始化Lu( g( _: c4 @\\" ?1 ?; N
% l. e) x! v\\" V4 M# L+ q1 `
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式. Z; U6 n G l0 \2 S6 }
if(ErrCode)8 R: H3 b u0 a, ], ^/ D( Z5 f
{9 U. Z: }6 F2 S( K' h: D1 r( }
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;* X. c7 Q0 b1 p% ^1 u- p; T
}
* q- A! x2 u2 Q; |7 q% T9 \# u/ h
else
: G% W, H2 L3 o( I: t4 ~. i7 T
{
: B5 M: t3 N8 ~1 q% H
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1# w# |7 q- f. G M. |: B: ]9 _
{
1 B% l. |6 f/ X% ^
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;# O4 E6 h+ B2 A0 h# j& K! ^$ A- X/ x
}! h/ d$ p. d) ?. _, u5 u! x
Val=LuCal(hFor,pPara); //计算表达式的值
; d1 i0 Z' W\\" Y3 g2 P/ f1 Z
cout<<Val.x<<endl;
; D, T) f; W1 u
}
4 v- c# ]1 j8 g
FreeLu(); //释放Lu- x! g E+ {8 U\\" Y n& [
}

#include <windows.h> 
: E& R3 s. S1 M, e7 I
#include <iostream> 
9 ?/ a* I( E% j) s/ }2 _& H4 b4 ]( v
#include <math.h>/ C9 W: O# K0 Q; z3 g8 w! @- W

#include "lu32.h"  //Lu头文件 
1 ^. T- H/ l1 C  A\\" V
 
  o( r6 s, x\\" O
#pragma comment( lib, "lu32.lib" )8 r9 i$ U# o  F/ f9 T

: I0 v8 ?; P9 p' V5 S0 L
using namespace std;8 J0 e! M8 N0 o# u% Z: t5 E

- d( k& k% Y\\" k. a, p
void main(void)\\" u+ [0 O- X7 _  U2 D7 y6 p

{* k, P- C5 H  w, L5 Q0 N

void *hFor;    //表达式句柄 
$ e# D  y9 L; q2 i' ~: Y$ _
    luINT nPara;   //存放表达式的自变量个数) H& S! S/ \% ~# x0 k9 i

LuData *pPara; //存放输入自变量的数组指针 
; n1 `* D$ E9 m\\" _, }) a
    LuData Val;    //存放表达式的值 
; z' i& C* ~2 T- M, M
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置; e\\" F5 {, z9 y/ v5 M& o

int ErrCode;   //错误代码3 P  }, Y5 R1 I) N  s# n

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
, B9 L) f& i0 J2 f\\" j. _/ v3 n
    int i;( d9 W7 r- v8 S, j( q

) q1 u+ D) N  h: T2 o5 }
    if(!InitLu()) return; //初始化Lu( g( _: c4 @\\" ?1 ?; N

% l. e) x! v\\" V4 M# L+ q1 `

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式. Z; U6 n  G  l0 \2 S6 }

if(ErrCode)8 R: H3 b  u0 a, ], ^/ D( Z5 f

{9 U. Z: }6 F2 S( K' h: D1 r( }

cout<<"表达式有错误！错误代码："<<ErrCode<<endl;* X. c7 Q0 b1 p% ^1 u- p; T

} 
* q- A! x2 u2 Q; |7 q% T9 \# u/ h
    else 
: G% W, H2 L3 o( I: t4 ~. i7 T
    { 
: B5 M: t3 N8 ~1 q% H
        for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1# w# |7 q- f. G  M. |: B: ]9 _

{ 
1 B% l. |6 f/ X% ^
            pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;# O4 E6 h+ B2 A0 h# j& K! ^$ A- X/ x

}! h/ d$ p. d) ?. _, u5 u! x

Val=LuCal(hFor,pPara); //计算表达式的值 
; d1 i0 Z' W\\" Y3 g2 P/ f1 Z
        cout<<Val.x<<endl; 
; D, T) f; W1 u
    } 
4 v- c# ]1 j8 g
    FreeLu();      //释放Lu- x! g  E+ {8 U\\" Y  n& [

}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式