diff code_part1/OSTC_code_asm_part1/pled_outputs.asm @ 446:92304826000d

localisation part2 from Sergei
author heinrichsweikamp
date Sat, 13 Aug 2011 09:45:53 +0200
parents f36b93f2fbed
children 32e1174fb89e
line wrap: on
line diff
--- a/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Thu Aug 11 20:01:55 2011 +0200
+++ b/code_part1/OSTC_code_asm_part1/pled_outputs.asm	Sat Aug 13 09:45:53 2011 +0200
@@ -470,7 +470,7 @@
 	lfsr	FSR2,letter
 	movff	char_O_first_deco_depth,lo  ; Ceiling in m
 	output_99
-	PUTC    'm'
+	PUTC    TXT_METER_C
 	movff	char_O_first_deco_time,lo   ; length of first stop in m
 	output_99
 	STRCAT_PRINT "'"
@@ -508,7 +508,7 @@
 	WIN_FONT 	FT_SMALL
 	PLED_color_code		warn_gf		; Color-code Output
 
-	STRCPY  "GF:"
+	STRCPY  TXT_GF3
 	movff	char_O_gradient_factor,lo		; gradient factor
 	output_8
 	STRCAT_PRINT  "% "
@@ -539,7 +539,7 @@
 PLED_simulator_data_1:
 	bsf		leftbind
 	output_8
-	STRCAT      "0min "
+	STRCAT      TXT_0MIN5
 
 PLED_simulator_data_2:
     call        word_processor
@@ -552,7 +552,7 @@
 	movff	sim_btm_time,lo
 	bsf		leftbind
 	output_8
-	STRCAT_PRINT  "min "
+	STRCAT_PRINT  TXT_MIN4
 
     ;---- Updates depth line -------------------------------------------------
 	WIN_TOP		.125
@@ -562,7 +562,7 @@
 	movff	sim_btm_depth,lo
 	bsf		leftbind
 	output_8
-	STRCAT_PRINT  "m  "
+	STRCAT_PRINT  TXT_METER3
 
 	bcf		leftbind
 	return
@@ -726,7 +726,7 @@
 	WIN_FONT 	FT_SMALL
 	WIN_INVERT	.0					; Init new Wordprocessor
 	call	PLED_standard_color
-	STRCPY  "BSat:"
+	STRCPY  TXT_BSAT5
 
 	GETCUSTOM8	d'11'
 	movwf	lo
@@ -735,7 +735,7 @@
 	STRCAT_PRINT  "%"
 
 	WIN_TOP		.50
-	STRCPY  "BDes:"
+	STRCPY  TXT_BDES5
 
 	GETCUSTOM8	d'12'
 	movwf	lo
@@ -745,12 +745,12 @@
 
 PLED_show_cf11_cf12_cf29_2:
 	WIN_TOP		.75
-    STRCPY  "Last:"
+    STRCPY  TXT_LAST5
 	GETCUSTOM8	d'29'
 	movwf	lo
 	bsf		leftbind
 	output_8
-	STRCAT_PRINT  "m"
+	STRCAT_PRINT  TXT_METER1
 
 	bcf		leftbind
 	return
@@ -764,7 +764,7 @@
 	GETCUSTOM8	d'32'				; GF_lo
 	movwf	lo
 
-    STRCPY  "GF_lo:"
+    STRCPY  TXT_GFLO6
 	bsf		leftbind
 	output_8
 	STRCAT_PRINT  "%"
@@ -772,7 +772,7 @@
 	WIN_TOP		.50
 	GETCUSTOM8	d'33'				; GF_hi
 	movwf	lo
-    STRCPY  "GF_hi:"
+    STRCPY  TXT_GFHI6
 	bsf		leftbind
 	output_8
 	STRCAT_PRINT  "%"
@@ -1066,7 +1066,7 @@
 	WIN_LEFT	.0
 	WIN_FONT 	FT_SMALL
 	PLED_color_code		warn_ppo2		; Color-code output (ppO2 stored in xC)
-    STRCPY  "ppO2:"
+    STRCPY  TXT_PPO2_5
 
 ; Check very high ppO2 manually
 	tstfsz		xC+2					; char_I_O2_ratio * p_amb/10 > 65536, ppO2>6,55bar?
@@ -1214,10 +1214,10 @@
 
 ;ZH-L16
 	WIN_TOP		.125
-    STRCPY_PRINT "O"
+    STRCPY_PRINT TXT_OC_O1
 
 	WIN_TOP		.150
-    STRCPY_PRINT "C"
+    STRCPY_PRINT TXT_OC_C1
 	return		
 
 show_decotype_surface2:
@@ -1235,10 +1235,14 @@
     WIN_TOP		.125
     call	PLED_standard_color
     
-    STRCPY_PRINT "C"
+    STRCPY_PRINT TXT_CC_C1_1
     
     WIN_TOP		.150
+#IF TXT_CC_C1_1 == TXT_CC_C2_1
     call	word_processor              ; Twice the same string.
+#ELSE
+    STRCPY_PRINT TXT_CC_C2_1
+#ENDIF
     return
 
 show_decotype_surface4:
@@ -1255,10 +1259,10 @@
     bra		show_decotype_surface6
     ; Multi-GF OC
     WIN_TOP		.125
-    STRCPY_PRINT "G"
+    STRCPY_PRINT TXT_GF_G1
     
     WIN_TOP		.150
-    STRCPY_PRINT "F"
+    STRCPY_PRINT TXT_GF_F1
     return
 
 ;-----------------------------------------------------------------------------
@@ -1327,7 +1331,7 @@
 	movlw	d'4'
 	addwf	wait_temp,F			; Increase eeprom address for gas list
 	
-	STRCPY  "G"
+	STRCPY  TXT_GAS1
 	movff	hi,lo			; copy gas number
 	output_8				; display gas number
 	STRCAT  ": "
@@ -1386,7 +1390,7 @@
 	WIN_LEFT	.90
 	movff	waitms_temp,win_top ; Set Row
 	
-	STRCPY  "SP"
+	STRCPY  TXT_SP2
 	movff	apnoe_mins,lo       ; copy gas number
 	output_8			        ; display gas number
 	STRCAT  ": "
@@ -1416,7 +1420,7 @@
 
 	WIN_LEFT	.90
 	WIN_TOP		.100
-	STRCPY  "Dil:"
+	STRCPY  TXT_DIL4
 	output_8				; O2 Ratio
 	PUTC    '/'
 	movff	hi,lo
@@ -1452,7 +1456,7 @@
 	output_16dp	d'3'		; outputs into Postinc2!
 	bcf		leftbind
 
-	STRCAT_PRINT  "bar"
+	STRCAT_PRINT  TXT_BAR3
 	bra		PLED_active_gas_surfmode_exit
 
 PLED_active_gas_surfmode2:
@@ -1841,7 +1845,7 @@
 	bsf		leftbind
 	output_16
 	bcf		leftbind
-	STRCAT_PRINT  "mbar "
+	STRCAT_PRINT  TXT_MBAR5
 	call	PLED_standard_color		; Reset color
 	return
 
@@ -1884,7 +1888,7 @@
 	bsf		leftbind
 	output_16dp	d'2'			; e.g. 3.45V
 	bcf		leftbind
-	STRCAT_PRINT  "V "
+	STRCAT_PRINT  TXT_VOLT2
 	return
 	
 update_batt_voltage2:
@@ -2298,7 +2302,7 @@
 	bsf		ignore_digit5		; do not display 1cm depth
 	output_16dp	d'3'
 	bcf		leftbind
-	STRCAT_PRINT "m"
+	STRCAT_PRINT TXT_METER1
 	return
 
 PLED_stopwatch_show_gauge:
@@ -2347,7 +2351,7 @@
 	bsf		ignore_digit5					; do not display 1cm depth
 	output_16dp	d'3'
 	bcf		leftbind
-	STRCAT_PRINT "m"
+	STRCAT_PRINT TXT_METER1
 	WIN_FONT	FT_SMALL				; Reset...
 	return
 
@@ -2370,7 +2374,7 @@
 	bsf		ignore_digit5		; do not display 1cm depth
 	bcf		leftbind
 	output_16dp	d'3'
-	STRCAT_PRINT "m"
+	STRCAT_PRINT TXT_METER1
 	return
 
 ;=============================================================================
@@ -2463,7 +2467,7 @@
 	WIN_FONT	FT_SMALL
 	call	PLED_standard_color
 
-    STRCPY  "G6:"
+    STRCPY  TXT_G6_3
 	read_int_eeprom	d'24'			; Get Gas6 %O2
 	movff	EEDATA,lo
 	bcf		leftbind
@@ -2518,7 +2522,7 @@
 	    lfsr	FSR2,letter
 	    bsf     leftbind
 	    output_8					    ; outputs into Postinc2!
-        STRCAT_PRINT "m "
+        STRCAT_PRINT TXT_METER2
 
         ;---- Print duration -------------------------------------------------
 	    WIN_LEFT	.140
@@ -2780,7 +2784,7 @@
 	WIN_LEFT	.100
 	movff	waitms_temp,win_top ; Set Row
 	
-	STRCPY  "G"
+	STRCPY  TXT_GAS1
 	movff	hi,lo			; copy gas number
 	output_8				; display gas number
     PUTC    ':'
@@ -2842,7 +2846,7 @@
 	movff	waitms_temp,win_top ; Set Row
 	WIN_LEFT	.100
 	
-	STRCPY  "SP"
+	STRCPY  TXT_SP2
 	movff	decoplan_index,lo	; copy gas number
 	output_8				; display gas number
     PUTC    ':'
@@ -3033,13 +3037,13 @@
     btfsc   divemode
     movlw   .169+7                      ; divemode
     movff   WREG,win_top
-	STRCPY_PRINT  "N2"
+	STRCPY_PRINT  TXT_N2_2
 
 	movlw	.120-.30                    ; surfmode: 30pix above bottom border
     btfsc   divemode
     movlw   .239-.30                    ; divemode
     movff   WREG,win_top
-	STRCPY_PRINT  "He"
+	STRCPY_PRINT  TXT_HE2
 	
     ;---- Draw scale and O2[16]% ---------------------------------------------
     btfsc   divemode
@@ -3249,14 +3253,14 @@
 	movff       char_O_EAD,lo
 	bsf         leftbind
 	output_8                            ; Print EAD w/o leading space.
-	STRCAT_PRINT "m "
+	STRCAT_PRINT TXT_METER2
 
 	WIN_TOP		.216
 	lfsr        FSR2,letter
 	movff       char_O_END,lo
 	output_8                            ; Print END w/o leading space.
 	bcf	        leftbind
-	STRCAT_PRINT "m "
+	STRCAT_PRINT TXT_METER2
 
 ; Show ppO2[Flush] iff in CCR mode & not in Bailout:
 	btfsc       is_bailout              ; In bailout mode?
@@ -3268,7 +3272,7 @@
 	WIN_LEFT	.95
 	WIN_TOP		.168
 	call        PLED_divemask_color     ; Set Color for Divemode mask
-	STRCPY_PRINT "ppO2:"                ; ppO2 of diluent
+	STRCPY_PRINT TXT_PPO2_5                ; ppO2 of diluent
 
 	movff       char_O_flush_ppO2,WREG  ; copy to WREG
 	mullw       .100
@@ -3362,11 +3366,11 @@
 	movlw	d'16'
 	cpfslt	wait_temp
 	bra		PLED_show_leading_tissue_he
-	STRCAT  "N2"
+	STRCAT  TXT_N2_2
 	bra		PLED_show_leading_tissue2
 
 PLED_show_leading_tissue_he:	
-    STRCAT  "He"
+    STRCAT  TXT_HE2
 
 PLED_show_leading_tissue2:	
 	WIN_LEFT	.95
@@ -3417,7 +3421,7 @@
 	WIN_FONT 	FT_SMALL
 	PLED_color_code		warn_cns		; Color-code CNS output
 	
-	STRCPY  "CNS:"
+	STRCPY  TXT_CNS4
 	movff	char_O_CNS_fraction,lo
 	bsf		leftbind
 	output_8
@@ -3442,7 +3446,7 @@
 	WIN_INVERT	.0					; Init new Wordprocessor
 	PLED_color_code		warn_cns		; Color-code CNS output
 	
-	STRCPY  "CNS:"
+	STRCPY  TXT_CNS4
 	movff	char_O_CNS_fraction,lo
 	bsf		leftbind
 	output_8
@@ -3522,7 +3526,7 @@
 	movlw	d'4'
 	addwf	wait_temp,F			; Increase eeprom address for gas list
 	
-	STRCPY  "G"
+	STRCPY  TXT_GAS1
 	movff	hi,lo			; copy gas number
 	output_8				; display gas number
 	PUTC    ':'
@@ -3542,7 +3546,7 @@
 	movff	EEDATA,lo		; Change depth in m
 	movff	lo,divemins		; Store for grey-out
 	output_99				; outputs into Postinc2!
-    PUTC    'm'
+    PUTC    TXT_METER_C
 
     ; Check if gas is first gas ?
 	read_int_eeprom d'33'	            ; First gas (1-5)?
@@ -3612,7 +3616,7 @@
 	WIN_LEFT	.0
 	movff	waitms_temp,win_top ; Set Row
 	
-	STRCPY  "SP"
+	STRCPY  TXT_SP2
 	movff	decoplan_index,lo   ; copy gas number
 	output_8				; display gas number
 	STRCAT  ": "
@@ -3647,7 +3651,7 @@
 	WIN_LEFT	.0
 	WIN_TOP		.110
 
-	STRCPY  "Dil:"
+	STRCPY  TXT_DIL4
 	output_8				; O2 Ratio
 	STRCAT  "/"
 	movff	hi,lo