一些函数的简单使用
#include "lrs.h"
Action()
{
char *UserBuffer,*UserBuffer1;
char str[125],str2[125],str3[125],source[125];
char *s;
char aa[10];
int num=12345678985;
int result=1;
int i=0,j=0,len;
//num = rand()%10000+1;
/*sprintf(str,"%010X", num);
lr_output_message("%s",str);
strcpy(source,"\0");
strcpy(str3,"\\x");
for(i=0;i<5;i++){
str2[i*4+0] = str3[0];
str2[i*4+1] = str3[1];
str2[i*4+2] = str[i*2];
str2[i*4+3] = str[i*2+1];
}
str2[20] = source[0];
lr_output_message("%s",str2);*/
/*for(i=0;i<5;i++){
strcat(str2,"\\x");
lr_output_message("%s",str2);
str2[i*4+2] = str[i*2];
lr_output_message("%s",str2);
str2[i*4+3] = str[i*2+1];
lr_output_message("%s",str2);
}*/
/*lr_save_string(str2,"param");
lr_output_message("%s",lr_eval_string("<param>"));*/
lr_start_transaction("working");
lrs_create_socket("socket1","TCP","RemoteHost=223.5.14.59:1234",LrsLastArg);
//s = lrs_get_static_buffer("socket1","buf2",1,2,NULL);----获取静态缓冲区或其一部分。得到buf2中从第1位开始取2个字节的字符
//UserBuffer = lrs_decimal_to_hex_string("socket1",str,strlen(str));-----将十进制整数转换成十六进制字符串
//lr_output_message("the userBuffer is %s",UserBuffer);
//UserBuffer1 = lrs_get_static_buffer("socket1","buf2",0,4,NULL);
//UserBuffer1 = lrs_ebcdic_to_ascii("socket1",UserBuffer1,lrs_get_user_buffer_size("socket1"));----将缓冲区数据从EBCDIC格式转换成ASCII格式
//lrs_save_param_ex("socket1","user",UserBuffer,0,5,"ascii","data_param");----将用户、静态或接收到的缓冲区(或缓冲区部分)保存到参数中
//lrs_save_param_ex("socket1","user",UserBuffer1,0,5,"ascii","data_param2");
//lrs_save_param_ex("socket1","user",s,0,strlen(s),"ascii","data_param");
//lr_output_message("the content is %s",lr_eval_string("<data_param>"));
//lr_output_message("the content is %s",lr_eval_string("<data_param2>"));
//lr_rendezvous("send_gps");
//result = lrs_set_receive_option(Mismatch,MISMATCH_CONTENT);
lrs_send("socket1","buf0",LrsLastArg);
//lrs_set_recv_timeout(60,0);
//lrs_receive("socket1","buf1",LrsLastArg);
//lrs_save_param("socket1",NULL,"param1",0,1);
//lrs_close_socket("socket1");
lr_end_transaction("working", LR_AUTO);
/*strcpy(aa,"\\x00");
result=strcmp(aa,lr_eval_string("<param1>"));
if(result!=0){
lr_error_message("未接收到数据,返回值为%s",lr_eval_string("<param1>"));
}*/
lr_think_time(0.5);
return 0;
}