Advertisement
Guest User

Untitled

a guest
Oct 21st, 2019
103
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.38 KB | None | 0 0
  1. LIST P=10F202
  2. INCLUDE p10f202.inc
  3.  
  4. STATE EQU 08H
  5. INIT EQU 09H
  6.  
  7. MOVF GPIO,W
  8. MOVWF INIT
  9.  
  10.  
  11. MOVLW 01011011B
  12. OPTION
  13.  
  14. MOVLW 11111000B
  15. TRIS GPIO
  16.  
  17. BTFSC STATUS,GPWUF
  18. GOTO WAKE
  19.  
  20. BTFSC STATUS, NOT_TO
  21. GOTO POWER_RESET
  22.  
  23. BTFSC STATE, 0
  24. GOTO POWER_ON
  25.  
  26. BTFSC STATE, 1
  27. GOTO WAIT
  28.  
  29. BTFSC STATE, 2
  30. GOTO BUTTON_GP1
  31.  
  32. BTFSC STATE, 3
  33. GOTO BUTTON_GP0
  34.  
  35. POWER_RESET
  36. BTFSC STATUS,NOT_PD
  37. GOTO POWER_ON
  38.  
  39. GOTO RESET
  40.  
  41. WAKE
  42. BTFSC INIT,1
  43. GOTO BUTTON_GP1
  44.  
  45. BTFSC INIT,0
  46. GOTO BUTTON_GP0
  47.  
  48. POWER_ON
  49. MOVLW 00000001B
  50. MOVWF STATE
  51. INCF GPIO
  52.  
  53. SLEEP
  54.  
  55. BUTTON_GP1
  56. MOVLW 01011011B
  57. OPTION
  58.  
  59. INCF GPIO
  60.  
  61. MOVLW 00000100B
  62. MOVWF STATE
  63.  
  64. SLEEP
  65.  
  66. BUTTON_GP0
  67. MOVLW 01011001B
  68. OPTION
  69.  
  70. INCF GPIO
  71.  
  72. MOVLW 00001000B
  73. MOVWF STATE
  74.  
  75. SLEEP
  76. RESET
  77. MOVLW 00000010B
  78. MOVWF STATE
  79.  
  80. MOVLW 11111111B
  81. MOVWF GPIO
  82.  
  83. MOVLW 11111000B
  84. MOVWF GPIO
  85.  
  86. SLEEP
  87. WAIT
  88. MOVLW 11111111B
  89. MOVWF GPIO
  90. TRIS GPIO
  91. SLEEP
  92.  
  93. RETLW 0
  94. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement