查看: 8158|回复: 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>) ~* S! V% ^/ J. H4 l; `
#include <iostream>
3 [. b, p7 i) N( ?6 }! d
#include <math.h>
/ I# W& w( h4 B B
#include "lu32.h" //Lu头文件7 I, k5 Z; F# n
# u9 ~' d! D' X' {
#pragma comment( lib, "lu32.lib" )
* Z r J2 z: g
: R+ A0 y\\" C. y+ t( G. Z2 l\\" n
using namespace std;
t# {8 a7 ^$ g- ?. L7 k7 C3 e! q8 E
$ Z7 w+ U: N+ c
void main(void)
{
/ J# ]0 P+ { U% w; R7 ]& U
void *hFor; //表达式句柄 L* L- t' F4 B. m+ y\\" @2 a
luINT nPara; //存放表达式的自变量个数
5 ~+ M0 b; B; n$ L; X. T4 h
LuData *pPara; //存放输入自变量的数组指针\\" q+ E( C' B- c3 I2 I
LuData Val; //存放表达式的值
5 u+ h! H) j! {
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置+ n# I& p* @* ?% ?; A5 b+ a
int ErrCode; //错误代码
* n7 Q\\" s% l9 g; I6 z
wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式& Z e+ h0 }5 h) Z. C
int i;
) I+ |$ }: D2 `! I! h+ y/ d
* M: X6 Z! J% { k# q& l
if(!InitLu()) return; //初始化Lu3 f9 Q\\" Q4 ~: o' c
7 x4 K/ S) c, V9 H
ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式
1 ?' F4 f) h- l0 m
if(ErrCode)0 K1 R& L\\" P& ~; [0 h
{8 b\\" }( O; v% ~) w- J- ^
cout<<"表达式有错误！错误代码："<<ErrCode<<endl;
/ T2 h7 U- I, A% h. e\\" S- N8 W7 \, `
}
( \. M4 q* C2 f6 d! a: N9 P+ I
else
X4 `' L4 x+ P8 F0 k
{! F4 Q) K: S' n) D
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1% E* Z8 T. ^4 t F/ f
{' z) H6 C; s* E' K5 h
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;( A* X/ | w\\" k# W; j; I; a! f
}/ y' ?& g. E# [& }$ G+ u( H
Val=LuCal(hFor,pPara); //计算表达式的值
; B2 c4 ?6 Z+ H& J* O0 k
cout<<Val.x<<endl;
$ L a8 L2 R% P
}' I3 L! Y( v& O3 L
FreeLu(); //释放Lu3 z! A9 N* e, s* c' c, ^9 }
}

#include <windows.h>) ~* S! V% ^/ J. H4 l; `

#include <iostream> 
3 [. b, p7 i) N( ?6 }! d
#include <math.h> 
/ I# W& w( h4 B  B
#include "lu32.h"  //Lu头文件7 I, k5 Z; F# n

# u9 ~' d! D' X' {
#pragma comment( lib, "lu32.lib" ) 
* Z  r  J2 z: g
 
: R+ A0 y\\" C. y+ t( G. Z2 l\\" n
using namespace std; 
  t# {8 a7 ^$ g- ?. L7 k7 C3 e! q8 E
 
$ Z7 w+ U: N+ c
void main(void) 
9 f\\" U+ z9 C3 f2 v  R7 {% R, [' D; |
{ 
/ J# ]0 P+ {  U% w; R7 ]& U
    void *hFor;    //表达式句柄  L* L- t' F4 B. m+ y\\" @2 a

luINT nPara;   //存放表达式的自变量个数 
5 ~+ M0 b; B; n$ L; X. T4 h
    LuData *pPara; //存放输入自变量的数组指针\\" q+ E( C' B- c3 I2 I

LuData Val;    //存放表达式的值 
5 u+ h! H) j! {
    luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置+ n# I& p* @* ?% ?; A5 b+ a

int ErrCode;   //错误代码 
* n7 Q\\" s% l9 g; I6 z
    wchar_t ForStr[]=L"f(x,y)=x+y"; //字符串表达式& Z  e+ h0 }5 h) Z. C

int i; 
) I+ |$ }: D2 `! I! h+ y/ d
 
* M: X6 Z! J% {  k# q& l
    if(!InitLu()) return; //初始化Lu3 f9 Q\\" Q4 ~: o' c

7 x4 K/ S) c, V9 H

ErrCode=LuCom(ForStr,0,0,0,hFor,nPara,pPara,ErrBegin,ErrEnd); //编译表达式 
1 ?' F4 f) h- l0 m
    if(ErrCode)0 K1 R& L\\" P& ~; [0 h

{8 b\\" }( O; v% ~) w- J- ^

cout<<"表达式有错误！错误代码："<<ErrCode<<endl; 
/ T2 h7 U- I, A% h. e\\" S- N8 W7 \, `
    } 
( \. M4 q* C2 f6 d! a: N9 P+ I
    else 
  X4 `' L4 x+ P8 F0 k
    {! F4 Q) K: S' n) D

for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为1% E* Z8 T. ^4 t  F/ f

{' z) H6 C; s* E' K5 h

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;( A* X/ |  w\\" k# W; j; I; a! f

}/ y' ?& g. E# [& }$ G+ u( H

Val=LuCal(hFor,pPara); //计算表达式的值 
; B2 c4 ?6 Z+ H& J* O0 k
        cout<<Val.x<<endl; 
$ L  a8 L2 R% P
    }' I3 L! Y( v& O3 L

FreeLu();      //释放Lu3 z! A9 N* e, s* c' c, ^9 }

}

运行结果：

2
请按任意键继续. . .

zan

comment, include, return, 表达式