From d49d59e12fef2235507b51c1cf0f07d48df3ceb7 Mon Sep 17 00:00:00 2001 From: Christian Pointner Date: Thu, 7 Jun 2012 00:10:14 +0000 Subject: cleanup git-svn-id: https://svn.spreadspace.org/mur.sat@507 7de4ea59-55d0-425e-a1af-a3118ea81d4c --- software/idm/idm.asm | 39 +++++++++++++++++++-------------------- 1 file changed, 19 insertions(+), 20 deletions(-) (limited to 'software/idm') diff --git a/software/idm/idm.asm b/software/idm/idm.asm index 2b796fd..7b39e9b 100644 --- a/software/idm/idm.asm +++ b/software/idm/idm.asm @@ -229,38 +229,37 @@ init clrf PIR1 movlw b'11000000' movwf INTCON - bcf PORTA,7 - bcf PORTB,3 + bcf PORTA,FILTER_EN - + bsf PORTB,INT ;; ------------------------------------- ;; MAINLOOP main -;; movlw .255 -;; movwf CNT0 + movlw .255 + movwf CNT0 -;; outer1 -;; movlw .255 -;; movwf CNT1 +outer1 + movlw .255 + movwf CNT1 -;; outer -;; movlw .20 -;; movwf CNT2 +outer + movlw .5 + movwf CNT2 -;; inner -;; decfsz CNT2,f -;; goto inner +inner + decfsz CNT2,f + goto inner -;; decfsz CNT1,f -;; goto outer + decfsz CNT1,f + goto outer -;; decfsz CNT0,f -;; goto outer1 + decfsz CNT0,f + goto outer1 -;; movlw b'00001000' -;; xorwf PORTB,f + movlw b'00001000' + xorwf PORTB,f goto main -- cgit v1.2.3