00 99 ileri ve geri sayıcı devreleri pic16f84 asm pbp

2 adet uygulama var proteus isis ve diğer kaynak dosyalar bulunmakta 00 99 ileri sayıcı assembly PIC16F84 7447 display göstergeli (otomatik)

ASM Yazılımı

;%MICROCONTROLADORES PIC %

;AUTOR : BRYAM HUAMANCHUMO BACA
;LABORATORIO # 02b : CONTADOR ASCENDENTE DE 00 AL 99 CON RETORNO

         List P=16f84A
         include 
        
         __CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC
         CBLOCK 0x0C                 ; La zona de memoria de usuario en este número
         numero                             
         var1
         var2
         ENDC
        
;ZONA DE CÓDIGOS

   
         ORG 0x00                    ; El programa comienza en la dirección 0    
   
inicio  
         
         bsf    STATUS,RP0           ; Acceso al banco 1.
         movlw  b'00000111'  
         movwf  OPTION_REG
         clrf   TRISB                ; Las líneas del Puerto B se configuran como salida
         bcf    STATUS,RP0           ; Acceso al Banco 0
         clrf   var1
         clrf   var2
         
Principal
   
         movf   var1,0
         call   BIN_a_BCD
         movwf  numero
         swapf  numero,0
         movwf  PORTB

salto    incf   var2,1
         btfss  var2,2
         goto   Timer0_us
         clrf   var2
        
         movlw  d'100'
         incf   var1,1
         subwf  var1,0
         btfss  STATUS,2
         goto   Principal
         clrf   var1
         goto   Principal
 
;Subrutina "Timer0_us"

Timer0_us

         movlw  0x00                 ; TMR0_Carga
         movwf  TMR0                 ; Carga el Timer 0.
         bcf    INTCON,T0IF          ; Resetea el flag de desbordamiento del TMR0
        
Timer0_Rebosamiento

         btfss  INTCON,T0IF          ; Se haproducido desbordamiento
         goto   Timer0_Rebosamiento  ; Todavía no repite
         goto   salto

         INCLUDE 
         END 

99 00 geri sayıcı pic basic pro PIC16F84 7447 display göstergeli (otomatik)

PBP Yazılımı

'% MICROCONTROLADORES PIC %

'AUTOR : BRYAM HUAMANCHUMO BACA
'LABORATORIO # 01c : CONTEO DESCENDENTE DE 99 A 00


I VAR BYTE
Unidad VAR BYTE
Decena VAR BYTE
X0 VAR Unidad.0
X1 VAR Unidad.1
X2 VAR Unidad.2
X3 VAR Unidad.3
X4 VAR Decena.0
X5 VAR Decena.1
X6 VAR Decena.2
X7 VAR Decena.3

TRISB = 0 'Salida

Inicio:
  
  For I = 99 TO 0 STEP -1
    
    Decena = I/10
    Unidad = I - Decena*10
    
    PORTB.0 = X0
    PORTB.1 = X1
    PORTB.2 = X2
    PORTB.3 = X3
    PORTB.4 = X4
    PORTB.5 = X5
    PORTB.6 = X6
    PORTB.7 = X7
    
    Pause 200
    
  Next I
  
GoTo Inicio