diff src/gaslist.asm @ 521:06e9370c6d75

CHANGE: Apply safety margin parameters to both models (GF and non-GF) Put B?hlmann constants in code for readability Fix unused gas warning (Do not warn)
author heinrichsweikamp
date Fri, 04 Aug 2017 16:01:28 +0200
parents 72f6cb65ca4a
children d36f9fca10ae
line wrap: on
line diff
--- a/src/gaslist.asm	Fri Aug 04 13:41:29 2017 +0200
+++ b/src/gaslist.asm	Fri Aug 04 16:01:28 2017 +0200
@@ -153,7 +153,7 @@
         movf    gaslist_gas,W
         lfsr    FSR1,char_I_setpoint_change
         movff   PLUSW1,lo
-        bra     gaslist_strcat_4        ; And return...
+        bra     gaslist_strcat_5        ; And return...
 
 ;----------------------------------------------------------------------------
 ; Append gas description to current string.
@@ -213,6 +213,8 @@
         call    TFT_disabled_color
 	bra	gaslist_strcat_4	; NEW ; No MOD-check and red color for disabled gases
 gaslist_strcat_3:
+        rcall   gaslist_strcat_gas_0
+	PUTC	" "
         ; Read switch depth
         lfsr    FSR1,char_I_dil_change-.5   ; Setup Diluents-5
         movlw   .4
@@ -223,12 +225,25 @@
         movff   PLUSW1,lo
         rcall   gaslist_calc_mod        ; Compute MOD into WREG
         cpfsgt  lo
-        bra		gaslist_strcat_4
+        bra	gaslist_strcat_5
         call    TFT_warnings_color      ; Turn red if bigger
+	bra	gaslist_strcat_5	; skip gaslist_strcat_gas_0 here
 gaslist_strcat_4:
-	rcall   gaslist_strcat_gas_0
+        rcall   gaslist_strcat_gas_0
 	PUTC	" "
+	
+	; Dummy code, needs some cleanup somedays...
+        ; Read switch depth
+        lfsr    FSR1,char_I_dil_change-.5   ; Setup Diluents-5
+        movlw   .4
+	cpfsgt  gaslist_gas                 ; >4? (-> Diluents)
+        lfsr    FSR1,opt_OC_bail_gas_change ; Setup OC Gases
 
+        movf    gaslist_gas,W           ; (0-4 for OC/Bailout, 5-9 for Diluents)
+        movff   PLUSW1,lo
+        ;rcall   gaslist_calc_mod        ; Compute MOD into WREG
+
+gaslist_strcat_5:
 	TSTOSS	opt_units               ; 0=Meters, 1=Feets
 	bra		gaslist_strcat_3_metric
 ;gaslist_strcat_3_imperial:
@@ -706,9 +721,9 @@
         lfsr    FSR1,opt_OC_bail_gas_change ; No, setup OC Gases
         movf   	PLUSW1,W
         cpfslt  lo
-        bra     gaslist_strcat_4        ; And return...
+        bra     gaslist_strcat_5        ; And return...
         call    TFT_warnings_color      ; Turn red if bigger !
-        bra     gaslist_strcat_4        ; And return...
+        bra     gaslist_strcat_5        ; And return...
 
 ;----------------------------------------------------------------------------
         global  gaslist_reset_mod