Mercurial > public > hwos_code

diff src/tft_outputs.asm @ 87:82750b8dfcee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
CHANGE: Color schemes improved
author heinrichsweikamp
date Wed, 02 Apr 2014 10:25:24 +0200
parents 45a420beb534
children 2a992aba61ef
line wrap: on
line diff
--- a/src/tft_outputs.asm	Wed Apr 02 09:55:01 2014 +0200
+++ b/src/tft_outputs.asm	Wed Apr 02 10:25:24 2014 +0200
@@ -80,11 +80,36 @@
     global  TFT_disabled_color
 TFT_disabled_color:
     movlw   color_grey          ; Default to OSTC grey (dark blue)
+    btfsc   divemode            ; in Divemode?
+    rcall   TFT_disabled_color_dive
     bra		TFT_standard_color0
+TFT_disabled_color_dive:
+    movff   opt_dive_color_scheme,WREG  ; 0-3
+    incf    WREG
+	dcfsnz	WREG
+	bra		TFT_disabled_colordive0  	;0
+	dcfsnz	WREG
+	bra		TFT_disabled_colordive1  	;1
+	dcfsnz	WREG
+	bra		TFT_disabled_colordive2  	;2
+	dcfsnz	WREG
+	bra		TFT_disabled_colordive3  	;3
+TFT_disabled_colordive0:
+    movlw   color_scheme_divemode_dis1
+    return
+TFT_disabled_colordive1:
+    movlw   color_scheme_divemode_dis2
+    return
+TFT_disabled_colordive2:
+    movlw   color_scheme_divemode_dis3
+    return
+TFT_disabled_colordive3:
+    movlw   color_scheme_divemode_dis4
+    return
 
     global  TFT_standard_color
 TFT_standard_color:
-    setf    WREG
+    setf    WREG                ; Default white
     btfsc   divemode            ; in Divemode?
     rcall   TFT_standard_color_dive
 TFT_standard_color0: