Mercurial > public > mk2

diff code_part1/OSTC_code_asm_part1/start.asm @ 239:3ed240d60341

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
High altitude (Plane/Fly) mode added
author heinrichsweikamp
date Mon, 21 Mar 2011 13:31:38 +0100
parents 3dbeacf42e9e
children 1efd59d689f8
line wrap: on
line diff
--- a/code_part1/OSTC_code_asm_part1/start.asm	Sun Mar 20 17:55:21 2011 +0100
+++ b/code_part1/OSTC_code_asm_part1/start.asm	Mon Mar 21 13:31:38 2011 +0100
@@ -167,6 +167,17 @@
 	bcf     flag1,0
 	movff	flag1,win_flags			; store in Bank0 register
 	clrf	flag1					; Clear flag1 (again)
+
+	; Select high altitude (Fly) mode?
+	movff	last_surfpressure_30min+0,sub_b+0
+	movff	last_surfpressure_30min+1,sub_b+1
+	movlw	HIGH	d'880'
+	movwf	sub_a+1
+	movlw	LOW		d'880'			; Hard-wired 880mBar
+	movwf	sub_a+0
+	call	sub16					; sub_c = sub_a - sub_b
+	btfss	neg_flag				; Result negative (Ambient>880mBar)?
+	bsf		high_altitude_mode		; No, Set Flag!
 	
 	; Should we disable sleep (hardware emulator)
 	movlw	.0