求把以下C语言代码翻译成为易语言

1、 系统加载时调用：
1、系统加载时调用:
Ret = ListenAlarmVIP(AlarmCallback,15000);
Ret = ListenAlarmVIP(AlarmCallback,15000);
if(Ret == 0 )
如果(Ret = = 0)
{
{
MessageBox("执行成功");
弹出窗口(“执行成功”);

}
}
else
其他的
MessageBox("执行失败");
弹出窗口(“执行失败”);

2、回调函数为：
2、回调函数为:
int WINAPI AlarmCallback(TRADE *pTrade)
int WINAPI AlarmCallback(贸易* pTrade)
{
{
CString Message;
装运箱信息;
Message. Format("15000 Txcode=[%02x],Status=[%d]Date=[%s]Time=[%s]CardID=[%]\n",pTrade->Txcode,pTrade->Status,pTrade->TrDate,pTrade->TrTime,pTrade->CardID);
消息。格式(“15000 Txcode =[% 02 x]、状态=[% d]日期=(% s)时间=(% s)CardID =[%]\ n”,pTrade - > Txcode,pTrade - >状态,pTrade - > TrDate,pTrade - > TrTime,pTrade - > CardID);
AfxMessageBox(Message);
AfxMessageBox(消息);
return(0);
返回(0);

}
}

3、数据结构为
3、数据结构为
typedef struct TRADE
typedef struct贸易
{
{
unsigned char Txcode; //交易码
无符号字符Txcode;/ /交易码
int DoorNum ;
int DoorNum;
unsigned char CardID[31] ;
无符号字符CardID[31];
int Status ;
int状态;
unsigned char TrDate[11];
无符号字符TrDate[11];
unsigned char TrTime[9];
无符号字符TrTime[9];
int TerminalID;
int TerminalID;
// char DeviceIP[100];
/ /字符DeviceIP[100];
int Door1Status ;
int Door1Status;
int Door2Status ;
int Door2Status;
int Door3Status ;
int Door3Status;
int Door4Status ;
int Door4Status;

}TRADE ;
}贸易;