Communication

USB GENERIC HOST for USB GSM MODEM ---- How to setup send receive AT commands EP's?

Using USBHost_dsPIC Library and some of the following code, My USB MODEM ENUMERATES...

Could someone help me setup Call Backs to Send AT Commands to Modem?
I have done this with Microchips Generic Host using C Library...
Trying to transition to MikroBasic for this and other functionality.

Thanks



sub procedure USB1Interrupt() iv IVT_ADDR_USB1INTERRUPT
USBHost_IntHandler()
end sub

sub procedure EventHandler(dim event as byte)
select case(event)

case _USB_HOST_EVENT_DEVICE_ADDRESSED
UART2_Write_Text("Host Addressed")
UART2_Write(13)
UART2_Write(10)


case _USB_HOST_EVENT_DEVICE_CONNECTED
UART2_Write_Text("Host Connected")
UART2_Write(13)
UART2_Write(10)
case _USB_HOST_EVENT_DEVICE_DISCONNECTED
UART2_Write_Text("DisConnected")
UART2_Write(13)
UART2_Write(10)
case _USB_HOST_EVENT_DEVICE_ENUMERATED
UART2_Write_Text("Device Enumerated")
UART2_Write(13)
UART2_Write(10)
speed=11
speed = USBHost_GetDeviceSpeed()
USBHost_InitEp(0x02)
if speed = _USB_HOST_SPEED_LOW then
Uart2_Write_Text("The Device is Low Speed")
UART2_Write(13)
UART2_Write(10)
end if

if speed = _USB_HOST_SPEED_FULL then
Uart2_Write_Text("The Device is FULL Speed")
UART2_Write(13)
UART2_Write(10 )
end if

case _USB_HOST_EVENT_HOST_ERROR
UART2_Write_Text("Error")

end select
end sub



USB1IE_bit = 1 ''important set USB interupt bit
USBHost_RegisterDeviceEventHandler(@EventHandler)

USBHost_Init()

while TRUE
' LATB.15 = not LATB.15 ' Invert PORTB value
USBHost_Main(

wend

• Rating:

0