查看: 7956|回复: 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>
, U- y# I) T$ T- x/ p0 h
#include <iostream>7 [# j1 n/ Z1 j$ } F' T2 t8 a
#include <math.h>
+ J: `9 T+ \- ~4 n6 \
#include "lu32.h" //Lu头文件1 G- C9 x2 E! I4 \
0 e/ O+ p\\" R+ h) Y) `; C/ p
#pragma comment( lib, "lu32.lib" )
7 f8 b) l- S& b, \( |3 w* b
: t. p, A2 A- e0 @
using namespace std;
- s- L, @\\" s/ l
( G+ v5 @/ J/ y+ S+ W/ t: w; R. r
void main(void), j5 P2 z( f- [; a, W. F4 {* \
{
1 i. `\\" |! `% F5 z( t; W
void *hFor; //表达式句柄$ Q\\" d! H8 }: Z7 S0 v9 s |0 A
luINT nPara; //存放表达式的自变量个数
% ^/ f* K! w% i6 h' J\\" P+ ]
LuData *pPara; //存放输入自变量的数组指针) ?9 G4 E) O8 ]* E1 ^5 s; h1 L' }
LuData Val; //存放表达式的值
- F K! ^# B ~, E8 G* T! A
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
' c\\" m) Z0 _\\" i( q/ J
int ErrCode; //错误代码! _ M4 K- |* M. ~3 t: {# {
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式+ P$ Z6 d P. d
int i;- f7 ] @- C5 ~2 C, B; D
( M& s' c& l$ ^\\" E9 j* M4 `( S
if(!InitLu()) return; //初始化Lu# y1 _\\" R% J( i6 E |
5 n/ O Z$ Y9 x. U
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式( `5 _8 x9 p$ y0 Q' l8 b
if(ErrCode)
9 e% `* U2 W1 A7 Q* `/ L
{
7 l% ^3 X0 U+ Y, s
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;
! v8 |- U! E4 v+ C0 ^! w
}' d! a! Q- J\\" c: H! |! Y6 y
else
! s4 p. ]; ]) q\\" A. ^
{( A; m( }( _- H9 L7 Z: x S\\" V0 R& {
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
i/ E2 ]& a9 W3 i, |1 i& d6 Y9 m' k
{
0 u# a/ g) F- u# r; R
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;/ B& D8 Y! D( r6 j) R% ~- G
}; x' O' C! U7 U5 V+ S) R
Val=LuCal(hFor,pPara); //计算表达式的值
M3 |: y5 z c+ d9 \
cout<<Val.x<<endl;
3 a& d+ [) Q2 o7 e5 @2 j
}, X! ^0 Q2 j2 B. z) W7 F
FreeLu(); //释放Lu
* a\\" Y7 @* ]( f% n; g& P1 X
}

#include <windows.h> 
, U- y# I) T$ T- x/ p0 h
#include <iostream>7 [# j1 n/ Z1 j$ }  F' T2 t8 a

#include <math.h> 
+ J: `9 T+ \- ~4 n6 \
#include "lu32.h"  //Lu头文件1 G- C9 x2 E! I4 \

0 e/ O+ p\\" R+ h) Y) `; C/ p

#pragma comment( lib, "lu32.lib" ) 
7 f8 b) l- S& b, \( |3 w* b
 
: t. p, A2 A- e0 @
using namespace std; 
- s- L, @\\" s/ l
( G+ v5 @/ J/ y+ S+ W/ t: w; R. r

void main(void), j5 P2 z( f- [; a, W. F4 {* \

{ 
1 i. `\\" |! `% F5 z( t; W
    void *hFor;    //表达式句柄$ Q\\" d! H8 }: Z7 S0 v9 s  |0 A

luINT nPara;   //存放表达式的自变量个数 
% ^/ f* K! w% i6 h' J\\" P+ ]
    LuData *pPara; //存放输入自变量的数组指针) ?9 G4 E) O8 ]* E1 ^5 s; h1 L' }

LuData Val;    //存放表达式的值 
- F  K! ^# B  ~, E8 G* T! A
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置 
' c\\" m) Z0 _\\" i( q/ J
    int ErrCode;   //错误代码! _  M4 K- |* M. ~3 t: {# {

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式+ P$ Z6 d  P. d

int i;- f7 ]  @- C5 ~2 C, B; D

( M& s' c& l$ ^\\" E9 j* M4 `( S

if(!InitLu()) return; //初始化Lu# y1 _\\" R% J( i6 E  |

5 n/ O  Z$ Y9 x. U

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式( `5 _8 x9 p$ y0 Q' l8 b

if(ErrCode) 
9 e% `* U2 W1 A7 Q* `/ L
    { 
7 l% ^3 X0 U+ Y, s
        cout<<"表达式有错误！错误代码："<<ErrCode<<endl; 
! v8 |- U! E4 v+ C0 ^! w
    }' d! a! Q- J\\" c: H! |! Y6 y

else 
! s4 p. ]; ]) q\\" A. ^
    {( A; m( }( _- H9 L7 Z: x  S\\" V0 R& {

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
  i/ E2 ]& a9 W3 i, |1 i& d6 Y9 m' k
        { 
0 u# a/ g) F- u# r; R
            pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;/ B& D8 Y! D( r6 j) R% ~- G

}; x' O' C! U7 U5 V+ S) R

Val=LuCal(hFor,pPara); //计算表达式的值 
  M3 |: y5 z  c+ d9 \
        cout<<Val.x<<endl; 
3 a& d+ [) Q2 o7 e5 @2 j
    }, X! ^0 Q2 j2 B. z) W7 F

FreeLu();      //释放Lu 
* a\\" Y7 @* ]( f% n; g& P1 X
}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式