diff code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 111:ed7826c740a0

1.74beta rc1
author heinrichsweikamp
date Wed, 22 Dec 2010 09:37:24 +0100
parents 2a31948dbcb7
children deb004054279
line wrap: on
line diff
--- a/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Wed Dec 22 03:23:55 2010 +0100
+++ b/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Wed Dec 22 09:37:24 2010 +0100
@@ -680,89 +680,12 @@
 
 PLED_clock:
 	ostc_debug	'c'
-	
-	;If > 0 display surface_interval:2 and clock changing every 5 seconds
-	;use timeout_counter for this
 	WIN_TOP		.50
 	WIN_LEFT	.1
 	WIN_FONT 	FT_SMALL
 	WIN_INVERT	.0					; Init new Wordprocessor
 	call	PLED_standard_color
-
 	lfsr	FSR2,letter
-
-	movff	surface_interval+0,lo
-	tstfsz	lo
-	bra		PLED_clock0				; Not Zero, switch between Interval and clock
-	movff	surface_interval+1,lo
-	tstfsz	lo
-	bra		PLED_clock0				; Not Zero, switch between Interval and clock
-	bra		PLED_clock3				; surface_interval=0, always display clock!
-
-PLED_clock0:
-	btfss	show_interval			; Show Interval?
-	bra		PLED_clock2				; No, display clock and reset counter
-
-PLED_clock1:
-	decfsz	timeout_counter,F		; =0?
-	bra		PLED_clock1a			; No...
-	bra		PLED_clock3				; Yes, display clock and reset counter
-
-PLED_clock1a:
-	bsf		show_interval
-	movlw	d'6'
-	cpfslt	timeout_counter			; f < w? -> timeout_counter>5?
-	rcall	PLED_clock_reload_timer	; No, reload counter
-
-	movff	surface_interval+0,lo
-	movff	surface_interval+1,hi
-	call	convert_time			; lo=mins, hi=hours
-
-	movf	hi,W
-	movff	lo,hi
-	movwf	lo					; exchange lo and hi
-
-	movlw	'I'
-	movwf	POSTINC2
-	movlw	'n'
-	movwf	POSTINC2
-	movlw	't'
-	movwf	POSTINC2
-	movlw	':'
-	movwf	POSTINC2
-	output_99x
-	movlw	':'
-	movwf	POSTINC2
-	movff	hi,lo
-	output_99x
-	movlw	' '
-	movwf	POSTINC2
-	call	word_processor
-	return
-
-PLED_clock_reload_timer:
-	bcf		show_interval
-	movlw	d'5'
-	movwf	timeout_counter
-	return
-
-PLED_interval_reload_timer:
-	bsf		show_interval
-	movlw	d'5'
-	movwf	timeout_counter
-	return
-
-PLED_clock2:
-	decfsz	timeout_counter,F		; =0?
-	bra		PLED_clock3				; No...
-	bra		PLED_clock1a			; Yes, display interval and reset counter
-
-PLED_clock3:
-	bcf		show_interval
-	movlw	d'6'
-	cpfslt	timeout_counter			; f < w? -> timeout_counter>5?
-	rcall	PLED_interval_reload_timer; No, reload counter
-
 	movff	hours,lo
 	output_99x
 	movlw	':'
@@ -778,6 +701,153 @@
 	call	word_processor
 	return
 
+PLED_interval:
+	WIN_TOP		.75
+	WIN_LEFT	.90
+	WIN_FONT 	FT_SMALL
+	WIN_INVERT	.0					; Init new Wordprocessor
+	call	PLED_standard_color
+	lfsr	FSR2,letter
+
+	movff	surface_interval+0,lo
+	movff	surface_interval+1,hi
+	call	convert_time			; lo=mins, hi=hours
+
+	movf	hi,W
+	movff	lo,hi
+	movwf	lo					; exchange lo and hi
+	output_99x
+	movlw	':'
+	movwf	POSTINC2
+	movff	hi,lo
+	output_99x
+	movlw	' '
+	movwf	POSTINC2
+	call	word_processor
+	return
+
+
+PLED_show_cf11_cf12_cf29:; Display saturations/desaturation multiplier and last deco in the customview field
+	WIN_TOP		.25
+	WIN_LEFT	.90
+	WIN_FONT 	FT_SMALL
+	WIN_INVERT	.0					; Init new Wordprocessor
+	call	PLED_standard_color
+	lfsr	FSR2,letter
+	GETCUSTOM8	d'11'
+	movwf	lo
+	movlw	'C'
+	movwf	POSTINC2
+	movlw	'F'
+	movwf	POSTINC2
+	movlw	'1'
+	movwf	POSTINC2
+	movlw	'1'
+	movwf	POSTINC2
+	movlw	':'
+	movwf	POSTINC2
+	bsf		leftbind
+	output_8
+	movlw	'%'
+	movwf	POSTINC2
+	call	word_processor
+
+	WIN_TOP		.50
+	lfsr	FSR2,letter
+	GETCUSTOM8	d'12'
+	movwf	lo
+	movlw	'C'
+	movwf	POSTINC2
+	movlw	'F'
+	movwf	POSTINC2
+	movlw	'1'
+	movwf	POSTINC2
+	movlw	'2'
+	movwf	POSTINC2
+	movlw	':'
+	movwf	POSTINC2
+	bsf		leftbind
+	output_8
+	movlw	'%'
+	movwf	POSTINC2
+	call	word_processor
+
+PLED_show_cf11_cf12_cf29_2:
+	WIN_TOP		.75
+	lfsr	FSR2,letter
+	GETCUSTOM8	d'29'
+	movwf	lo
+	movlw	'C'
+	movwf	POSTINC2
+	movlw	'F'
+	movwf	POSTINC2
+	movlw	'2'
+	movwf	POSTINC2
+	movlw	'9'
+	movwf	POSTINC2
+	movlw	':'
+	movwf	POSTINC2
+	bsf		leftbind
+	output_8
+	movlw	'm'
+	movwf	POSTINC2
+	call	word_processor
+	bcf		leftbind
+	return
+
+
+PLED_show_cf32_cf33_cf29:; Display GF_LOW, GF_HIGH and last deco in the customview field
+	WIN_TOP		.25
+	WIN_LEFT	.90
+	WIN_FONT 	FT_SMALL
+	WIN_INVERT	.0					; Init new Wordprocessor
+	call	PLED_standard_color
+	lfsr	FSR2,letter
+	GETCUSTOM8	d'32'
+	movwf	lo
+	movlw	'G'
+	movwf	POSTINC2
+	movlw	'F'
+	movwf	POSTINC2
+	movlw	'_'
+	movwf	POSTINC2
+	movlw	'l'
+	movwf	POSTINC2
+	movlw	'o'
+	movwf	POSTINC2
+	movlw	':'
+	movwf	POSTINC2
+	bsf		leftbind
+	output_8
+	movlw	'%'
+	movwf	POSTINC2
+	call	word_processor
+
+	WIN_TOP		.50
+	lfsr	FSR2,letter
+	GETCUSTOM8	d'33'
+	movwf	lo
+	movlw	'G'
+	movwf	POSTINC2
+	movlw	'F'
+	movwf	POSTINC2
+	movlw	'_'
+	movwf	POSTINC2
+	movlw	'h'
+	movwf	POSTINC2
+	movlw	'i'
+	movwf	POSTINC2
+	movlw	':'
+	movwf	POSTINC2
+	bsf		leftbind
+	output_8
+	movlw	'%'
+	movwf	POSTINC2
+	call	word_processor
+
+	bra		PLED_show_cf11_cf12_cf29_2		; Display CF29 in the third row and RETURN
+
+
 PLED_logbook_cursor:
 
 PLED_menu_cursor:
@@ -1232,17 +1302,17 @@
 	return
 
 PLED_pre_dive_screen:			;Display Pre-Dive Screen
-	movlw	.0
-	movff	WREG,box_temp+0		; Data
-	movlw	.25
-	movff	WREG,box_temp+1		; row top (0-239)
-	movlw	.120
-	movff	WREG,box_temp+2		; row bottom (0-239)
-	movlw	.82
-	movff	WREG,box_temp+3		; column left (0-159)
-	movlw	.159
-	movff	WREG,box_temp+4		; column right (0-159)
-	call	PLED_box
+;	movlw	.0
+;	movff	WREG,box_temp+0		; Data
+;	movlw	.25
+;	movff	WREG,box_temp+1		; row top (0-239)
+;	movlw	.120
+;	movff	WREG,box_temp+2		; row bottom (0-239)
+;	movlw	.82
+;	movff	WREG,box_temp+3		; column left (0-159)
+;	movlw	.159
+;	movff	WREG,box_temp+4		; column right (0-159)
+;	call	PLED_box
 
 	; List active gases/Setpoints
 
@@ -2911,23 +2981,23 @@
 	call	PLED_standard_color
 	return
 
-PLED_saturation_graph_divemode:
-	ostc_debug	'h'		; Sends debug-information to screen if debugmode active
+;PLED_saturation_graph_divemode:
+;	ostc_debug	'h'		; Sends debug-information to screen if debugmode active
 PLED_tissue_saturation_graph:
 	ostc_debug	'i'		; Sends debug-information to screen if debugmode active
 
-; Clear graph area...
-	movlw	.0
-	movff	WREG,box_temp+0		; Data
-	movlw	.25
-	movff	WREG,box_temp+1		; row top (0-239)
-	movlw	.120
-	movff	WREG,box_temp+2		; row bottom (0-239)
-	movlw	.82
-	movff	WREG,box_temp+3		; column left (0-159)
-	movlw	.159
-	movff	WREG,box_temp+4		; column right (0-159)
-	call	PLED_box
+;; Clear graph area...
+;	movlw	.0
+;	movff	WREG,box_temp+0		; Data
+;	movlw	.25
+;	movff	WREG,box_temp+1		; row top (0-239)
+;	movlw	.120
+;	movff	WREG,box_temp+2		; row bottom (0-239)
+;	movlw	.82
+;	movff	WREG,box_temp+3		; column left (0-159)
+;	movlw	.159
+;	movff	WREG,box_temp+4		; column right (0-159)
+;	call	PLED_box
 
 ; Draw Frame
 	GETCUSTOM8	d'35'			; Standard output color