usbhid and suart together

[madru]

Hi,

is it possible to use both lib's together? - I like to see my HID debug output via RS232

Code: Select all

Device = 18F2550
Clock = 48
   
// 20Mhz crystal, 48Mhz internal (FS USB)
Config
  PLLDIV = 2,
  CPUDIV = OSC1_PLL2,
  USBDIV = 2,
  FOSC = HSPLL_HS,  //CPU=48 MHz
  PWRT   = ON,
  BOR    = OFF,
  VREGEN = ON, 		//USB Voltage Regulator Enable:
  WDT    = OFF, 	//Watchdog Timer:
  MCLRE  = OFF, 		//MCLR disabled:
  PBADEN = OFF, 	//PORTB<4:0> pins are configured as digital I/O on Reset
  LVP    = OFF 	    //Low Voltage ICSP:

Include"usbhid.bas" // <<=== as soon you include the Lib SUART is broken
Include "SUART.bas"


ReadTerminator = 13 
SetTX(PORTC.6) // whatever 
SetRX(PORTC.7) // whatever 
SetBaudrate(sbr19200)
SetMode(umTrue)
While true
   UART.Write("Test",13,10) //garbage is transmitted 



Wend

THX

M

[richardb]

it's an interrupt thing. anytime the suart code is unterrupted it will bork the timing.

i do the following.

make sure your suart output is fast so the interrupt delay is minimised.

Code: Select all

Sub MyWrite(x As Byte)
        CDC.DisableISR
        UART.Write(x)
        CDC.EnableISR
End Sub
Sub debugI(y As Byte)
     MyWrite(y)
End Sub
Sub debugI(x As String)
        Dim index As Byte
        index = 0
        Repeat
            MyWrite(x(index))
            index=index+1
        Until Byte(x(index))=0
   End Sub
Public Compound Sub debug(debugI)

i havent tried with hid but i would imagine it will also work

[madru]

BINGO

THX