23 gennaio 09, 00:22 | #21 (permalink) Top | |
User Data registr.: 11-10-2004 Residenza: out of Verona
Messaggi: 573
| Citazione:
testato con potenziometro e funziona, adesso proverò con resistenza e condensatore. Il mio dubbio è sull'hardware non sul software voilà: PIC12675 #define TXPIN GPIO.F5 #define LEDPIN GPIO.F1 unsigned int Analog ; unsigned int Count ; unsigned char Led ; // 1 ciclo = //================================================== ============================ void interrupt(void) // 50Hz 20mS { INTCON.GIE = 0 ; if (INTCON.T0IF) { Count++ ; if (Count>50) { Count=0 ; if (Led==0) Led=1 ; else Led=0 ; } LEDPIN=Led ; ADCON0.GO=1 ; while (ADCON0.GO==1) ; Analog=ADRESH ; Analog<<=8 ; Analog|=ADRESL ; Analog+=1000 ; Analog/=10 ; TXPIN=1 ; Delay_Cyc(Analog); //( Analog) ; TXPIN=0 ; TMR0=156 ; INTCON.T0IF = 0 ; // ack interrupt } INTCON.GIE = 1 ; } //------------------------------------------------------------------------------ void GetSetOscCal(void) { asm { bsf STATUS, RP0 // ; Bank 1 call 0x3ff // ; Get the cal value movwf OSCCAL // ; Calibrate bcf STATUS, RP0 // ; Bank 0 } } //------------------------------------------------------------------------------ void init(void) { OPTION_REG = 0b00000110 ; // assign prescaler to TMR0 1:128 ANSEL = 0x01 ; // GPIO.F0 analog ADCON0 = 0b10000001 ; // left justify, analog on CMCON = 0x07 ; // comparator off WPU = 0x00 ; // week pull ups off all pins ADCON0.VCFG= 0x00 ; // Vdd as Vref GPIO = 0x00 ; // initialize gpio TRISIO = 0b00000001 ; } //------------------------------------------------------------------------------ void EnableInterrupt(void) { INTCON.GIE = 1 ; INTCON.T0IE = 1 ; } //------------------------------------------------------------------------------ void main(void) { Init() ; GetSetOscCal() ; Count=0 ; Led=1 ; LEDPIN=1 ; EnableInterrupt() ; TMR0=156 ; while (1) { /* TXPIN=1 ; Delay_Cyc(90); //( Analog) ; TXPIN=0 ; delay_ms(20) ; */ } } | |
04 febbraio 09, 20:54 | #22 (permalink) Top |
User Data registr.: 20-11-2003
Messaggi: 38
|
Davvero un progetto mitico... io l'ho preso da poco un minium... appena mi annoiero delle prestazioni di base seguirò i vostro consigli.
__________________ Per gli appassionati di fiches: http://www.chipsandcasino.com |
Bookmarks |
| |
Discussioni simili | ||||
Discussione | Autore discussione | Forum | Commenti | Ultimo Commento |
Elettromandrino con Motore Brushless | saviothecnic | CNC e Stampanti 3D | 8 | 18 febbraio 12 13:39 |
Aiuto per primo volo con Minium kyosho... | anto13 | Aeromodellismo Principianti | 9 | 21 maggio 08 08:31 |
Walkera 68b Con Motore Brushless | DEF80 | Elimodellismo Motore Elettrico | 4 | 22 novembre 07 12:20 |
Sostituzione motore con brushless | karll | Aeromodellismo Volo Elettrico | 0 | 13 giugno 06 11:35 |
Brushless con motore CD-ROM | dav75 | Aeromodellismo Volo Elett. - Realizzazione Motori | 1 | 21 dicembre 02 15:14 |