查看: 7961|回复: 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>0 a/ `. N1 a0 _' b: R
#include <iostream>+ H' t: N& G& u6 `! W\\" ~. w8 ~; W
#include <math.h>
/ y8 X9 ^( U: z) s0 R0 x% a
#include "lu32.h" //Lu头文件
( B4 P0 o( D( O# n5 d4 k
\\" j- ?/ R, \\\" @4 }4 |& W
#pragma comment( lib, "lu32.lib" )
2 l! {: o* K# P: r$ t
. x1 P+ c5 i) W8 _5 h3 t; x2 z. I
using namespace std;
; v+ _( C ]8 Q# \) e8 g8 g
/ N! V/ g' P- ^2 }. R2 g7 ?, X0 C
void main(void)3 _. }+ R8 r/ N* J. g4 I8 l j( a& b
{
\\" d, J1 \\\" \6 b9 L2 A1 G* C
void *hFor; //表达式句柄* t) g6 e\\" r1 k, H, ]
luINT nPara; //存放表达式的自变量个数1 b0 p& {' G5 l! i# E. }
LuData *pPara; //存放输入自变量的数组指针3 E. \' j8 o2 k5 x1 o; ^/ w
LuData Val; //存放表达式的值7 c3 q7 h$ ~ j, |0 {8 u3 Y
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
# U+ g& ~3 N) Z
int ErrCode; //错误代码
0 l0 l6 {+ I [7 f5 {
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式
( [0 C6 W l. h; A' c5 E\\" ]
int i;
9 p' ?- G9 t- K
% t1 g4 U% c+ C6 Q$ J- C
if(!InitLu()) return; //初始化Lu! G- A# B7 T& Q\\" [$ u% D
( O\\" n3 i& M5 Y) L6 U7 g
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
8 q( F8 {' M\\" c3 o1 W
if(ErrCode)$ V0 p* b! Y; S g1 u _/ L0 v: \
{. l3 t9 V, J+ N& {
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;
2 Z) ?& H- F; W
}8 L, {: o/ i/ l8 c1 S4 _4 @ b
else
2 {% @8 i4 f, q. \! {( s* `
{5 `8 n; D# d* X
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1
# K/ o5 n/ _ x6 r( ]
{
1 b8 F8 C/ V\\" w* o
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
, R+ A1 h$ j; P* L9 q% j9 f
}
6 f1 v Q5 _: T, a; m2 p
Val=LuCal(hFor,pPara); //计算表达式的值9 I/ M( \3 j9 {/ ~( P7 }. @
cout<<Val.x<<endl;5 ?: x; B. [7 l6 y
}; z' [5 W n, c
FreeLu(); //释放Lu
$ T' l* C0 Z+ |, ]5 B4 W/ O/ j
}

#include <windows.h>0 a/ `. N1 a0 _' b: R

#include <iostream>+ H' t: N& G& u6 `! W\\" ~. w8 ~; W

#include <math.h> 
/ y8 X9 ^( U: z) s0 R0 x% a
#include "lu32.h"  //Lu头文件 
( B4 P0 o( D( O# n5 d4 k
 
\\" j- ?/ R, \\\" @4 }4 |& W
#pragma comment( lib, "lu32.lib" ) 
2 l! {: o* K# P: r$ t
 
. x1 P+ c5 i) W8 _5 h3 t; x2 z. I
using namespace std; 
; v+ _( C  ]8 Q# \) e8 g8 g
 
/ N! V/ g' P- ^2 }. R2 g7 ?, X0 C
void main(void)3 _. }+ R8 r/ N* J. g4 I8 l  j( a& b

{ 
\\" d, J1 \\\" \6 b9 L2 A1 G* C
    void *hFor;    //表达式句柄* t) g6 e\\" r1 k, H, ]

luINT nPara;   //存放表达式的自变量个数1 b0 p& {' G5 l! i# E. }

LuData *pPara; //存放输入自变量的数组指针3 E. \' j8 o2 k5 x1 o; ^/ w

LuData Val;    //存放表达式的值7 c3 q7 h$ ~  j, |0 {8 u3 Y

luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置 
# U+ g& ~3 N) Z
    int ErrCode;   //错误代码 
0 l0 l6 {+ I  [7 f5 {
    wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式 
( [0 C6 W  l. h; A' c5 E\\" ]
    int i; 
9 p' ?- G9 t- K
 
% t1 g4 U% c+ C6 Q$ J- C
    if(!InitLu()) return; //初始化Lu! G- A# B7 T& Q\\" [$ u% D

( O\\" n3 i& M5 Y) L6 U7 g

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
8 q( F8 {' M\\" c3 o1 W
    if(ErrCode)$ V0 p* b! Y; S  g1 u  _/ L0 v: \

{. l3 t9 V, J+ N& {

cout<<"表达式有错误！错误代码："<<ErrCode<<endl; 
2 Z) ?& H- F; W
    }8 L, {: o/ i/ l8 c1 S4 _4 @  b

else 
2 {% @8 i4 f, q. \! {( s* `
    {5 `8 n; D# d* X

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1 
# K/ o5 n/ _  x6 r( ]
        { 
1 b8 F8 C/ V\\" w* o
            pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
, R+ A1 h$ j; P* L9 q% j9 f
        } 
6 f1 v  Q5 _: T, a; m2 p
        Val=LuCal(hFor,pPara); //计算表达式的值9 I/ M( \3 j9 {/ ~( P7 }. @

cout<<Val.x<<endl;5 ?: x; B. [7 l6 y

}; z' [5 W  n, c

FreeLu();      //释放Lu 
$ T' l* C0 Z+ |, ]5 B4 W/ O/ j
}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式