Que les Parece Algunos Ejemplos en ASM...

Hola a todos..
Ojala que sumemos mas integrantes de este foro.. les propongo ir agregando algunos ejemplos de programacion en ensamblador.usando gputils..


Atte.
Risanti..

Aqui va un ejemplo basico es una luz intermitente con un led...

Código:


;*****************************************************************************
;Ejercio nº 1
;Ricardo Santibañez R.
;Ejemplo encender 8 led de manera intermitente 1 seg
;PIC 16F84A ; 4MHZ (Xt)
;Porta=entrada ,Portb=Salidas
;Led se activan aplicando un 1 en cada bit de registro 0x06
;Watch Dog:off, Cp:off
;;*****************************************************************************

list  p=16f84A

#include p16f84a.inc

__CONFIG  _CP_OFF & _HS_OSC & _WDT_OFF    ;Configuracion Fusibles Pic

 
f    equ    1
tmro    equ    0x01            ;Registro Option o Tmro
estado    equ    0x03            ;Registro Status
led    equ    0x06            ;Registro Portb o Trisb
boton    equ    0x05            ;Registro Porta o Trisa
temp    equ    0x21            ;Variable GPR
 
org    0

        bsf    estado,5    ;Ingresar a banco 1
        movlw    0xff        ;255-->W
        movwf    boton        ;Portc=input
        clrf    led        ;Portb=Output
        movlw    b'00000111'    ;configuro TMR0
        movwf    tmro        ;Option_Tmro=7
        bcf    estado,5    ;Salir de Banco 1
        clrf    led        ;inicio Portb=0

inicio:   
        comf led,f        ;Enciendo o apago  los led(0 al 7)
        call delay1s        ; llamo rutina de retardo 1seg
        goto inicio        ;repetir secuencia
 
delay1s        movlw    d'30'          ;Rutina delay= 32,7ms x 30 aprox  1seg

        movwf    temp       
delay1        clrf    tmro            ;inicio timer0 desde 0 a 128
delay2        btfss    tmro,7            ;¿Timer0 es = 128?
        goto    delay2
        decfsz    temp            ;Se a repedito el Bucle durante 152 Veces??
        goto delay1
        return   
 
    end

Pues tienes toda la razón, tenemos el asm aquí en una esquina medio olvidado; por lo pronto voy a empezar con un ejemplo sencillo para usar los comparadores en un pic16f628a:

Por cierto... quieres que lo ponga en este hilo o prefieres que abra otro tema y tú sigues aqui con tus ejemplos???

Código:




;    EJEMPLO DE USO DE COMPARADORES EN PIC16F628A


; -----------------------------------------------------------------------
; Entradas analogicas conectadas al comparador C2 (pines A1 y A2)
; salidas por B6 y B7
; -----------------------------------------------------------------------
; -----------------------------------------------------------------------

    #include <p16f628a.inc>
    #include <macros.inc>          ; Archivo con los delays

; -----------------------------------------------------------------------

; Bits de configuración:
    __CONFIG _WDT_OFF & _PWRTE_ON & _INTOSC_OSC_NOCLKOUT & _MCLRE_ON & _BOREN_OFF & _LVP_OFF & _DATA_CP_OFF & _CP_OFF


; -----------------------------------------------------------------------
; Vector de inio:
   org      0x00

; -----------------------------------------------------------------------

start
   BANKSEL   TRISA
   movlw   b'00000110'         ;A1 y A2 como entradas
   movwf   TRISA
   movlw   b'10000000'         ;B7 como entrada
   movwf   TRISB
   BANKSEL   PORTA
   clrf   PORTA
   clrf   PORTB

   movlw   b'000101'         ;Activar solo comparador C2
   movwf   CMCON

compara
   delay   d'15',d'15'
   bsf   PORTB,1
   bsf   PORTB,0

   delay   d'5',d'5'
   btfsc   PORTB,7
   goto   compara
   btfss   CMCON,7            ;comprueba bit7 de CMCON
   goto   __0            ;si bit=0
   bsf   PORTB,1            ;si bit=1 sube B,1
   bcf   PORTB,0            ;y baja B,0
   goto   compara
__0
   bsf   PORTB,0            ;sube B,0
   bcf   PORTB,1            ;y baja B,1
   goto   compara

END



Pikitin

La idea es seguir en este hilo, agregando todos los ejemplos que tengamos en ASM o quizar hacer un nuevo tema para enseñar lo basico de programacion en asm utilizando software GPL , hasta me ocurre hasta quiza realizar un video tutorial para difuncir el mundo de programacion de pic en Linux.

Quiza no se una gran experto en Programacion pero mis conocimiento pueden ayudar a personas que se esten iniciando.

atte.
Risanti..

Pues a mí lo del video me parece una gran idea, he visto algunos video-tutoriales de programación y resultan mucho más faciles y más agradables que leer algo escrito... si lo ves ahí delante lo comprendes más facilmente... también es mucho más dificil explicar algo escribiendo un mensaje que grabando una sesión de escritorio por ejemplo....

Sí señor.... anímate y haz alguno a ver que sale...

Hasta a mí me están dando ganas...

¿Y por qué no colgar estos ejemplos en Linexedu una vez comprobado su funcionamiento con KTechLab?