[Acil] PIC 16F874-877 ile led göstergeli devir saati

[mckaan42]

Gev hocamın paylaşmış olduğu bu devreyi yapıyorum bu devre arabaya göre ve 8000 devir için yapılmış bir devre programı assemblyde yazılmış ve her 250 devirde 1 led yanacak şekilde tasarlanmış. Şimdi sevgili hocalarım Ben bu devreyi motorsiklet için yapıyorum 11000 devir olacak 27 Led var ve her 500 devirde bir led yanacak şekilde yapmak istiyorum programı inceledim ve 250 rpm yi 500 rpm olarak değiştirilecek yeri bulamadım Yardımlarınızı bekliyorum. Motorun Ön düzeni dağınık duruyor.

Devrenin Şeması


Assembly Program Kodu :

Kod Seç Genişlet

; Programm fur digitale Drehzahlanzeige V1.0 mit 16F874
; (C) Johannes Walk
;
; Für PIC16F874
; Osc: Quartz, HS, 20MHz 30pF
; Mit Funktionstest und SPIKE-Unterdrückung
; Eingang: 100k auf 5,1V-ZD (0,5W) und 10nF gen GND in PORTA,0
; Ausgänge: ab PORTA,1 32 OUT\'s aufsteigend
; Anzeige: ab 0 RPM in 250 RPM-Schritten, aufsteigend, Balkenanz.
 
 LIST  P=PIC16F874
 
; Include file
 
 include <p16f874.inc>
 
DZ00 equ 0x70
DZ01 equ 0x71
DZ02 equ 0x72
DZ03 equ 0x73
TIMEREG1 equ 0x60
EINGREG  equ 0x61
 
 goto Definitionen
 
TEST
 clrf TIMEREG1
tests1
 call TESTT
 btfss PORTE,2
 goto tests1
tests2
 call TESTT
 btfsc PORTE,2
 goto tests2
 call RESET
 call DISPLAY
 RETURN
 
TESTT
 clrwdt
 btfss INTCON,2 ; Bit für TMR0-Überlauf, 1 wenn passiert
 RETURN
 bcf INTCON,2
 decfsz TIMEREG1,f
 RETURN
 movlw 0x60
 movwf TIMEREG1
 call ROTATE
 call DISPLAY
 RETURN
 
TIMER
 clrwdt
 btfss INTCON,2 ; Bit für TMR0-Überlauf, 1 wenn passiert
 RETURN
 bcf INTCON,2
 decfsz TIMEREG1,f
 RETURN
 movlw 0x92 ;3D=61(20MHz), Teilerfaktor für 0,05 sec (20,01Hz)
 movwf TIMEREG1
 call DISPLAY ; Wenn die Zeit rum ist: RESET...
 call RESET
 call ROTATE
 RETURN
 
EINGANG
 btfsc PORTA,0
 goto e01
e00 ;Eingang=0
 bcf EINGREG,0
 RETURN
e01 ;Eingang=1
 btfss EINGREG,0
 call FLANK
 bsf EINGREG,0
 RETURN
 
FLANK
 call ROTATE
 RETURN
 
ROTATE
 RLF DZ00,f
 bsf DZ00,0
 RLF DZ01,f
 RLF DZ02,f
 RLF DZ03,f
 RETURN
 
RESET
 clrf DZ00
 clrf DZ01
 clrf DZ02
 clrf DZ03
 RETURN
 
DISPLAY
 clrf PORTA
 btfss DZ00,0
 bsf PORTA,1
 btfss DZ00,1
 bsf PORTA,2
 btfss DZ00,2
 bsf PORTA,3
 btfss DZ00,3
 bsf PORTA,4
 btfss DZ00,4
 bsf PORTA,5
 clrf PORTB
 btfss DZ00,5
 bsf PORTB,0
 btfss DZ00,6
 bsf PORTB,1
 btfss DZ00,7
 bsf PORTB,2
 btfss DZ01,0
 bsf PORTB,3
 btfss DZ01,1
 bsf PORTB,4
 btfss DZ01,2
 bsf PORTB,5
 btfss DZ01,3
 bsf PORTB,6
 btfss DZ01,4
 bsf PORTB,7
 clrf PORTC
 btfss DZ01,5
 bsf PORTC,0
 btfss DZ01,6
 bsf PORTC,1
 btfss DZ01,7
 bsf PORTC,2
 btfss DZ02,0
 bsf PORTC,3
 btfss DZ02,1
 bsf PORTC,4
 btfss DZ02,2
 bsf PORTC,5
 btfss DZ02,3
 bsf PORTC,6
 btfss DZ02,4
 bsf PORTC,7
 clrf PORTD
 btfss DZ02,5
 bsf PORTD,0
 btfss DZ02,6
 bsf PORTD,1
 btfss DZ02,7
 bsf PORTD,2
 btfss DZ03,0
 bsf PORTD,3
 btfss DZ03,1
 bsf PORTD,4
 btfss DZ03,2
 bsf PORTD,5
 btfss DZ03,3
 bsf PORTD,6
 btfss DZ03,4
 bsf PORTD,7
 clrf PORTE
 btfss DZ03,5
 bsf PORTE,0
 btfss DZ03,6
 bsf PORTE,1
 btfss DZ03,7
 bsf PORTE,2
 RETURN
 
Definitionen ;   Allg. Grunddefinitionen
 clrw
 clrwdt
 BANKSEL TMR0
 clrf PORTA
 clrf PORTB
 clrf PORTC
 clrf PORTD
 clrf PORTE
 BANKSEL OPTION_REG
 movlw b\'00000000\'
 movwf ADCON0
 movlw b\'00000111\'
 movwf ADCON1
 movlw b\'00000001\'
 movwf TRISA
 movlw b\'00000000\'
 movwf TRISB
 movlw b\'00000000\'
 movwf TRISC
 movlw b\'00000000\'
 movwf TRISD
 movlw b\'00000000\'
 movwf TRISE
 clrf INTCON
 movlw b\'00000011\'
 movwf OPTION_REG
 clrwdt
 BANKSEL TMR0
 clrf PORTA
 clrf PORTB
 clrf PORTC
 clrf PORTD
 clrf PORTE
 clrf DZ00
 clrf DZ01
 clrf DZ02
 clrf DZ03
 clrf TIMEREG1
 call TEST
 
Main
 clrwdt
 call TIMER
 call EINGANG
 goto Main
 
 END

[mckaan42]

Arkadaşlar Yok mu assembly dilinden anlayan bi arkadaşımız.