hola estoy haciendo un código para un pic 18f4455, consiste en que los puertos rb0,rb1, rb2, rb4 si uno de esto pines esta recibiendo un impulso eléctrico (1) envía la información por usb donde lo recibirá un programa el programa si el programa envía un dato lo recibe si es igual a 1 prende dos led.
eso es por ahora pero me sale estos errores al compilar
ERROR: Macro usbinit? not found in the macro file.
ERROR: Macro usbservice? not found in the macro file.
ERROR: Macro usbiout?CBTL not found in the macro file.
ERROR: Macro usbin?CBTL not found in the macro file.
cabe decir que no se mucho de pic basic y algunas cosas los saque de otro ejemplo aquí el codigo:
eso es por ahora pero me sale estos errores al compilar
ERROR: Macro usbinit? not found in the macro file.
ERROR: Macro usbservice? not found in the macro file.
ERROR: Macro usbiout?CBTL not found in the macro file.
ERROR: Macro usbin?CBTL not found in the macro file.
cabe decir que no se mucho de pic basic y algunas cosas los saque de otro ejemplo aquí el codigo:
Código:
define osc 4
p1 var portd.0
p2 var portd.1
p3 var portd.2
p4 var portd.4
USBBufferSizeMax con 8
USBBufferSizeTX con 8
USBBufferSizeRX con 8
' the USB buffer...
USBBuffer Var Byte[USBBufferSizeMax]
USBBufferCount Var Bit
dato var bit
usbinit
ProgramStart:
PORTB=USBBuffer[7]
gosub dousbin
goto ProgramStart
escaneo:
if p1==1 or p2==1 or p3==1 or p4==1 then
USBBuffer[0]=1
DoUSBOut:
usbservice
USBOut 1, USBBuffer, USBBufferCount, DoUSBOut
return
DoUSBIn:
USBBufferCount = USBBufferSizeRX
USBService
USBIn 1, USBBuffer, USBBufferCount, DoUSBIn
return
endif
if USBBuffer[0]==1 then
high portb.0
high portb.1
endif
goto escaneo
end