13.11.2012 Views

Mis primeros programas en assembler - Micros Designs

Mis primeros programas en assembler - Micros Designs

Mis primeros programas en assembler - Micros Designs

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Hardware:<br />

Código<br />

GeSHi (asm):<br />

1. ; **** Encabezado ****<br />

2. list p=16f628A ; list directive to define processor<br />

3. #include ; processor specific variable definitions<br />

4. __CONFIG _CP_OFF & _WDT_OFF & _BODEN_ON & _PWRTE_ON &<br />

_INTOSC_OSC_NOCLKOUT & _DATA_CP_OFF & _LVP_OFF & _MCLRE_ON<br />

5.<br />

6. ;**** Definiciones para el <strong>en</strong>samblador ****<br />

7. #DEFINE Led PORTB,0 ; Led ubicado <strong>en</strong> Puerto B, bit 0.-<br />

8.<br />

9. ;//////////////////////////////////////////<br />

10. ;**** Inicio del Micro ****<br />

11. Reset<br />

12. org 0x00 ; Aquí comi<strong>en</strong>za el micro.-<br />

13. goto Inicio ; Salto a inicio de mi programa.-<br />

14. ;**** Vector de Interrupcion ****<br />

15. org 0x04 ; Ati<strong>en</strong>do Interrupcion.-<br />

16. goto ISR<br />

17.<br />

18. ; **** Programa Principal ****<br />

19. ;**** Configuracion de puertos ***<br />

20. org 0x05 ; Orig<strong>en</strong> del código de programa.-<br />

21. Inicio<br />

22. bsf STATUS,RP0 ; Pasamos de Banco 0 a Banco 1.-<br />

23. movlw b'11111110' ; RB0 como salida.-<br />

24. movwf TRISB<br />

25. bcf STATUS,RP0 ; Banco 0.-<br />

26. movlw b'00110001' ; Se selecciona TMR1, preescaler de 1/8,<br />

modo temporizador.-<br />

27. movwf T1CON<br />

28. bcf Led ; El Led comi<strong>en</strong>za apagado.-<br />

29. movlw 0x6D ; Cargamos 28036 <strong>en</strong> TMR1 para lograr<br />

300ms.-<br />

30. movwf TMR1H ; Byte alto de TMR1.-<br />

31. movlw 0x84<br />

32. movwf TMR1L ; Byte bajo de TMR1.-<br />

33. bsf STATUS,RP0 ; Banco 1.-<br />

34. bsf PIE1,TMR1IE ; Activar interrupción por TMR1.<br />

35. bsf INTCON,GIE ; Habilitacion g<strong>en</strong>eral de interrupciones.-<br />

Autor: Suky Mail: inf.pic.suky@live.com.ar Web: www.micros-designs.com.ar

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!