; Assembly PIC18 - Versione 0.1 - Marzo 2016
; Copyright (c) 2016, Vincenzo Villa
; Creative Commons | Attribuzione - Condividi allo stesso modo 4.0 Internazionale (CC BY-SA 4.0)
; Creative Commons | Attribution-Share Alike 4.0 Unported
; https://www.vincenzov.net/tutorial/PIC18/assembly/hello-2.htm
    
; PIC18F26K20 / MPLAB X 3.26 / MPASM v5.66
    
; Questo programma conta da 3 a 9 e visualizza su PORTC il risultato
; Nota: questo programma va eseguito passo-passo oppure occorre usare un oscilloscopio

#include "p18f26k20.inc"
                        ; il file con la definizine dei registri specifici del PIC in uso
    
    CODE    0x0000	; vettore di reset, indirizzo 0. Il codice inizia qui

    clrf TRISC		; azzera il registro speciale TRISC 
                        ; (imposta PORTC come uscita)
ricomincia	  
    movlw  .3		; copia 3 in W
    movwf LATC		; copia il contenuto del registro W nel registro speciale LATC 
    movlw  .10

ripeti    
    incf  LATC		; incrementa di 1 WREG
    cpfseq LATC         ; confronta i contenuti di LATC e W
    bra ripeti	        ; se diversi: continua a decrementare
    bra ricomincia      ; altrimenti: ricomincia da 3

    END			; fine del file