Advertisement
Guest User

Untitled

a guest
Jun 23rd, 2018
81
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.38 KB | None | 0 0
  1. list p=16f887
  2.  
  3. org 0x00
  4. goto bios
  5. endbios
  6. goto main
  7.  
  8. org 0x04
  9. goto inter
  10.  
  11. bios: ; BEGIN BIOS
  12. ; PA
  13. ; BIT BOTAO
  14. ; 0 00
  15. ; 1 01
  16. ; 2 10
  17. ; 3 11
  18.  
  19. ;PB
  20. ;BIT LED
  21. ;0 BOTAO START
  22. ;1 00
  23. ;2 01
  24. ;3 10
  25. ;4 11
  26.  
  27. bcf 0x03,6
  28. bsf 0x03,5 ; BANCO 1
  29.  
  30. movlw 0x0f ; 0000 1111
  31. movwf 0x85 ; TRIS A
  32. movlw 0x01 ; 0000 0001
  33. movwf 0x86 ; TRIS B
  34. clrf 0x87 ; TRIS C
  35. clrf 0x88 ; TRIS D
  36. clrf 0x89 ; TRIS E
  37.  
  38. movlw 0x00 ; 0000 0000
  39. movwf 0x8c ; PIE1
  40.  
  41. bcf 0x03,6
  42. bcf 0x03,5 ; BANCO 0
  43.  
  44. clrf 0x05 ; PORT A
  45. clrf 0x06 ; PORT B
  46. ;clrf 0x07 ; PORT C
  47. ;clrf 0x08 ; PORT D
  48. ;clrf 0x09 ; PORT E
  49.  
  50. clrf 0x20;boleanos
  51. clrf 0x22;armazenamento do TMR1L
  52. clrf 0x23;armazenamento do TMR2H
  53.  
  54. clrf 0x0c ; PIR1
  55.  
  56. movlw 0x00
  57. movwf 0x0f ; TMR1H
  58. movlw 0x00
  59. movwf 0x0e ; TMR1L
  60.  
  61. movlw 0xd0 ; 1101 0000
  62. movwf 0x0b ; INTCON
  63.  
  64. ;Pre Escala 1:1
  65. movlw 0x01 ; xx00 0001
  66. movwf 0x10 ; T1CON
  67.  
  68.  
  69. goto endbios
  70. ; END BIOS
  71.  
  72.  
  73. main:
  74.  
  75. lop:
  76. ;btfss 0x20, 0; se o botao de start for apertado na primeira vez
  77. nop
  78. goto lop
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87. inter: bcf 0x0b,1 ; Apaga a flag INT EXT. -> RB0 (0x06,0)
  88. movf 0x0e,0
  89. movwf 0x22 ;0x20 = tmr1Low
  90.  
  91. movf 0x0f,0
  92. movwf 0x23 ;0x21 = tmr1High
  93.  
  94. bsf 0x20, 0;Booleano do botao start
  95.  
  96. retfie
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement