From 0a54a17b05ea51008f4c6e5762d8344d28068ece Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@spreadspace.org>
Date: Thu, 26 May 2011 20:23:42 +0000
Subject: added blink code for 12f519

git-svn-id: https://svn.spreadspace.org/pic/trunk@7 a09c6847-51d9-44de-8ef2-e725cf50f3c7
---
 blink-12F/Makefile  | 26 +++++++++++++++++++
 blink-12F/blink.asm | 72 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 98 insertions(+)
 create mode 100644 blink-12F/Makefile
 create mode 100644 blink-12F/blink.asm

(limited to 'blink-12F')

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
-- 
cgit v1.2.3