summaryrefslogtreecommitdiff
path: root/blink-12F
diff options
context:
space:
mode:
authorChristian Pointner <equinox@spreadspace.org>2011-05-26 20:23:42 +0000
committerChristian Pointner <equinox@spreadspace.org>2011-05-26 20:23:42 +0000
commit0a54a17b05ea51008f4c6e5762d8344d28068ece (patch)
tree0c3e10f132225b0284a297ce5358ab7f33f2288c /blink-12F
parentadded blink-16F (diff)
added blink code for 12f519
git-svn-id: https://svn.spreadspace.org/pic/trunk@7 a09c6847-51d9-44de-8ef2-e725cf50f3c7
Diffstat (limited to 'blink-12F')
-rw-r--r--blink-12F/Makefile26
-rw-r--r--blink-12F/blink.asm72
2 files changed, 98 insertions, 0 deletions
diff --git a/blink-12F/Makefile b/blink-12F/Makefile
new file mode 100644
index 0000000..948e999
--- /dev/null
+++ b/blink-12F/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 := 12F519
+
+include ../include.mk
diff --git a/blink-12F/blink.asm b/blink-12F/blink.asm
new file mode 100644
index 0000000..3f9b5f1
--- /dev/null
+++ b/blink-12F/blink.asm
@@ -0,0 +1,72 @@
+ ;;
+ ;; 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=12F519
+ include "p12f519.inc"
+ __config _CPDF_OFF & _IOSCFS_4MHz & _MCLRE_OFF & _CP_OFF & _WDTE_OFF & _IntRC_OSC
+
+ ;; -------------------------------------
+ ;; DEFINES
+
+CNT0 EQU H'0008'
+CNT1 EQU H'0009'
+
+ ;; -------------------------------------
+ ;; OFFSET
+ org 0
+
+ ;; -------------------------------------
+ ;; INIT
+init
+ movlw b'11000110'
+ option
+ movlw b'11111011'
+ tris PORTB
+ bcf PORTB,2
+
+ ;; -------------------------------------
+ ;; MAINLOOP
+main
+ movlw .255
+ movwf CNT0
+
+outer
+ movlw .255
+ movwf CNT1
+
+inner
+ decfsz CNT1,f
+ goto inner
+
+ decfsz CNT0,f
+ goto outer
+
+ movlw b'00000100'
+ xorwf PORTB,f
+
+ goto main
+
+ ;; -------------------------------------
+ ;; END
+ end