Advertisement
Guest User

Untitled

a guest
Nov 23rd, 2014
210
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.03 KB | None | 0 0
  1. ; -----------------------------------------------------------------------
  2. ; Template source file generated by piklab
  3. #include <p12f675.inc>
  4.  
  5. ; -----------------------------------------------------------------------
  6. ; Configuration bits: adapt to your setup and needs
  7. __CONFIG _LP_OSC & _WDT_ON & _PWRTE_OFF & _MCLRE_ON & _BODEN_ON & _CP_OFF & _CPD_OFF
  8.  
  9. TRIS0 EQU 0
  10.  
  11. ; -----------------------------------------------------------------------
  12. ; Variables declaration
  13. INT_VAR UDATA 0x20
  14. w_saved RES 1 ; variable used for context saving
  15. status_saved RES 1 ; variable used for context saving
  16.  
  17. var1 RES 1 ; example variable
  18. Reg_1 RES 1
  19. Reg_2 RES 1
  20. Reg_3 RES 1
  21.  
  22. ; -----------------------------------------------------------------------
  23. ; reset vector
  24. STARTUP CODE 0x000
  25. nop ; needed for ICD2 debugging
  26. ;movlw high start ; load upper byte of 'start' label
  27. ;movwf PCLATH ; initialize PCLATH
  28.  
  29. movlw 0x07 ;switch off comparator
  30. movwf CMCON
  31. clrf ADCON0 ; switch off A/D converter
  32. bsf STATUS,RP0 ;go to BANK1
  33. movlw 0x08
  34. movwf TRISIO
  35. clrf ANSEL ;switch off analog inputs
  36. clrf VRCON ;switch off voltage reference
  37. bcf STATUS, RP0
  38.  
  39. clrf GPIO ; initialize GPIO ports
  40.  
  41. goto start ; go to start of main code
  42.  
  43. start
  44. ; << insert main code >>
  45. clrwdt
  46. movlw 0xFF ;enable all GPIO ports
  47. movwf GPIO
  48. call pause
  49. call pause
  50. clrf GPIO
  51. call pause
  52. call pause
  53. goto start ; loop forever
  54.  
  55. ;delay = 500'000 machine cycles
  56. pause movlw .126
  57. movwf Reg_1
  58. movlw .137
  59. movwf Reg_2
  60. movlw .3
  61. movwf Reg_3
  62. wr decfsz Reg_1, F
  63. goto wr
  64. clrwdt
  65. decfsz Reg_2, F
  66. goto wr
  67. decfsz Reg_3, F
  68. goto wr
  69. return
  70. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement