diff options
| author | Christian Pointner <equinox@spreadspace.org> | 2011-05-02 14:47:12 +0000 |
|---|---|---|
| committer | Christian Pointner <equinox@spreadspace.org> | 2011-05-02 14:47:12 +0000 |
| commit | 0b0f8a3203acd663587aee808e1e05dff1812e0f (patch) | |
| tree | 146afce8fb3a5be8f480fbd2905256e17d8c0116 | |
| parent | tab vs. space (diff) | |
added blink-16F
git-svn-id: https://svn.spreadspace.org/pic/trunk@6 a09c6847-51d9-44de-8ef2-e725cf50f3c7
| -rw-r--r-- | blink-16F/Makefile | 26 | ||||
| -rw-r--r-- | blink-16F/blink.asm | 76 |
2 files changed, 102 insertions, 0 deletions
diff --git a/blink-16F/Makefile b/blink-16F/Makefile new file mode 100644 index 0000000..b14b958 --- /dev/null +++ b/blink-16F/Makefile @@ -0,0 +1,26 @@ +## +## spreadspace pic utils +## +## +## Copyright (C) 2011 Christian Pointner <equinox@spreadspace.org> +## +## This file is part of spreadspace pic utils. +## +## spreadspace pic utils is free software: you can redistribute it and/or modify +## it under the terms of the GNU General Public License as published by +## the Free Software Foundation, either version 3 of the License, or +## any later version. +## +## spreadspace pic utils is distributed in the hope that it will be useful, +## but WITHOUT ANY WARRANTY; without even the implied warranty of +## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +## GNU General Public License for more details. +## +## You should have received a copy of the GNU General Public License +## along with spreadspace pic utils. If not, see <http://www.gnu.org/licenses/>. +## + +PROJECT := blink +PROC_TYPE := 16F887 + +include ../include.mk diff --git a/blink-16F/blink.asm b/blink-16F/blink.asm new file mode 100644 index 0000000..7696c0d --- /dev/null +++ b/blink-16F/blink.asm @@ -0,0 +1,76 @@ + ;; + ;; spreadspace pic utils + ;; + ;; + ;; Copyright (C) 2011 Christian Pointner <equinox@spreadspace.org> + ;; + ;; This file is part of spreadspace pic utils. + ;; + ;; spreadspace pic utils is free software: you can redistribute it and/or modify + ;; it under the terms of the GNU General Public License as published by + ;; the Free Software Foundation, either version 3 of the License, or + ;; any later version. + ;; + ;; spreadspace pic utils is distributed in the hope that it will be useful, + ;; but WITHOUT ANY WARRANTY; without even the implied warranty of + ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + ;; GNU General Public License for more details. + ;; + ;; You should have received a copy of the GNU General Public License + ;; along with spreadspace pic utils. If not, see <http://www.gnu.org/licenses/>. + ;; + ;; ------------------------------------- + ;; PREAMBLE + + LIST p=16F877 + include "p16f877.inc" + __config _CP_OFF & _WDT_OFF & _RC_OSC + + ;; ------------------------------------- + ;; DEFINES + +CNT0 EQU H'0030' +CNT1 EQU H'0031' + + ;; ------------------------------------- + ;; OFFSET + org 0 + + ;; ------------------------------------- + ;; INIT +init + bsf STATUS,RP0 + bcf STATUS,RP1 + movlw b'00000110' + movwf ADCON1 + movlw b'11111110' + movwf TRISA + bcf STATUS,RP0 + + bcf PORTA,0 + + ;; ------------------------------------- + ;; MAINLOOP +main + movlw .255 + movwf CNT0 + +outer + movlw .255 + movwf CNT1 + +inner + decfsz CNT1,f + goto inner + + decfsz CNT0,f + goto outer + + movlw b'00000001' + xorwf PORTA,f + + goto main + + ;; ------------------------------------- + ;; END + end |