查看: 7959|回复: 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>+ Q$ V( C) j: O, f: I
#include <iostream>
8 q) [/ ^: p+ g/ j; B% H2 }
#include <math.h>
9 u8 t. R5 b& [7 {1 U
#include "lu32.h" //Lu头文件
3 q2 H2 d1 E' u1 @
' k9 C2 o# t4 F
#pragma comment( lib, "lu32.lib" )
, C* d9 g# f) R& H$ u
: p4 l, J W1 w! W% O @, k
using namespace std;
' U: ^: Y- P% L4 o6 k
0 i( S6 r' Z\\" I( r! i; f6 I
void main(void)! \! c+ Z% F2 m
{5 f! T8 }0 y2 v$ s0 S6 C
void *hFor; //表达式句柄
5 U$ }/ b+ M% i; t
luINT nPara; //存放表达式的自变量个数6 J' n/ H* S' {% g9 K
LuData *pPara; //存放输入自变量的数组指针
1 Q' P4 ^% V2 x# x1 |/ x0 |
LuData Val; //存放表达式的值
) S3 A+ A9 n6 l4 t5 E; V& e
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
& y0 J, y; [# S$ ]2 I
int ErrCode; //错误代码6 b6 C! b7 ]. A* h9 t* ]) |6 I4 Y
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
; w/ t& w! h7 B2 O
int i;
\\" A. ]1 Z( p5 |% B
) n* u2 ?8 q/ D
if(!InitLu()) return; //初始化Lu
# u1 k! c3 ~# H g
% C/ b( Q4 V3 p2 K7 N F8 P
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式; p$ z3 V& \2 g, C( y- Q7 X
if(ErrCode)) I: L2 p9 @( g! [+ ?, p& [
{
% Y) v) V7 F1 Y: r: }
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;; V. m) A, L& n* e# V& n
}. T' I8 d9 `# P7 k s
else
w1 V6 c( o O
{; ^; ^7 G6 l' q, h
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
2 m' \9 f% X$ x9 `& ^/ ] W
{7 Q8 {' u% ]* D% O) p
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;$ z u: d+ _8 R& `8 R( m& w/ K
}
\\" e\\" Z, |$ f, ~+ S
Val=LuCal(hFor,pPara); //计算表达式的值
( \; ^* k9 F) S& k* t4 ?
cout<<Val.x<<endl;
: s8 b2 M7 O2 r3 b5 K6 y) z
}
+ s; f* X- `& C. E' a
FreeLu(); //释放Lu4 x+ j# n% g% H2 `, X& \
}

#include <windows.h>+ Q$ V( C) j: O, f: I

#include <iostream> 
8 q) [/ ^: p+ g/ j; B% H2 }
#include <math.h> 
9 u8 t. R5 b& [7 {1 U
#include "lu32.h"  //Lu头文件 
3 q2 H2 d1 E' u1 @
' k9 C2 o# t4 F

#pragma comment( lib, "lu32.lib" ) 
, C* d9 g# f) R& H$ u
 
: p4 l, J  W1 w! W% O  @, k
using namespace std; 
' U: ^: Y- P% L4 o6 k
 
0 i( S6 r' Z\\" I( r! i; f6 I
void main(void)! \! c+ Z% F2 m

{5 f! T8 }0 y2 v$ s0 S6 C

void *hFor;    //表达式句柄 
5 U$ }/ b+ M% i; t
    luINT nPara;   //存放表达式的自变量个数6 J' n/ H* S' {% g9 K

LuData *pPara; //存放输入自变量的数组指针 
1 Q' P4 ^% V2 x# x1 |/ x0 |
    LuData Val;    //存放表达式的值 
) S3 A+ A9 n6 l4 t5 E; V& e
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置 
& y0 J, y; [# S$ ]2 I
    int ErrCode;   //错误代码6 b6 C! b7 ]. A* h9 t* ]) |6 I4 Y

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
; w/ t& w! h7 B2 O
    int i; 
\\" A. ]1 Z( p5 |% B
) n* u2 ?8 q/ D

if(!InitLu()) return; //初始化Lu 
# u1 k! c3 ~# H  g
 
% C/ b( Q4 V3 p2 K7 N  F8 P
    ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式; p$ z3 V& \2 g, C( y- Q7 X

if(ErrCode)) I: L2 p9 @( g! [+ ?, p& [

{ 
% Y) v) V7 F1 Y: r: }
        cout<<"表达式有错误！错误代码："<<ErrCode<<endl;; V. m) A, L& n* e# V& n

}. T' I8 d9 `# P7 k  s

else 
  w1 V6 c( o  O
    {; ^; ^7 G6 l' q, h

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
2 m' \9 f% X$ x9 `& ^/ ]  W
        {7 Q8 {' u% ]* D% O) p

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;$ z  u: d+ _8 R& `8 R( m& w/ K

} 
\\" e\\" Z, |$ f, ~+ S
        Val=LuCal(hFor,pPara); //计算表达式的值 
( \; ^* k9 F) S& k* t4 ?
        cout<<Val.x<<endl; 
: s8 b2 M7 O2 r3 b5 K6 y) z
    } 
+ s; f* X- `& C. E' a
    FreeLu();      //释放Lu4 x+ j# n% g% H2 `, X& \

}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式