Moderadores: andre_luis, 51, guest2003, Renie
//*** Variaveis
unsigned short userWR_buffer[2], userRD_buffer[2];
//*** Declaração de Interrupções
void interrupt()
{
HID_InterruptProc();
}
//*** Funcao MAIN
void main()
{
// configuração da direção dos pinos de I/O
//0=saida, 1=entrada
TRISA = 0b00000001; // usado para o AD
TRISB = 0b00000001; // Pino B0 como entrada para o pulso do odômetro
TRISC = 0b11111111 ; // Pinos RC4 e RC5 usados pela USB,desativados qdo USB enabled
TRISE = 0b00000111;
//Configuração do AD
ADCON0= 0b00000001;// AD ON e Canal 0 Selecionado
ADCON1= 0b00001110 ;// Canal 0 como Analógico e GND e VCC como referencia
ADCON2= 0b10110101;// FOSC/16,16*TAD,Valor justificado a direita
HID_Enable(&userRD_buffer, &userWR_buffer);//Inicializa a USB
Delay_ms(2000); //Aguarda 2 segundos
while (1)
{
adcon0.go_done=1; //Inicializa a conversão
while(adcon0.go_done); //Aguarda finalizar a conversão
userWR_buffer[0] = ADRESL; //Armazena a parte baixa do AD
userWR_buffer[1]= ADRESH; //Armazena a parte alta do AD
//Envia os 2 Bytes,gasta-se 1ms para enviar tudo
while(!Hid_Write(&userWR_buffer, 2));
}
}
lellis escreveu:olás. demorou mas o usb bate a minha porta. tô querendo comunicar o pic com o delphi ou vb via usb. o ex. do amigo aceltec num tá + no 4shared. alguém pode colocar no rapidshare.de pra mim?
otra cosa: uso o hitech-c. creio que não vou ter probl. em portar o cod. mas você já fez algo com ele? tbem quero que o pc mande controles pro pic. é simples?
resumindo: preciso de um "hello world" pro usb. na nossa lingua: "pisca led"
grato pelo vosso tradicional senso de coleguismo!!!!!!!
(hoje é quasisexta!!! iurúuuuuu!!!)
Sergio38br escreveu:boas Lellis, da uma olhada neste arquivo
http://www.microchipc.com/sourcecode/#pic18f4550usb
Sergio
Usuários navegando neste fórum: Nenhum usuário registrado e 1 visitante