查看: 7722|回复: 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>' x( ?# y* g7 v& F\\" P/ O
#include <iostream>! N; y+ z* {+ L% Z
#include <math.h>' E6 x- E1 u/ e }\\" S' F5 k6 V
#include "lu32.h" //Lu头文件
( e, U4 q3 _\\" R1 B) E; U; q+ N
7 Y$ H: e) J' ]5 W: B% p8 [# f
#pragma comment( lib, "lu32.lib" )
6 ?- z! t' l0 F1 T4 Q
. N6 q2 Z$ U8 Q* u$ T& N, X
using namespace std;: X7 {8 S# s) l! A% X2 G
, M. a/ p. `- w7 ^, Z& j
void main(void)- e& v( e7 a1 F0 {3 g4 m0 n1 H$ ?
{
) U$ b L1 `' n8 _+ a$ A H1 @( i
void *hFor; //表达式句柄& z+ R# a9 a8 L5 `$ b# ?
luINT nPara; //存放表达式的自变量个数
* a7 ^8 X/ F C
LuData *pPara; //存放输入自变量的数组指针
; e0 `1 B! w Q2 k A& l
LuData Val; //存放表达式的值
6 P. }4 x7 f4 T# k- H a# [# S
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置% ]' j/ {/ _$ _7 p+ f2 @
int ErrCode; //错误代码! Q& c, N9 w: g1 o
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
# q4 j+ k% W7 Y! i- q8 _
int i;0 e# ^% |, g% V# Z
$ i; i1 B; V# a' I, N0 {. G. w
if(!InitLu()) return; //初始化Lu
8 r* T) X' u& Q) T) d+ p\\" [
1 W P! B$ |/ O
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
3 {7 [) E3 c# [# @
if(ErrCode)
7 I* s: p\\" n+ x* q) Q! k
{! _! ^ Q. R* s( b
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;9 V3 Y\\" J/ C\\" q+ f8 @
}
) y3 x+ h- E0 ^! B5 h0 t, I
else
: W5 z0 P4 l8 a
{# `. ^2 a) b/ a
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为13 b: _- H$ L4 v# [
{% v2 \6 E+ w f: O\\" @. |, x( o, `
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
: l; z3 x4 f5 c3 P! h' ]
}$ d, M6 Z# `4 ]6 F$ k8 |
Val=LuCal(hFor,pPara); //计算表达式的值
/ E6 q- B& j- \4 D0 W: I
cout<<Val.x<<endl;/ G9 G4 [9 J6 c( d
}; n4 {, W9 D2 ^\\" p4 P ~
FreeLu(); //释放Lu2 A\\" k( t$ h# h$ Y6 X
}

#include <windows.h>' x( ?# y* g7 v& F\\" P/ O

#include <iostream>! N; y+ z* {+ L% Z

#include <math.h>' E6 x- E1 u/ e  }\\" S' F5 k6 V

#include "lu32.h"  //Lu头文件 
( e, U4 q3 _\\" R1 B) E; U; q+ N
 
7 Y$ H: e) J' ]5 W: B% p8 [# f
#pragma comment( lib, "lu32.lib" ) 
6 ?- z! t' l0 F1 T4 Q
 
. N6 q2 Z$ U8 Q* u$ T& N, X
using namespace std;: X7 {8 S# s) l! A% X2 G

, M. a/ p. `- w7 ^, Z& j

void main(void)- e& v( e7 a1 F0 {3 g4 m0 n1 H$ ?

{ 
) U$ b  L1 `' n8 _+ a$ A  H1 @( i
    void *hFor;    //表达式句柄& z+ R# a9 a8 L5 `$ b# ?

luINT nPara;   //存放表达式的自变量个数 
* a7 ^8 X/ F  C
    LuData *pPara; //存放输入自变量的数组指针 
; e0 `1 B! w  Q2 k  A& l
    LuData Val;    //存放表达式的值 
6 P. }4 x7 f4 T# k- H  a# [# S
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置% ]' j/ {/ _$ _7 p+ f2 @

int ErrCode;   //错误代码! Q& c, N9 w: g1 o

wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
# q4 j+ k% W7 Y! i- q8 _
    int i;0 e# ^% |, g% V# Z

$ i; i1 B; V# a' I, N0 {. G. w
    if(!InitLu()) return; //初始化Lu 
8 r* T) X' u& Q) T) d+ p\\" [
1 W  P! B$ |/ O

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
3 {7 [) E3 c# [# @
    if(ErrCode) 
7 I* s: p\\" n+ x* q) Q! k
    {! _! ^  Q. R* s( b

cout<<"表达式有错误！错误代码："<<ErrCode<<endl;9 V3 Y\\" J/ C\\" q+ f8 @

} 
) y3 x+ h- E0 ^! B5 h0 t, I
    else 
: W5 z0 P4 l8 a
    {# `. ^2 a) b/ a

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为13 b: _- H$ L4 v# [

{% v2 \6 E+ w  f: O\\" @. |, x( o, `

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
: l; z3 x4 f5 c3 P! h' ]
        }$ d, M6 Z# `4 ]6 F$ k8 |

Val=LuCal(hFor,pPara); //计算表达式的值 
/ E6 q- B& j- \4 D0 W: I
        cout<<Val.x<<endl;/ G9 G4 [9 J6 c( d

}; n4 {, W9 D2 ^\\" p4 P  ~

FreeLu();      //释放Lu2 A\\" k( t$ h# h$ Y6 X

}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式