Mercurial > public > mk2

changeset 403:5b560559bc1a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gas change blink in yellow
author heinrichsweikamp
date Tue, 28 Jun 2011 22:37:02 +0200
parents e565392e0fcc
children cd48cdb6e1ae
files code_part1/OSTC_code_asm_part1/pled_outputs.asm
diffstat 1 files changed, 6 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Mon Jun 27 10:15:28 2011 +0200
+++ b/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Tue Jun 28 22:37:02 2011 +0200
@@ -1080,18 +1080,22 @@
 	btg		blinking_better_gas		; Toggle blink bit...
 	btfss	blinking_better_gas		; blink now?
 	return							; No, Done.
+	movlw	color_yellow			; Blink in yellow
+    call	PLED_set_color
 	WIN_INVERT	.1					; Init new Wordprocessor	
-	call	PLED_active_gas_divemode_show	; Show gas (Non-Inverted in all cases)
+	call	PLED_active_gas_divemode_show1	; Show gas (Non-Inverted in all cases)
 	WIN_INVERT	.0					; Init new Wordprocessor	
+	call	PLED_standard_color
 	return							; Done.
 
 PLED_active_gas_divemode_show:
+	call	PLED_standard_color
+PLED_active_gas_divemode_show1:
 	ostc_debug	's'		; Sends debug-information to screen if debugmode active
 ; gas
 	WIN_TOP		.192
 	WIN_LEFT	.50
 	WIN_FONT 	FT_SMALL
-	call	PLED_standard_color
 
 	movlw	d'100'						; 100% in the tank
 	movff	char_I_N2_ratio,lo			; minus N2
@@ -1128,13 +1132,10 @@
     movff   WREG,letter+5		; collision with sat graphs
 	bcf		leftbind
 	call	word_processor
-;	rcall	PLED_active_better_gas	; show *, if required
-;	return
 PLED_active_better_gas:
 	WIN_TOP		.192
 	WIN_LEFT	.43
 	WIN_FONT 	FT_SMALL
-	call	PLED_standard_color
 	lfsr	FSR2,letter
 	movlw	' '
 	btfsc	better_gas_available	;=1: A better gas is available and a gas change is advised in divemode