Module USBIF4CW_v23


    Declare Function usbif4cwOpen Lib "usbif4cw.dll" (ByVal Param As Integer) As Integer
    Declare Sub usbif4cwClose Lib "usbif4cw.dll" (ByVal nId As Short)
    Declare Function usbif4cwWriteData Lib "usbif4cw.dll" (ByVal port As Short, ByVal Data As Byte) As Integer
    Declare Function usbif4cwPutChar Lib "usbif4cw.dll" (ByVal nId As Short, ByVal c As Byte) As Integer
    Declare Function usbif4cwPutCode Lib "usbif4cw.dll" (ByVal nId As Short, ByVal c As Byte) As Integer
    Declare Function usbif4cwIsTxBusy Lib "usbif4cw.dll" (ByVal nId As Short) As Integer
    Declare Function usbif4cwTxCancel Lib "usbif4cw.dll" (ByVal nId As Short) As Integer
    Declare Function usbif4cwSetPTT Lib "usbif4cw.dll" (ByVal nId As Short, ByVal tx As Byte) As Integer
    Declare Function usbif4cwSetPTTParam Lib "usbif4cw.dll" (ByVal nId As Short, ByVal nLen1 As Byte, ByVal nLen2 As Byte) As Integer
    Declare Function usbif4cwSetWPM Lib "usbif4cw.dll" (ByVal nId As Short, ByVal nWPM As Short) As Integer
    Declare Function usbif4cwGetWPM Lib "usbif4cw.dll" (ByVal nId As Short) As Integer
    Declare Function usbif4cwSetCallbackWindow Lib "usbif4cw.dll" (ByVal nId As Short, ByVal hWnd As Integer) As Integer
    Declare Function usbif4cwSetSideTone Lib "usbif4cw.dll" (ByVal nId As Short, ByVal nTone As Byte) As Integer
    Declare Function usbif4cwGetVersion Lib "usbif4cw.dll" (ByVal nId As Short) As Integer
    'Declare Function usbif4cwReadData Lib "usbif4cw.dll" (ByVal nId As Integer, ByVal port As intger) As Long

    Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Integer)

    Public usbif4cwOpen_flag As Short
    Public PutChar As String


End Module