📄 tce132.pas
字号:
unit tce132;
interface
uses
Windows ;
//implementation
const PCM_TRUNK_NUM = 30;
const _MFC_BUF_LEN = 31;
const _CALL_BUF_LEN = 31;
const _DTMF_BUF_LEN = 31;
const _PMT_VOICE_BUF_LEN = 31;
//const MFC_BUF_LEN = 31
//const CALL_BUF_LEN = 31
//const DTMF_BUF_LEN = 31
//const PMT_VOICE_BUF_LEN = 31
const _CONVERSATION_RECORD_BEGIN_VOICE_ID = 20;
Type
TrunkStep = (
Step_Free, //0 for import and export
Step_Used, //1 for import
Step_RecvCall, //2
Step_RecvMfc, //3
Step_StopMfc, //4
Step_RecvFail, //5
Step_Delay, //6
Step_Wait, //7
Step_Connect, //8
Step_ForeHangOff, //9
Step_BackHangOff, //10
Step_Block, //11
Step_OverTime, //12
Step_Disable, //13 //disable send and receive phone
Step_ReadyDial, //14 //for export
Step_DialCall, //15
Step_DialMfc, //16
Step_DialStop, //17
Step_DialFail, //18
Step_FreeRes //19
);
type
TrunkType = (
Type_Import,
Type_Export
);
type
DialStatus = (
DS_NoDial, //0
DS_Dialing, //1
DS_Busy, //2
DS_Wait, //3
DS_Connect, //4
DS_LineError, //5
DS_NoUser, //6
DS_OverTime //7
);
type
VoiceResourcesType = (
Res_NoRes, //0
Res_File, //1
Res_Xms //2
);
type
VoiceOperatorType = (
OP_NoOperator, //0
OP_Play, //1
OP_LoopPlay, //2
OP_Record //3
);
type
PstnErr = -20 .. 0;
//enum error
{type
PstnErr = (
_ERR_OK = 0,
_ERR_XmsAllocError = -1,
_ERR_MemAllocError = -2,
_ERR_CanNotOpenFile = -3,
_ERR_NoTrunkRes = -4,
_ERR_NoUserRes = -5,
_ERR_NoVoiceRes = -6,
_ERR_InvalidID = -7,
_ERR_ReConnDifferChannel = -8,
_ERR_OperateTypeErr = -9,
_ERR_InvalidTrunkStep = -10,
_ERR_NoConnChannel = -11,
_ERR_INIsetErr = -12,
_ERR_NullPtr = -13,
_ERR_NoMvipRes = -14,
_ERR_InvalidDTMF = -15,
_ERR_LastDtmfNotSendEnd = -16,
_ERR_OpenTCE1Device = -17, // add by H.J.N
_ERR_CheckHardware = -18, // add by H.J.N
_ERR_PromptFile = -19, // add by H.J.N
_ERR_DirectPlayXms = -20 // add by H.J.N
);
}
const _DL_FORE_FREE = $0b; //A
const _DL_FORE_USED = $03; //B
const _DL_FORE_CONFIRM = $03; //C
const _DL_FORE_CONNECT = $03; //D
const _DL_FORE_FOREHANGOFF = $0b; //E
const _DL_FORE_BUSY = $0b; //F
const _DL_FORE_BACKHANGOFF = $03; //C
const _DL_BACK_FREE = $0b; //A 0x08|0x03
const _DL_BACK_USED = $0b; //B
const _DL_BACK_CONFIRM = $0f; //C 0x0c|0x03
const _DL_BACK_CONNECT = $07; //D 0x04|0x03
const _DL_BACK_BACKHANGOFF = $0f; //C
const _DL_BACK_FOREHANGOFF = $0f; //F
const _DL_BACK_BLOCK = $0f; //F
const MFC_BACK_A1 = 16; //request next
const MFC_BACK_A2 = 17; //request from home
const MFC_BACK_A3 = 18; //change to B signal
const MFC_BACK_A4 = 19; //busy
const MFC_BACK_A5 = 20; //space No.
const MFC_BACK_A6 = 21; //request KA and caller
const MFC_BACK_KB1 = 16; //user is free
const MFC_BACK_KB2 = 17; //no used
const MFC_BACK_KB3 = 18; //no used
const MFC_BACK_KB4 = 19; //user is busy
const MFC_BACK_KB5 = 20; //space No.
const MFC_BACK_KB6 = 21; //user is free and controled by Caller
const MFC_BACK_KD1 = 1; //long half auto call
const MFC_BACK_KD2 = 2; //long auto call
const MFC_BACK_KD3 = 3; //city phone
const MFC_BACK_KD4 = 4; //city FAX or DATA
const MFC_BACK_KD5 = 5; //half auto confirm caller number
const MFC_BACK_KD6 = 6; //test call
const MFC_FORE_KA1 = 1;
const MFC_FORE_KA2 = 2;
const MFC_FORE_KA3 = 3;
const MFC_FORE_KA4 = 4;
const MFC_FORE_KA5 = 5;
const MFC_FORE_KA6 = 6;
const MFC_FORE_KA7 = 7;
const MFC_FORE_KA8 = 8;
const MFC_FORE_KA9 = 9;
const MFC_FORE_KA10 = 10;
//define the failure reason
const _ERR_USED_FOREHANGOFF = 1;
const _ERR_USED_OVERTIME = 2;
const _ERR_RCALL_OVERTIME = 3;
const _ERR_RCALL_FOREHANGOFF = 4;
const _ERR_RCALL_TOO_LEN = 5;
const _ERR_RMFC_FOREHANGOFF = 6;
const _ERR_RMFC_OVERTIME = 7;
const _ERR_RMFC_TOO_LEN = 8;
const _ERR_RSTOP_FOREHANGOFF = 9;
const _ERR_RSTOP_OVERTIME = 10;
const _ERR_DREDY_OVERTIME = 11;
const _ERR_DMFC_LINEERR = 12;
const _ERR_DMFC_BACK_A_ERR1 = 13;
const _ERR_DMFC_BACK_A_ERR2 = 14;
const _ERR_DMFC_BACK_A_ERR3 = 15;
const _ERR_DMFC_OVERTIME = 16;
const _ERR_DCALL_LINEERR = 17;
const _ERR_DCALL_BACK_A_ERR1 = 18;
const _ERR_DCALL_BACK_A_ERR2 = 19;
const _ERR_DCALL_OVERTIME = 20;
const _ERR_DSTOP_LINEERR = 21;
const _ERR_DSTOP_NOUSER = 22;
const _ERR_DSTOP_BUSY = 23;
const _ERR_DSTOP_OVERTIME = 24;
const _ERR_RCALL_LONGSEND = 25;
{//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//initiate the DT60 PCM Voice board}
function DJSys_EnableCard (const configFile:PCHAR; const promptVoiceIdxFile:PCHAR) : integer; stdcall; far external 'tce1_32.dll';
procedure DJSys_DisableCard; stdcall; far external 'tce1_32.dll';
procedure DJSys_PushPlay; stdcall; far external 'tce1_32.dll';
function DJSys_EnableDtmfSend():boolean;stdcall; far external 'tce1_32.dll';
///******************************************************************************\
// *
// * Functions for Trunk channel
// *
//\******************************************************************************/
function DJTrk_GetTotalTrunkNum : integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetPcmTrunkNum :integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetWaitTime(trunkID:integer ): WORD; stdcall; far external 'tce1_32.dll';
function DJTrk_GetConnectVoiceTime(trunkID : integer ): WORD; stdcall; far external 'tce1_32.dll';
function DJTrk_GetConnectTime (trunkID : integer) : WORD; stdcall; far external 'tce1_32.dll';
function DJTrk_GetDtmfTime (trunkID : integer) : WORD; stdcall; far external 'tce1_32.dll';
function DJTrk_GetTrunkConnectTime(trunkID : integer) : LongInt; stdcall; far external 'tce1_32.dll';
function DJTrk_GetPcmID(trunkID : integer ): integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetConnectTrunkID(trunkID : integer): integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetConnectUserID(trunkID : integer) : integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetListenUserID(trunkID : integer) : integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetListenTrunkID(trunkID : integer): integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetTrunkPlayID(trunkID : integer): integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetTrunkRecordID(trunkID : integer): integer; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckReady(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckConnect(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckWait(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckForwardHangUp(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckTrunkIn(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckTrunkFree(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckTrunkEnable (trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_BackwardHangUp(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_DisableTrunk(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_EnableTrunk(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_GetFreeTrunkIDForDial (pcmID : integer) : integer; stdcall; far external 'tce1_32.dll';
function DJTrk_StartDial(trunkID: integer; const szPhoneNum : pchar; const szCallerStr:pchar) : boolean; stdcall; far external 'tce1_32.dll';
procedure DJTrk_StartDial_SetParam (foreKD : BYTE; foreKA : BYTE ); stdcall; far external 'tce1_32.dll';
function DJTrk_AppendTelNum(trunkID : integer; phoneCode : char ) : boolean; stdcall; far external 'tce1_32.dll'; //ADD
function DJTrk_GetDialStatus(trunkID : integer) : DialStatus; stdcall; far external 'tce1_32.dll';
function trunkCheckDialIsFail(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_CheckApplyDtmf(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll'; //these is a dtmf resource link to this trunk
function DJTrk_ApplyDtmf(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_FreeDtmf(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
function DJTrk_GetMfcCode(trunkID : integer) : pchar; stdcall; far external 'tce1_32.dll';
function DJTrk_GetHostCode(trunkID : integer) : pchar; stdcall; far external 'tce1_32.dll';
function DJTrk_GetDtmfCode(trunkID : integer) : pchar; stdcall; far external 'tce1_32.dll';
function DJTrk_GetReciveMfcNum(trunkID : integer) : integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetReciveCallerNum(trunkID : integer) : integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetReciveDtmfNum(trunkID : integer) : integer; stdcall; far external 'tce1_32.dll';
function DJTrk_GetFirstDtmfCode(trunkID : integer) : char; stdcall; far external 'tce1_32.dll';
function DJTrk_GetLastDtmfCode (trunkID : integer) : char; stdcall; far external 'tce1_32.dll';
function DJTrk_InitDtmfBuf(trunkID : integer) : boolean; stdcall; far external 'tce1_32.dll';
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -