comparison src/tft_outputs.asm @ 605:5ce603c29750

gas color coding fixed
author heinrichsweikamp
date Sun, 25 Nov 2018 13:21:52 +0100
parents ca4556fb60b9
children d866684249bd
comparison
equal deleted inserted replaced
604:ca4556fb60b9 605:5ce603c29750
79 retlw color_scheme_divemode_mask4 ;3 79 retlw color_scheme_divemode_mask4 ;3
80 80
81 81
82 global TFT_memo_color 82 global TFT_memo_color
83 TFT_memo_color: ; information, values within normal range, things without a need to react upon 83 TFT_memo_color: ; information, values within normal range, things without a need to react upon
84 bra TFT_standard_color ; mH (Color schemes!)
85 movlw color_white 84 movlw color_white
86 bra TFT_standard_color0 85 bra TFT_standard_color0
87 ;TFT_memo_color_dive: 86 TFT_memo_color_dive:
88 ; retlw color_white 87 retlw color_white
89 88
90 global TFT_advice_color 89 global TFT_advice_color
91 TFT_advice_color: ; advices to do something, but without essential need to actually do it 90 TFT_advice_color: ; advices to do something, but without essential need to actually do it
92 movlw color_green 91 movlw color_green
93 bra TFT_standard_color0 92 bra TFT_standard_color0
2050 2049
2051 TFT_active_setpoint_bail: ; bailout case 2050 TFT_active_setpoint_bail: ; bailout case
2052 tstfsz menupos2 ; any option shown? 2051 tstfsz menupos2 ; any option shown?
2053 bra TFT_active_gas_divemode_oc ; YES - do not overwrite with bailout text 2052 bra TFT_active_gas_divemode_oc ; YES - do not overwrite with bailout text
2054 WIN_SMALL dm_active_dil_column, dm_active_dil_row 2053 WIN_SMALL dm_active_dil_column, dm_active_dil_row
2055 call TFT_attention_color ; print plaint in yellow 2054 call TFT_attention_color ; print in yellow
2056 STRCPY_TEXT_PRINT tDiveBailout ; "Bailout" 2055 STRCPY_TEXT_PRINT tDiveBailout ; "Bailout"
2057 TFT_active_gas_divemode_oc: ; common part for OC and bailout 2056 TFT_active_gas_divemode_oc: ; common part for OC and bailout
2058 movff int_O_breathed_ppO2+0,lo ; color-code the output of the gas by the ppO2 it yields 2057 movff int_O_breathed_ppO2+0,lo ; color-code the output of the gas by the ppO2 it yields
2059 movff int_O_breathed_ppO2+1,hi ; 2058 movff int_O_breathed_ppO2+1,hi ;
2060 call TFT_color_code_ppo2 ; with ppO2 [cbar] in hi:lo 2059 call TFT_color_code_ppo2 ; with ppO2 [cbar] in hi:lo
4272 4271
4273 ;============================================================================= 4272 ;=============================================================================
4274 4273
4275 global TFT_surface_lastdive 4274 global TFT_surface_lastdive
4276 TFT_surface_lastdive: 4275 TFT_surface_lastdive:
4277 call TFT_divemask_color 4276 call TFT_standard_color
4278 WIN_TINY surf_gaslist_column,surf_gaslist_row+.5 4277 WIN_TINY surf_gaslist_column,surf_gaslist_row+.5
4279 STRCAT_TEXT_PRINT tLastDive ; "Last Dive:" 4278 STRCAT_TEXT_PRINT tLastDive ; "Last Dive:"
4280 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.1)+.5 4279 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.1)+.5
4281 STRCAT_TEXT_PRINT tDivetime ; "Divetime:" 4280 STRCAT_TEXT_PRINT tDivetime ; "Divetime:"
4282 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.2)+.5 4281 WIN_TINY surf_gaslist_column,surf_gaslist_row+(surf_gaslist_spacing*.2)+.5
4283 STRCAT_TEXT_PRINT tMaxDepth ; "Max. Depth" 4282 STRCAT_TEXT_PRINT tMaxDepth ; "Max. Depth"
4284 call TFT_standard_color 4283
4285 WIN_SMALL surf_gaslist_column+.48,surf_gaslist_row 4284 WIN_SMALL surf_gaslist_column+.48,surf_gaslist_row
4286 movff int_O_desaturation_time+0,lo ; bank-safe copies 4285 movff int_O_desaturation_time+0,lo ; bank-safe copies
4287 movff int_O_desaturation_time+1,WREG 4286 movff int_O_desaturation_time+1,WREG
4288 iorwf lo,W ; check if desaturation time is zero 4287 iorwf lo,W ; check if desaturation time is zero
4289 bz TFT_surface_lastdive_1 ; YES - show last dive time 4288 bz TFT_surface_lastdive_1 ; YES - show last dive time