diff code_part1/OSTC_code_asm_part1/menu_gassetup.asm @ 115:50a06adabc67

First gas is active, Gauge mode display
author heinrichsweikamp
date Fri, 24 Dec 2010 15:40:27 +0100
parents 64109f6fb3d1
children e0f29e20bd24
line wrap: on
line diff
--- a/code_part1/OSTC_code_asm_part1/menu_gassetup.asm	Thu Dec 23 18:35:28 2010 +0100
+++ b/code_part1/OSTC_code_asm_part1/menu_gassetup.asm	Fri Dec 24 15:40:27 2010 +0100
@@ -885,6 +885,23 @@
 	movlw	d'33'
 	movwf	EEADR
 	call	write_eeprom			; store in internal EEPROM
+
+; Set First gas to "Active"
+	read_int_eeprom		d'27'		; read flag register
+	movff	decodata+0,lo			; selected gas 0-4
+	incf	lo,F
+	dcfsnz	lo,F
+	bsf		EEDATA,0
+	dcfsnz	lo,F
+	bsf		EEDATA,1
+	dcfsnz	lo,F
+	bsf		EEDATA,2
+	dcfsnz	lo,F
+	bsf		EEDATA,3
+	dcfsnz	lo,F
+	bsf		EEDATA,4
+	write_int_eeprom	d'27'		; write flag register
+
 	movlw	d'3'
 	movwf	menupos
 	bra		next_gas_page1
@@ -1160,30 +1177,8 @@
 	WIN_TOP		.35
 	lfsr	FSR2,letter
 	OUTPUTTEXT 	d'149'		; (ppO2:
-;	movlw	'('
-;	movwf	POSTINC2
-;	movlw	'p'
-;	movwf	POSTINC2
-;	movlw	'p'
-;	movwf	POSTINC2
-;	movlw	'O'
-;	movwf	POSTINC2
-;	movlw	'2'
-;	movwf	POSTINC2
-;	movlw	':'
-;	movwf	POSTINC2
 	output_16dp	d'3'
 	OUTPUTTEXT 	d'150'		; Bar: 
-;	movlw	'B'
-;	movwf	POSTINC2
-;	movlw	'a'
-;	movwf	POSTINC2
-;	movlw	'r'
-;	movwf	POSTINC2
-;	movlw	')'
-;	movwf	POSTINC2
-;	movlw	' '
-;	movwf	POSTINC2
 	call	word_processor
 	return