From: ian <ian>
Date: Fri, 30 Dec 2005 03:22:24 +0000 (+0000)
Subject: actually initialise cdu (!)
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=762b1cab28a643659cded88e9c16e41b3059d3d6;p=trains.git

actually initialise cdu (!)
---

diff --git a/detpic/points.asm b/detpic/points.asm
index 2c1fcf0..5ec694c 100644
--- a/detpic/points.asm
+++ b/detpic/points.asm
@@ -365,6 +365,7 @@ cdu_discharged
 
 ;--------------------
 cdu_on @
+ clr_f xdebug+0
 	pin_h	p0_cdu_enable
 	return
 
diff --git a/detpic/program.asm b/detpic/program.asm
index 0126bdf..f094581 100644
--- a/detpic/program.asm
+++ b/detpic/program.asm
@@ -81,8 +81,10 @@ master_init
 	call	serialtxfc_init
 	call	mascan_init
 	call	tick_init
+	call	cdu_init
 	call	power_polarising_init
 	call	power_fault_init
+ clr_f xdebug+0
 	return
 
 ;----------------------------------------
@@ -91,10 +93,15 @@ master_interrupt_low @
 	call	tick_intrl
 	call	nmra_serialrx_intrl
 	call	power_fault_intrl
+ mov_ff PIR1, xdebug+2
+ mov_ff PIE1, xdebug+3
+ mov_ff IPR1, xdebug+4
+ mov_ff INTCON, xdebug+5
 	call	serialtxfc_intrl
 	call	serialtx_intrl
 	call	points_local_intrl
 	call	i2cm_intrl
+ bs_f	xdebug+0, 5
 	panic	morse_IL
 
 ;----------------------------------------------------------------------