shpa3api.bas

三汇CTI示例程序源码

Public Declare Function SsmQueryOpSendTone Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSendTone Lib "SHP_A3.dll" (ByVal ch As Long, ByVal nToneType As Long) As Long
Public Declare Function SsmStopSendTone Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSendToneEx Lib "SHP_A3.dll" (ByVal ch As Long, ByVal dwOnTime As Long, ByVal dwOffTime As Long) As Long

Public Declare Function SsmSetTxTonePara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                           ByVal nReq1 As Long, _
                                                           ByVal nVolume1 As Long, _
                                                           ByVal nFreq2 As Long, _
                                                           ByVal nVolume2 As Long) As Long
                                                           
Public Declare Function SsmGetTxTonePara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                          ByRef nReq1 As Long, _
                                                          ByRef nVolume1 As Long, _
                                                          ByRef nFreq2 As Long, _
                                                          ByRef nVolume2 As Long) As Long
                                                          
Public Declare Function SsmChkSendTone Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pnToneType As Long) As Long
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@ TONE ANALYZE OPERATION  @@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

Public Declare Function SsmQueryOpToneAnalyze Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmClearToneAnalyzeResult Lib "SHP_A3.dll" (ByVal ch As Long) As Long

Public Declare Function SsmStartToneAnalyze Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmCloseToneAnalyze Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetOverallEnergy Lib "SHP_A3.dll" (ByVal ch As Long) As Long

Public Declare Function SsmGetVocFxFlag Lib "SHP_A3.dll" (ByVal ch As Long, _
                                    ByVal nSelFx As Long, ByVal bClear As Long) As Long
                                    
Public Declare Function SsmGetToneAnalyzeResult Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetBusyToneLen Lib "SHP_A3.dll" (ByVal ch As Long) As Long

Public Declare Function SsmGetBusyToneCount Lib "SHP_A3.dll" (ByVal ch As Long) As Long

Public Declare Function SsmGetRingEchoToneTime Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetBusyToneEx Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSetTonePara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                         ByVal wToneFreq1 As Integer, _
                                                         ByVal wToneBW1 As Integer, _
                                                         ByVal wToneFreq2 As Integer, _
                                                         ByVal wToneBW2 As Integer, _
                                                         ByVal dwIsToneRatio As Long) As Long
                                                         
Public Declare Function SsmSetIsDialToneDtrTime Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                    ByVal wIsDialToneDtrTime As Integer) As Long
                                                    
Public Declare Function SsmSetBusyTonePeriod Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                               ByVal wBusyTonePeriod As Integer) As Long
                                                        
Public Declare Function SsmSetIsBusyToneDtrCnt Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                                 ByVal wIsBusyToneDtrCnt As Integer) As Long
                                                                 
Public Declare Function SsmSetRingEchoTonePara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                                 ByVal wRingEchoOnTime As Integer, _
                                                                 ByVal wRingEchoOffTime As Integer) As Long
                                                                 
Public Declare Function SsmSetVoiceFxPara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                            ByVal wSelFx As Integer, _
                                                            ByVal wFx As Integer, _
                                                            ByVal wFxBW As Integer, _
                                                            ByVal dwIsVocFxRatio As Long, _
                                                            ByVal wIsVocFxDtrTime As Integer) As Long
                                                            
Public Declare Function SsmSetVoiceOnDetermineTime Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                            ByVal wIsVocDtrTime As Integer) As Long
                                                            
Public Declare Function SsmSetMinVocDtrEnergy Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                        ByVal dwMinVocDtrEnergy As Long) As Long

Public Declare Function SsmGetTonePara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                         ByRef pwToneFreq1 As Integer, _
                                                         ByRef pwToneBW1 As Integer, _
                                                         ByRef pwToneFreq2 As Integer, _
                                                         ByRef pwToneBW2 As Integer, _
                                                         ByRef pdwIsToneRatio As Long) As Long
                                                         
Public Declare Function SsmGetIsDialToneDtrTime Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                                  ByRef pwIsDialToneDtrTime As Integer) As Long
                                                                  
Public Declare Function SsmGetBusyTonePeriod Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                               ByRef pwBusyTonePeriod As Integer) As Long

Public Declare Function SsmGetIsBusyToneDtrCnt Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                                 ByRef pwIsBusyToneDtrCnt As Integer) As Long

Public Declare Function SsmGetRingEchoTonePara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                                 ByRef pwRingEchoOnTime As Integer, _
                                                                 ByRef pwRingEchoOffTime As Integer) As Long

Public Declare Function SsmGetIsNoVocDtrmTime Lib "SHP_A3.dll" (ByVal ch As Long, ByVal pwIsNoVocDtrmTime As Integer) As Long
Public Declare Function SsmGetVoiceFxPara Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                            ByVal wSelFx As Integer, _
                                                            ByRef pwFx As Integer, _
                                                            ByRef pwFxBW As Integer, _
                                                            ByRef pdwIsVocFxRatio As Long, _
                                                            ByRef pwIsVocFxDtrTime As Integer) As Long
                                                            
Public Declare Function SsmGetVoiceOnDetermineTime Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pwIsVocDtrTime As Integer) As Long
Public Declare Function SsmGetMinVocDtrEnergy Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pdwMinVocDtrEnergy As Long) As Long


Public Declare Function SsmQueryOpPeakFrqDetect Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSetPeakFrqDetectBW Lib "SHP_A3.dll" (ByVal ch As Long, ByVal nPeakBW As Integer) As Long
Public Declare Function SsmGetPeakFrqDetectBW Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetPeakFrqEnergy Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetPeakFrq Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetRecPlayEnergy Lib "SHP_A3.dll" (ByVal ch As Long, ByVal dwMask As Long) As Long

Public Declare Function SsmStart2ndToneAnalyzer Lib "SHP_A3.dll" (ByVal ch As Long, ByVal bEn As Long) As Long
Public Declare Function SsmGet2ndToneAnalyzerState Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSet2ndTonePara Lib "SHP_A3.dll" (ByVal ch As Long, ByVal wToneFreq1 As Integer, ByVal wToneBW1 As Integer, ByVal wToneFreq2 As Integer, ByVal wToneBW2 As Integer, ByVal dwIsToneRatio As Long) As Long
Public Declare Function SsmGet2ndTonePara Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pwToneFreq1 As Integer, ByRef pwToneBW1 As Integer, ByRef pwToneFreq2 As Integer, ByRef pwToneBW2 As Integer, ByRef pdwIsToneRatio As Long) As Long
Public Declare Function SsmGet2ndToneAnalyzeResult Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmClear2ndToneAnalyzeResult Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGet2ndBusyToneLen Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGet2ndBusyToneCount Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSet2ndBusyTonePeriod Lib "SHP_A3.dll" (ByVal ch As Long, ByVal wBusyTonePeriod As Integer) As Long
Public Declare Function SsmGet2ndBusyTonePeriod Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pwBusyTonePeriod As Integer) As Long
Public Declare Function SsmSet2ndIsBusyToneDtrCnt Lib "SHP_A3.dll" (ByVal ch As Long, ByVal wIsBusyToneDtrCnt As Integer) As Long
Public Declare Function SsmGet2ndIsBusyToneDtrCnt Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pwIsBusyToneDtrCnt As Integer) As Long
Public Declare Function SsmSet2ndIsDialToneDtrTime Lib "SHP_A3.dll" (ByVal ch As Long, ByVal wIsDialToneDtrTime As Integer) As Long
Public Declare Function SsmGet2ndIsDialToneDtrTime Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pwIsDialToneDtrTime As Integer) As Long
Public Declare Function SsmSet2ndRingEchoTonePara Lib "SHP_A3.dll" (ByVal ch As Long, ByVal wRingEchoOnTime As Integer, ByVal wRingEchoOffTime As Integer) As Long
Public Declare Function SsmGet2ndRingEchoTonePara Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pwRingEchoOnTime As Integer, ByRef pwRingEchoOffTime As Integer) As Long
Public Declare Function SsmSetBusyTonePeriodEx Lib "SHP_A3.dll" (ByVal ch As Long, ByVal nType As Long, ByVal wMax As Integer, ByRef pwPeriod As Integer) As Long
Public Declare Function SsmGetBusyTonePeriodEx Lib "SHP_A3.dll" (ByVal ch As Long, ByVal nType As Long, ByRef pwPeriod As Integer) As Long
Public Declare Function SsmGetToneValue Lib "SHP_A3.dll" (ByVal ch As Long) As Integer
Public Declare Function SsmSetToneValue Lib "SHP_A3.dll" (ByVal ch As Long, ByVal value As Integer) As Long
Public Declare Function SsmGetOverallEnergyAllCh Lib "SHP_A3.dll" (ByVal nBeginCh As Long, ByVal nChNum As Long, ByRef pdwEnergyTable As Long) As Long

'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@ BARGEIN OPERATION  @@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Public Declare Function SsmSetNoSoundDtrmTime Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                                ByVal dwIsNoSoundDtrTime As Long) As Long

Public Declare Function SsmSetIsBargeInDtrmTime Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                                  ByVal wIsBargeInDtrmTime As Integer) As Long

Public Declare Function SsmSetBargeInSens Lib "SHP_A3.dll" (ByVal ch As Long, _
                                                            ByVal nBargeInSens As Long) As Long

Public Declare Function SsmGetNoSoundTime Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetNoSoundDtrmTime Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetIsBargeInDtrmTime Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetBargeInSens Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmDetectBargeIn Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmDetectNoSound Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSetCalleeHookDetectP Lib "SHP_A3.dll" _
                                                            (ByVal ch As Long, _
                                                            ByVal wMulti As Integer, _
                                                            ByVal wValidTime As Integer) As Long
Public Declare Function SsmGetCalleeHookDetectP Lib "SHP_A3.dll" _
                                                            (ByVal ch As Long, _
                                                            ByRef wMulti As Integer, _
                                                            ByRef wValidTime As Integer) As Long()
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@ RING DETECT OPERATION  @@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Public Declare Function SsmQueryOpRingDetect Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetRingFlag Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetRingCount Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmClearRingCount Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmChkOpCallerId Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetCallerId Lib "SHP_A3.dll" (ByVal ch As Long, ByVal szCallerId As String) As Long
Public Declare Function SsmGetCallerIdEx Lib "SHP_A3.dll" (ByVal ch As Long, ByVal szCallerIdEx As String) As Long
Public Declare Function SsmClearCallerId Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmClearCallerIdEx Lib "SHP_A3.dll" (ByVal ch As Long) As Long


'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@ CALL OPERATION  @@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Public Declare Function SsmPickup Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmCheckActualPickup Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSetPickupNow Lib "SHP_A3.dll" (ByVal ch As Long, ByVal bFlag As Long) As Long
Public Declare Function SsmHangup Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmAutoDial Lib "SHP_A3.dll" (ByVal ch As Long, ByVal szPhoNum As String) As Long