From 5ab5320cfa776e8b2af9c1c43584fba464b6000e Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@mur.at>
Date: Wed, 30 May 2012 23:01:54 +0000
Subject: handshake lines work

git-svn-id: https://svn.spreadspace.org/mur.sat@494 7de4ea59-55d0-425e-a1af-a3118ea81d4c
---
 software/idm/idm.asm | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

(limited to 'software/idm')

diff --git a/software/idm/idm.asm b/software/idm/idm.asm
index 2560a07..59a83e3 100644
--- a/software/idm/idm.asm
+++ b/software/idm/idm.asm
@@ -24,7 +24,7 @@
 
   LIST      p=16F1847
   include   "p16f1847.inc"
-  __config  _CONFIG1,  _FOSC_INTOSC & _WDTE_OFF & _PWRTE_OFF & _MCLRE_OFF & _CP_OFF & _CPD_OFF & _BOREN_OFF & _CLKOUTEN_OFF & _IESO_OFF & _FCMEN_OFF
+  __config  _CONFIG1,  _FOSC_INTOSC & _WDTE_OFF & _PWRTE_OFF & _MCLRE_ON & _CP_OFF & _CPD_OFF & _BOREN_OFF & _CLKOUTEN_OFF & _IESO_OFF & _FCMEN_OFF
   __config  _CONFIG2,  _WRT_OFF & _PLLEN_OFF & _STVREN_OFF & _BORV_LO & _LVP_OFF
 
 
@@ -36,7 +36,7 @@ CNT1 EQU H'0021'
 
   ;; -------------------------------------
   ;; OFFSET
-  org	      0
+  org	      .0
 
   ;; -------------------------------------
   ;; INIT
@@ -45,6 +45,7 @@ init
   movlw     b'00000011'
   movwf     BSR
   clrf      ANSELA
+  clrf      ANSELB
 
   ;; BANK 2
   movlw     b'00000010'
@@ -53,8 +54,10 @@ init
   ;; BANK 1
   movlw     b'00000001'
   movwf     BSR  
-  movlw     b'01111111'
+  movlw     b'11111111'
   movwf     TRISA
+  movlw     b'01110111'
+  movwf     TRISB
 
   ;; BANK 0
   clrf      BSR
@@ -78,8 +81,8 @@ inner
   decfsz    CNT0,f
   goto      outer
 
-  movlw     b'10000000'
-  xorwf     PORTA,f
+  movlw     b'00001000'
+  xorwf     PORTB,f
   
   goto	    main
 
-- 
cgit v1.2.3