查看: 8178|回复: 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>* ~( m a/ {% {# Z
#include <iostream>
- V2 \2 {1 B7 v( E* G$ U/ N
#include <math.h>
8 C8 K7 }\\" @% x. P4 X2 W, F
#include "lu32.h" //Lu头文件
4 Q! C! `6 k6 E1 o# W5 E
\\" v A1 Z1 z# {5 c5 L
#pragma comment( lib, "lu32.lib" )
- l# }1 ]$ }: e) K
: ^. G6 G( D7 }+ p- [/ w
using namespace std;
8 p3 j I( y* x$ T# p& i
0 ~# E/ C% Y5 u8 ~! u
void main(void)
1 d7 x, N; | A3 |; Z9 O
{
f; z: |' T- [6 n7 x
void *hFor; //表达式句柄
- p( R q' a' v\\" ]7 D( D
luINT nPara; //存放表达式的自变量个数5 f: f7 B d& Q2 P- M
LuData *pPara; //存放输入自变量的数组指针
' d% q) p/ k; j, L4 g
LuData Val; //存放表达式的值
\\" q0 v8 }1 E& e/ S# H- N/ P
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
6 h% n3 _8 Z0 n+ L4 r7 L1 ^
int ErrCode; //错误代码6 g/ P\\" c+ p! z& J+ M+ f
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式& b3 R8 T, L\\" U4 R) j8 M
int i;
4 O3 A$ O9 b. Y/ n `! B; ]
) ^3 [; Y* o. y& t* f7 m% m
if(!InitLu()) return; //初始化Lu* u* W0 R; P) H, k6 D$ e- I8 l7 I
R* K4 Y. j' M( V! Q
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
8 C0 Y( f9 D% [' V4 _: K: I( A* y; J
if(ErrCode)
2 U }' P8 |9 n x
{8 c3 W( E, G( j+ A' p( E5 v) n9 Y) t
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;6 }+ Z2 V( R+ g# t( ] ?
}
! B' Q( Z: E9 p* i' ~! o0 u* W' I' e
else. G% k$ m6 f7 D1 y
{' j3 Q( }, m! y/ `0 Y6 o: h4 n& _
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
8 M: k. }; d) @; B) q4 c+ p) B
{
) y+ j' M& b; F S5 d1 T g3 X8 t
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
& F6 v: B5 l# h l' \8 h
}
/ d3 |3 x( k& B$ D
Val=LuCal(hFor,pPara); //计算表达式的值4 T; ]2 i L\\" y) K. N& ^
cout<<Val.x<<endl;
5 ~2 H8 P G$ F8 N\\" K
}% G& q3 W$ U8 \0 `4 j: D
FreeLu(); //释放Lu+ t/ n8 u' s* Z
}

#include <windows.h>* ~( m  a/ {% {# Z

#include <iostream> 
- V2 \2 {1 B7 v( E* G$ U/ N
#include <math.h> 
8 C8 K7 }\\" @% x. P4 X2 W, F
#include "lu32.h"  //Lu头文件 
4 Q! C! `6 k6 E1 o# W5 E
 
\\" v  A1 Z1 z# {5 c5 L
#pragma comment( lib, "lu32.lib" ) 
- l# }1 ]$ }: e) K
 
: ^. G6 G( D7 }+ p- [/ w
using namespace std; 
8 p3 j  I( y* x$ T# p& i
 
0 ~# E/ C% Y5 u8 ~! u
void main(void) 
1 d7 x, N; |  A3 |; Z9 O
{ 
  f; z: |' T- [6 n7 x
    void *hFor;    //表达式句柄 
- p( R  q' a' v\\" ]7 D( D
    luINT nPara;   //存放表达式的自变量个数5 f: f7 B  d& Q2 P- M

LuData *pPara; //存放输入自变量的数组指针 
' d% q) p/ k; j, L4 g
    LuData Val;    //存放表达式的值 
\\" q0 v8 }1 E& e/ S# H- N/ P
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置 
6 h% n3 _8 Z0 n+ L4 r7 L1 ^
    int ErrCode;   //错误代码6 g/ P\\" c+ p! z& J+ M+ f

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式& b3 R8 T, L\\" U4 R) j8 M

int i; 
4 O3 A$ O9 b. Y/ n  `! B; ]
 
) ^3 [; Y* o. y& t* f7 m% m
    if(!InitLu()) return; //初始化Lu* u* W0 R; P) H, k6 D$ e- I8 l7 I

R* K4 Y. j' M( V! Q

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
8 C0 Y( f9 D% [' V4 _: K: I( A* y; J
    if(ErrCode) 
2 U  }' P8 |9 n  x
    {8 c3 W( E, G( j+ A' p( E5 v) n9 Y) t

cout<<"表达式有错误！错误代码："<<ErrCode<<endl;6 }+ Z2 V( R+ g# t( ]  ?

} 
! B' Q( Z: E9 p* i' ~! o0 u* W' I' e
    else. G% k$ m6 f7 D1 y

{' j3 Q( }, m! y/ `0 Y6 o: h4 n& _

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
8 M: k. }; d) @; B) q4 c+ p) B
        { 
) y+ j' M& b; F  S5 d1 T  g3 X8 t
            pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
& F6 v: B5 l# h  l' \8 h
        } 
/ d3 |3 x( k& B$ D
        Val=LuCal(hFor,pPara); //计算表达式的值4 T; ]2 i  L\\" y) K. N& ^

cout<<Val.x<<endl; 
5 ~2 H8 P  G$ F8 N\\" K
    }% G& q3 W$ U8 \0 `4 j: D

FreeLu();      //释放Lu+ t/ n8 u' s* Z

}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式