Hallo, finde Hier eine/r einen Fehler im mein Quellcode DEFINE LOADER_USED 1 DEFINE OSC 20 BufferSize con 8 DataBuffer Var Byte(BufferSize) ' data buffer DataBufferCount Var Byte ' buffer size ADCON1 = 7 ' Port A = digital I/O CDS VAR BYTE TRISA.0 = 1 ' Set Port A pin 0 to input USBInit Main: pot PORTA.0, 255, CDS DataBuffer(0) = "A" DataBuffer(1) = "0" DataBuffer(2) = CDS[0] DataBuffer(3) = "." DataBuffer(4) = CDS[1] databuffer(5) = CDS[2] GOSUB DoUSBOut GOTO Main ' ************************************************************ ' receive data from the USB bus ' ************************************************************ DoUSBIn: DataBufferCount = BufferSize USBService USBIn 1, DataBuffer, DataBufferCount, DoUSBIn RETURN ' ************************************************************ ' wait for USB interface to attach ' ************************************************************ DoUSBOut: DataBufferCount = BufferSize USBService USBOut 1, DataBuffer, DataBufferCount, DoUSBOut RETURN END Gruß Andreas Klein
Bitte melde dich an um einen Beitrag zu schreiben. Anmeldung ist kostenlos und dauert nur eine Minute.
Bestehender Account
Schon ein Account bei Google/GoogleMail? Keine Anmeldung erforderlich!
Mit Google-Account einloggen
Mit Google-Account einloggen
Noch kein Account? Hier anmelden.